Перейти к содержанию

Ошибки в скриптах

BloodSoul

Автор BloodSoul,
в TES III: TES Construction Set

 Поделиться

Рекомендуемые сообщения

BloodSoul Ополченец

BloodSoul

Опубликовано
Опубликовано

скажите что не так в этих скриптах исправлю то эроры замучали

begin VH_MGE_ShaderScript

 

short ActivateShader1

short ActivateShader2

short DisableShader

short ForceStop

short OldBloodLevel

short OldShader

short temp

 

if ( ForceStop == 1 )

set ForceStop to 0

set DisableShader to 1

StopScript VH_MGE_ShaderScript

endif

 

if ( PCVampire == 1 )

if ( OldBloodLevel != VH_BloodLevel )

set OldBloodLevel to VH_BloodLevel

 

if ( VH_Setting_ShaderType < 2 )

set temp to ( VH_Setting_BloodDecrease * 2 )

if ( VH_BloodLevel <= 0 )

if ( VH_Setting_ShaderType == 0 )

if ( OldShader != 2 )

set ActivateShader2 to 1

endif

elseif ( VH_Setting_ShaderType == 1 )

if ( OldShader != 1 )

set ActivateShader1 to 1

endif

endif

elseif ( VH_BloodLevel <= temp )

if ( OldShader != 1 )

set ActivateShader1 to 1

endif

else

if ( OldShader != 0 )

set DisableShader to 1

endif

endif

endif

 

endif

endif

 

ifx ( ActivateShader1 )

set ActivateShader1 to 0

set OldShader to 1

xFileWriteString, "|MGEpipe", "SDVH\Bloodlust 2.fx"

xFileWriteString, "|MGEpipe", "SEVH\Bloodlust.fx"

endif

 

ifx ( ActivateShader2 )

set ActivateShader2 to 0

set OldShader to 2

xFileWriteString, "|MGEpipe", "SDVH\Bloodlust.fx"

xFileWriteString, "|MGEpipe", "SEVH\Bloodlust 2.fx"

endif

 

ifx ( DisableShader )

set DisableShader to 0

set OldShader to 0

xFileWriteString, "|MGEpipe", "SDVH\Bloodlust.fx"

xFileWriteString, "|MGEpipe", "SDVH\Bloodlust 2.fx"

endif

 

end

следущий:

begin VH_MGE_ShaderScript

 

short ActivateShader1

short ActivateShader2

short DisableShader

short ForceStop

short OldBloodLevel

short OldShader

short temp

 

if ( ForceStop == 1 )

set ForceStop to 0

set DisableShader to 1

StopScript VH_MGE_ShaderScript

endif

 

if ( PCVampire == 1 )

if ( OldBloodLevel != VH_BloodLevel )

set OldBloodLevel to VH_BloodLevel

 

if ( VH_Setting_ShaderType < 2 )

set temp to ( VH_Setting_BloodDecrease * 2 )

if ( VH_BloodLevel <= 0 )

if ( VH_Setting_ShaderType == 0 )

if ( OldShader != 2 )

set ActivateShader2 to 1

endif

elseif ( VH_Setting_ShaderType == 1 )

if ( OldShader != 1 )

set ActivateShader1 to 1

endif

endif

elseif ( VH_BloodLevel <= temp )

if ( OldShader != 1 )

set ActivateShader1 to 1

endif

else

if ( OldShader != 0 )

set DisableShader to 1

endif

endif

endif

 

endif

endif

 

ifx ( ActivateShader1 )

set ActivateShader1 to 0

set OldShader to 1

xFileWriteString, "|MGEpipe", "SDVH\Bloodlust 2.fx"

xFileWriteString, "|MGEpipe", "SEVH\Bloodlust.fx"

endif

 

ifx ( ActivateShader2 )

set ActivateShader2 to 0

set OldShader to 2

xFileWriteString, "|MGEpipe", "SDVH\Bloodlust.fx"

xFileWriteString, "|MGEpipe", "SEVH\Bloodlust 2.fx"

endif

 

ifx ( DisableShader )

set DisableShader to 0

set OldShader to 0

xFileWriteString, "|MGEpipe", "SDVH\Bloodlust.fx"

xFileWriteString, "|MGEpipe", "SDVH\Bloodlust 2.fx"

endif

 

end

следущий:

begin VH_MGE_RandomizeKeysScript

 

short EnableKeys

short DisableKeys

short HandleKeyPresses

short Forward

short Backward

short Left

short Right

short ForceStop

short temp

 

if ( ForceStop == 1 )

set ForceStop to 0

set EnableKeys to 1

set HandleKeyPresses to 0

