0 Пользователей и 1 Гость просматривают эту тему.
Scn KVLNevQuScShort StageGlfloat timer short init float fQuestDelayTimeref Pack1ref Pack2short TekPakBegin GameModeSet fQuestDelayTime to 0.001If ( StageGl == 50 ) Message "Start Paket-10" KVLPos1.AddScriptPackage KVLRunPos10 ; KVLRunToCastlePos1 ; KVLPos1.EvaluatePackage KVLRunPos10 set StageGl to 51Endifif ( StageGl == 55 )KVLPos1.RemoveScriptPackage KVLRunPos10MessageEX "Пакет 1 удален" set StageGl to 57endifIf ( StageGl == 57 ) if init == 0 ; установить значение таймера set timer to 30 set init to 1 else if timer > 1 set timer to timer - getSecondsPassed MessageEX "Timer = %.0f" timer else KVLPos1.AddScriptPackage KVLRunPos12 ; KVLPos1.EvaluatePackage KVLRunPos12 set TekPak to KVLPos1.GetCurrentAIPackage MessageEX "Пакет 2 стартовал, Тек Пак=%.0f" TekPak Set StageGl to 58 endif endif EndifEnd
scn KVLPosABbegin OnPackageDone KVLRunPos10 ; KVLRunToCastlePos1MessageEX "Stop Пакет 10"Set KVLNev.StageGl to 55Endbegin OnPackageDone KVLRunPos12 ; KVLRunToCastlePos1MessageEX "Stop Пакет 12"Set KVLNev.StageGl to 60End
Пакет №2: Travel, Must Reach Location, Continue if PC near; Location:Near Reference-Ref(X-Marker); Schedule=any; Conditions=empty.