StopScript VH_MGE_RandomizeKeysScript

endif

 

if ( PCVampire == 1 )

 

if ( VH_Setting_RandomKeys == 1 )

if ( VH_BloodLevel <= 0 )

if ( HandleKeyPresses != 1 )

set DisableKeys to 1

set HandleKeyPresses to 1

set temp to Random 9

if ( temp == 0 )

set Forward to 30

set Backward to 17

set Left to 32

set Right to 31

elseif ( temp == 1 )

set Forward to 30

set Backward to 32

set Left to 17

set Right to 31

elseif ( temp == 2 )

set Forward to 30

set Backward to 32

set Left to 31

set Right to 17

elseif ( temp == 3 )

set Forward to 31

set Backward to 17

set Left to 32

set Right to 30

elseif ( temp == 4 )

set Forward to 31

set Backward to 30

set Left to 32

set Right to 17

elseif ( temp == 5 )

set Forward to 31

set Backward to 32

set Left to 17

set Right to 30

elseif ( temp == 6 )

set Forward to 32

set Backward to 17

set Left to 31

set Right to 30

elseif ( temp == 7 )

set Forward to 32

set Backward to 30

set Left to 17

set Right to 31

else

set Forward to 32

set Backward to 30

set Left to 31

set Right to 17

endif

endif

else

if ( HandleKeyPresses != 0 )

set EnableKeys to 1

set HandleKeyPresses to 0

endif

endif

endif

 

endif

 

ifx ( DisableKeys )

set DisableKeys to 0

xFileWriteShort, "|MGEpipe", 25707

xFileWriteShort, "|MGEpipe", 17

xFileWriteShort, "|MGEpipe", 25707

xFileWriteShort, "|MGEpipe", 30

xFileWriteShort, "|MGEpipe", 25707

xFileWriteShort, "|MGEpipe", 31

xFileWriteShort, "|MGEpipe", 25707

xFileWriteShort, "|MGEpipe", 32

endif

 

ifx ( EnableKeys )

set EnableKeys to 0

xFileWriteShort, "|MGEpipe", 24939

xFileWriteShort, "|MGEpipe", 17

xFileWriteShort, "|MGEpipe", 24939

xFileWriteShort, "|MGEpipe", 30

xFileWriteShort, "|MGEpipe", 24939

xFileWriteShort, "|MGEpipe", 31

xFileWriteShort, "|MGEpipe", 24939

xFileWriteShort, "|MGEpipe", 32

endif

 

ifx ( HandleKeyPresses )

setx temp to xKeyPressed, 87

ifx ( temp )

xFileWriteShort, "|MGEpipe", 29803

xFileWriteShort, "|MGEpipe", Forward

endif

setx temp to xKeyPressed, 83

ifx ( temp )

xFileWriteShort, "|MGEpipe", 29803

xFileWriteShort, "|MGEpipe", Backward

endif

setx temp to xKeyPressed, 65

ifx ( temp )

xFileWriteShort, "|MGEpipe", 29803

xFileWriteShort, "|MGEpipe", Left

endif

setx temp to xKeyPressed, 68

ifx ( temp )

xFileWriteShort, "|MGEpipe", 29803

xFileWriteShort, "|MGEpipe", Right

endif

endif

 

end

следущий:

begin VH_MGE_BloodMeterScript

 

short BloodMeterBit1

short BloodMeterBit2

short BloodMeterBit3

short BloodMeterBit4

short ChangeBloodMeter

short DisableBloodMeter

short ForceStop

short OldBloodLevel

short OldBloodMeterLevel

short temp

float tempf

 

if ( ForceStop == 1 )

set ForceStop to 0

set DisableBloodMeter to 1

StopScript VH_MGE_BloodMeterScript

endif

 

if ( PCVampire == 1 )

if ( OldBloodLevel != VH_BloodLevel )

set OldBloodLevel to VH_BloodLevel

 

if ( VH_Setting_NoBloodMeter != 1 )

if ( VH_BloodLevel <= 0 )

set temp to 0

else

set temp to ( VH_BloodLevel / 214.25 + 1 )

endif

if ( temp != OldBloodMeterLevel )

set OldBloodMeterLevel to temp

set DisableBloodMeter to 1

set ChangeBloodMeter to 1

if ( temp == 0 )

set BloodMeterBit1 to 0

set BloodMeterBit2 to 0

set BloodMeterBit3 to 0

set BloodMeterBit4 to 0

elseif ( temp == 1 )

set BloodMeterBit1 to 0

set BloodMeterBit2 to 0

set BloodMeterBit3 to 0

set BloodMeterBit4 to 1

elseif ( temp == 2 )

set BloodMeterBit1 to 0

set BloodMeterBit2 to 0

set BloodMeterBit3 to 1

set BloodMeterBit4 to 0

elseif ( temp == 3 )

set BloodMeterBit1 to 0

set BloodMeterBit2 to 0

set BloodMeterBit3 to 1

set BloodMeterBit4 to 1

elseif ( temp == 4 )

set BloodMeterBit1 to 0

set BloodMeterBit2 to 1

set BloodMeterBit3 to 0

set BloodMeterBit4 to 0

elseif ( temp == 5 )

set BloodMeterBit1 to 0

set BloodMeterBit2 to 1

set BloodMeterBit3 to 0

set BloodMeterBit4 to 1

elseif ( temp == 6 )

set BloodMeterBit1 to 0

set BloodMeterBit2 to 1

set BloodMeterBit3 to 1

set BloodMeterBit4 to 0

elseif ( temp == 7 )

set BloodMeterBit1 to 0

set BloodMeterBit2 to 1

set BloodMeterBit3 to 1

set BloodMeterBit4 to 1

elseif ( temp == 8 )

set BloodMeterBit1 to 1

set BloodMeterBit2 to 0

set BloodMeterBit3 to 0

set BloodMeterBit4 to 0

elseif ( temp == 9 )

set BloodMeterBit1 to 1

set BloodMeterBit2 to 0

set BloodMeterBit3 to 0

set BloodMeterBit4 to 1

elseif ( temp == 10 )

set BloodMeterBit1 to 1

set BloodMeterBit2 to 0

set BloodMeterBit3 to 1

set BloodMeterBit4 to 0

elseif ( temp == 11 )

set BloodMeterBit1 to 1

set BloodMeterBit2 to 0

set BloodMeterBit3 to 1

set BloodMeterBit4 to 1

elseif ( temp == 12 )

set BloodMeterBit1 to 1

set BloodMeterBit2 to 1

set BloodMeterBit3 to 0

set BloodMeterBit4 to 0

elseif ( temp == 13 )

set BloodMeterBit1 to 1

set BloodMeterBit2 to 1

set BloodMeterBit3 to 0

set BloodMeterBit4 to 1

elseif ( temp == 14 )

set BloodMeterBit1 to 1

set BloodMeterBit2 to 1

set BloodMeterBit3 to 1

set BloodMeterBit4 to 0

else

set BloodMeterBit1 to 1

set BloodMeterBit2 to 1

set BloodMeterBit3 to 1

set BloodMeterBit4 to 1

endif

endif

endif

 

endif

endif

 

ifx ( DisableBloodMeter )

set DisableBloodMeter to 0

xFileWriteString, "|MGEpipe", "HdVH_BloodMeter00"

xFileWriteString, "|MGEpipe", "HfVH_BloodMeter00"

xFileWriteString, "|MGEpipe", "HdVH_BloodMeter01"

xFileWriteString, "|MGEpipe", "HfVH_BloodMeter01"

xFileWriteString, "|MGEpipe", "HdVH_BloodMeter02"

xFileWriteString, "|MGEpipe", "HfVH_BloodMeter02"

xFileWriteString, "|MGEpipe", "HdVH_BloodMeter03"

xFileWriteString, "|MGEpipe", "HfVH_BloodMeter03"

xFileWriteString, "|MGEpipe", "HdVH_BloodMeter04"

xFileWriteString, "|MGEpipe", "HfVH_BloodMeter04"

xFileWriteString, "|MGEpipe", "HdVH_BloodMeter05"

xFileWriteString, "|MGEpipe", "HfVH_BloodMeter05"

xFileWriteString, "|MGEpipe", "HdVH_BloodMeter06"

xFileWriteString, "|MGEpipe", "HfVH_BloodMeter06"

xFileWriteString, "|MGEpipe", "HdVH_BloodMeter07"

xFileWriteString, "|MGEpipe", "HfVH_BloodMeter07"

xFileWriteString, "|MGEpipe", "HdVH_BloodMeter08"

xFileWriteString, "|MGEpipe", "HfVH_BloodMeter08"

xFileWriteString, "|MGEpipe", "HdVH_BloodMeter09"

xFileWriteString, "|MGEpipe", "HfVH_BloodMeter09"

xFileWriteString, "|MGEpipe", "HdVH_BloodMeter10"

xFileWriteString, "|MGEpipe", "HfVH_BloodMeter10"

xFileWriteString, "|MGEpipe", "HdVH_BloodMeter11"

xFileWriteString, "|MGEpipe", "HfVH_BloodMeter11"

xFileWriteString, "|MGEpipe", "HdVH_BloodMeter12"

xFileWriteString, "|MGEpipe", "HfVH_BloodMeter12"

xFileWriteString, "|MGEpipe", "HdVH_BloodMeter13"

xFileWriteString, "|MGEpipe", "HfVH_BloodMeter13"

xFileWriteString, "|MGEpipe", "HdVH_BloodMeter14"

xFileWriteString, "|MGEpipe", "HfVH_BloodMeter14"

xFileWriteString, "|MGEpipe", "HdVH_BloodMeter15"

xFileWriteString, "|MGEpipe", "HfVH_BloodMeter15"

endif

 

ifx ( ChangeBloodMeter )

set ChangeBloodMeter to 0

xFileWriteShort, "|MGEpipe", 27720 ;Hl

 

ifx ( BloodMeterBit1 )

ifx ( BloodMeterBit2 )

ifx ( BloodMeterBit3 )

ifx ( BloodMeterBit4 )

xFileWriteString, "|MGEpipe", "VH_BloodMeter15"

xFileWriteString, "|MGEpipe", "VH\BloodMeter15.dds"

xFileWriteString, "|MGEpipe", "HeVH_BloodMeter15"

xFileWriteString, "|MGEpipe", "HpVH_BloodMeter15"

else

xFileWriteString, "|MGEpipe", "VH_BloodMeter14"

xFileWriteString, "|MGEpipe", "VH\BloodMeter14.dds"

xFileWriteString, "|MGEpipe", "HeVH_BloodMeter14"

xFileWriteString, "|MGEpipe", "HpVH_BloodMeter14"

endif

else

ifx ( BloodMeterBit4 )

xFileWriteString, "|MGEpipe", "VH_BloodMeter13"

xFileWriteString, "|MGEpipe", "VH\BloodMeter13.dds"

xFileWriteString, "|MGEpipe", "HeVH_BloodMeter13"

xFileWriteString, "|MGEpipe", "HpVH_BloodMeter13"

else

xFileWriteString, "|MGEpipe", "VH_BloodMeter12"

xFileWriteString, "|MGEpipe", "VH\BloodMeter12.dds"

xFileWriteString, "|MGEpipe", "HeVH_BloodMeter12"

xFileWriteString, "|MGEpipe", "HpVH_BloodMeter12"

endif

endif

else

ifx ( BloodMeterBit3 )

ifx ( BloodMeterBit4 )

xFileWriteString, "|MGEpipe", "VH_BloodMeter11"

xFileWriteString, "|MGEpipe", "VH\BloodMeter11.dds"

xFileWriteString, "|MGEpipe", "HeVH_BloodMeter11"

xFileWriteString, "|MGEpipe", "HpVH_BloodMeter11"

else

xFileWriteString, "|MGEpipe", "VH_BloodMeter10"

xFileWriteString, "|MGEpipe", "VH\BloodMeter10.dds"

xFileWriteString, "|MGEpipe", "HeVH_BloodMeter10"

xFileWriteString, "|MGEpipe", "HpVH_BloodMeter10"

endif

else

ifx ( BloodMeterBit4 )

xFileWriteString, "|MGEpipe", "VH_BloodMeter09"

xFileWriteString, "|MGEpipe", "VH\BloodMeter09.dds"

xFileWriteString, "|MGEpipe", "HeVH_BloodMeter09"

xFileWriteString, "|MGEpipe", "HpVH_BloodMeter09"

else

xFileWriteString, "|MGEpipe", "VH_BloodMeter08"

xFileWriteString, "|MGEpipe", "VH\BloodMeter08.dds"

xFileWriteString, "|MGEpipe", "HeVH_BloodMeter08"

xFileWriteString, "|MGEpipe", "HpVH_BloodMeter08"

endif

endif

endif

else

ifx ( BloodMeterBit2 )

ifx ( BloodMeterBit3 )

ifx ( BloodMeterBit4 )

xFileWriteString, "|MGEpipe", "VH_BloodMeter07"

xFileWriteString, "|MGEpipe", "VH\BloodMeter07.dds"

xFileWriteString, "|MGEpipe", "HeVH_BloodMeter07"

xFileWriteString, "|MGEpipe", "HpVH_BloodMeter07"

else

xFileWriteString, "|MGEpipe", "VH_BloodMeter06"

xFileWriteString, "|MGEpipe", "VH\BloodMeter06.dds"

xFileWriteString, "|MGEpipe", "HeVH_BloodMeter06"

xFileWriteString, "|MGEpipe", "HpVH_BloodMeter06"

 

endif

else

ifx ( BloodMeterBit4 )

xFileWriteString, "|MGEpipe", "VH_BloodMeter05"

xFileWriteString, "|MGEpipe", "VH\BloodMeter05.dds"

xFileWriteString, "|MGEpipe", "HeVH_BloodMeter05"

xFileWriteString, "|MGEpipe", "HpVH_BloodMeter05"

else

xFileWriteString, "|MGEpipe", "VH_BloodMeter04"

xFileWriteString, "|MGEpipe", "VH\BloodMeter04.dds"

xFileWriteString, "|MGEpipe", "HeVH_BloodMeter04"

xFileWriteString, "|MGEpipe", "HpVH_BloodMeter04"

endif

endif

else

ifx ( BloodMeterBit3 )

ifx ( BloodMeterBit4 )

xFileWriteString, "|MGEpipe", "VH_BloodMeter03"

xFileWriteString, "|MGEpipe", "VH\BloodMeter03.dds"

xFileWriteString, "|MGEpipe", "HeVH_BloodMeter03"

xFileWriteString, "|MGEpipe", "HpVH_BloodMeter03"

else

xFileWriteString, "|MGEpipe", "VH_BloodMeter02"

xFileWriteString, "|MGEpipe", "VH\BloodMeter02.dds"

xFileWriteString, "|MGEpipe", "HeVH_BloodMeter02"

xFileWriteString, "|MGEpipe", "HpVH_BloodMeter02"

endif

else

ifx ( BloodMeterBit4 )

xFileWriteString, "|MGEpipe", "VH_BloodMeter01"

xFileWriteString, "|MGEpipe", "VH\BloodMeter01.dds"

xFileWriteString, "|MGEpipe", "HeVH_BloodMeter01"

xFileWriteString, "|MGEpipe", "HpVH_BloodMeter01"

else

xFileWriteString, "|MGEpipe", "VH_BloodMeter00"

xFileWriteString, "|MGEpipe", "VH\BloodMeter00.dds"

xFileWriteString, "|MGEpipe", "HeVH_BloodMeter00"

xFileWriteString, "|MGEpipe", "HpVH_BloodMeter00"

endif

endif

endif

endif

 

if ( VH_Screen_Width == 0 )

set tempf to VH_Screen_Width

else

set tempf to ( VH_Screen_Width - 24 )

endif

xFileWriteFloat, "|MGEpipe", tempf

 

if ( VH_Screen_Height == 0 )

set tempf to VH_Screen_Height

else

set tempf to ( VH_Screen_Height - 190 )

endif

xFileWriteFloat, "|MGEpipe", tempf

endif

 

end

Ссылка на комментарий
Поделиться на другие сайты
Эндер Виггин Ветеран

Эндер Виггин

Опубликовано
Опубликовано
Для начала неплохо бы объяснить что этот скрипт должен делать. То что это МГЕшный МВСЕ я понял. Походу что-то из вампирских плагинов. И какие ошибки пишет. А то тут экстрасенсов не очень много. :-)
Ссылка на комментарий
Поделиться на другие сайты
BloodSoul Ополченец

BloodSoul

Опубликовано
  • Автор
Опубликовано

в игре ля ля ля не робит скрипт продолжить да, нет.

А а в кс строчки пишет неправильны

VH_MGE_BloodMeterScript - это тип колба с кровью, указывает когда надо пить кровь, а про остальные понятия не имею т.к. пару дней назад поставил

Ссылка на комментарий
Поделиться на другие сайты
Эндер Виггин Ветеран

Эндер Виггин

Опубликовано
Опубликовано

Найти можно тут. И вообще, надо ридми читать. Хотя бы когда что-то не работает.

З.Ы. Все-таки у меня есть зачатки телепатии.... :-)

Ссылка на комментарий
Поделиться на другие сайты
BloodSoul Ополченец

BloodSoul

Опубликовано
  • Автор
Опубликовано

Канечн надо, но есть одно большое но я фигово английский знаю я там мало разобрал и читал что даёт а не что требует :)

Ну ладно спасибо за помощь

 

Всё равно ругается хотя настроил прогу по описанию

Ссылка на комментарий
Поделиться на другие сайты

Для публикации сообщений создайте учётную запись или авторизуйтесь

Вы должны быть пользователем, чтобы оставить комментарий

Создать учетную запись

Зарегистрируйте новую учётную запись в нашем сообществе. Это очень просто!

Регистрация нового пользователя

Войти

Уже есть аккаунт? Войти в систему.

Войти
 Поделиться
Перейти к списку тем

  • Последние посетители   0 пользователей онлайн

    • Ни одного зарегистрированного пользователя не просматривает данную страницу
×
×
  • Создать...