ScriptName SkriptName^^
short var1
ref var2
Begin ScriptEffectStart
set var2 to getself
set var1 to 1 + GetRandomPercent * 9 / 99
if var1 == 1
cont1.RemoveAllItems var2
???
elseif var1 == 2
...
elseif var1 == 10
cont1.RemoveAllItems var2
???
endif
end
if var1 >= 90
elseif var1 >= 80
...
endif
scn name
ref mySelf
ref NPC
Begin onAdd
set NPC to getContainer
set mySelf to getSelf
NPC.equipItem mySelf
end
OBSE: einbringen ist einfach, aber für den Anwender lästig
scn name
short once
begin onactivate
if once==0
player.additem ITEM-ID 1
set once to 1
endif
end
scn aaDRCyra0AltLeg08SternentorAktivierungSCRIPT
Short Runde
Begin onActivate player
If (Runde != 0)
Return
Else
Let Runde := 1
Endif
End
Begin GameMode
If (Runde == 0)
Return
Elseif (Runde == 1)
DRCyra0AltLeg08SteinR01.PlayGroup Forward 0
DRCyra0AltLeg08SteinL01.PlayGroup Forward 0
Let Runde := 2
Elseif (Runde == 2)
If (DRCyra0AltLeg08SteinR01.IsAnimPlaying == 0) && (DRCyra0AltLeg08SteinR01.IsAnimPlaying == 0)
Let Runde := 3
Endif
Elseif (Runde == 3)
DRCyra0AltLeg08SteinR01.PlayGroup Forward 0
DRCyra0AltLeg08SteinL01.PlayGroup Forward 0
DRCyra0AltLeg08SteinR02.PlayGroup Forward 0
DRCyra0AltLeg08SteinL02.PlayGroup Forward 0
Let Runde := 4
Elseif (Runde == 4)
If (DRCyra0AltLeg08SteinR01.IsAnimPlaying == 0) && (DRCyra0AltLeg08SteinR01.IsAnimPlaying == 0)
If (DRCyra0AltLeg08SteinR02.IsAnimPlaying == 0) && (DRCyra0AltLeg08SteinR02.IsAnimPlaying == 0)
Let Runde := 5
Endif
Endif
Elseif (Runde == 5)
DRCyra0AltLeg08SteinR01.PlayGroup Forward 0
DRCyra0AltLeg08SteinL01.PlayGroup Forward 0
DRCyra0AltLeg08SteinR02.PlayGroup Forward 0
DRCyra0AltLeg08SteinL02.PlayGroup Forward 0
DRCyra0AltLeg08SteinR03.PlayGroup Forward 0
DRCyra0AltLeg08SteinL03.PlayGroup Forward 0
Let Runde := 6
Elseif (Runde == 6)
If (DRCyra0AltLeg08SteinR01.IsAnimPlaying == 0) && (DRCyra0AltLeg08SteinR01.IsAnimPlaying == 0)
If (DRCyra0AltLeg08SteinR02.IsAnimPlaying == 0) && (DRCyra0AltLeg08SteinR02.IsAnimPlaying == 0)
If (DRCyra0AltLeg08SteinR03.IsAnimPlaying == 0) && (DRCyra0AltLeg08SteinR03.IsAnimPlaying == 0)
Let Runde := 7
Endif
Endif
Endif
Elseif (Runde == 7)
DRCyra0AltLeg08SteinR01.PlayGroup Forward 0
DRCyra0AltLeg08SteinL01.PlayGroup Forward 0
DRCyra0AltLeg08SteinR02.PlayGroup Forward 0
DRCyra0AltLeg08SteinL02.PlayGroup Forward 0
DRCyra0AltLeg08SteinR03.PlayGroup Forward 0
DRCyra0AltLeg08SteinL03.PlayGroup Forward 0
DRCyra0AltLeg08SteinR04.PlayGroup Forward 0
DRCyra0AltLeg08SteinL04.PlayGroup Forward 0
Let Runde := 8
Elseif (Runde == 8)
If (DRCyra0AltLeg08SteinR01.IsAnimPlaying == 0) && (DRCyra0AltLeg08SteinR01.IsAnimPlaying == 0)
If (DRCyra0AltLeg08SteinR02.IsAnimPlaying == 0) && (DRCyra0AltLeg08SteinR02.IsAnimPlaying == 0)
If (DRCyra0AltLeg08SteinR03.IsAnimPlaying == 0) && (DRCyra0AltLeg08SteinR03.IsAnimPlaying == 0)
If (DRCyra0AltLeg08SteinR04.IsAnimPlaying == 0) && (DRCyra0AltLeg08SteinR04.IsAnimPlaying == 0)
Let Runde := 9
Endif
Endif
Endif
Endif
Elseif (Runde == 9)
DRCyra0AltLeg08SteinR01.PlayGroup Forward 0
DRCyra0AltLeg08SteinL01.PlayGroup Forward 0
DRCyra0AltLeg08SteinR02.PlayGroup Forward 0
DRCyra0AltLeg08SteinL02.PlayGroup Forward 0
DRCyra0AltLeg08SteinR03.PlayGroup Forward 0
DRCyra0AltLeg08SteinL03.PlayGroup Forward 0
DRCyra0AltLeg08SteinR04.PlayGroup Forward 0
DRCyra0AltLeg08SteinL04.PlayGroup Forward 0
DRCyra0AltLeg08SteinR05.PlayGroup Forward 0
DRCyra0AltLeg08SteinL05.PlayGroup Forward 0
Let Runde := 10
Elseif (Runde == 10)
If (DRCyra0AltLeg08SteinR01.IsAnimPlaying == 0) && (DRCyra0AltLeg08SteinR01.IsAnimPlaying == 0)
If (DRCyra0AltLeg08SteinR02.IsAnimPlaying == 0) && (DRCyra0AltLeg08SteinR02.IsAnimPlaying == 0)
If (DRCyra0AltLeg08SteinR03.IsAnimPlaying == 0) && (DRCyra0AltLeg08SteinR03.IsAnimPlaying == 0)
If (DRCyra0AltLeg08SteinR04.IsAnimPlaying == 0) && (DRCyra0AltLeg08SteinR04.IsAnimPlaying == 0)
If (DRCyra0AltLeg08SteinR05.IsAnimPlaying == 0) && (DRCyra0AltLeg08SteinR05.IsAnimPlaying == 0)
Let Runde := 11
Endif
Endif
Endif
Endif
Endif
Elseif (Runde == 11)
DRCyra0AltLeg08SteinR01.Cast aaDRCyra0AltLeg08Aktivierblitz DRCyra0AltLeg08SteinMitte
DRCyra0AltLeg08SteinL01.Cast aaDRCyra0AltLeg08Aktivierblitz DRCyra0AltLeg08SteinMitte
DRCyra0AltLeg08SteinR02.Cast aaDRCyra0AltLeg08Aktivierblitz DRCyra0AltLeg08SteinMitte
DRCyra0AltLeg08SteinL02.Cast aaDRCyra0AltLeg08Aktivierblitz DRCyra0AltLeg08SteinMitte
DRCyra0AltLeg08SteinR03.Cast aaDRCyra0AltLeg08Aktivierblitz DRCyra0AltLeg08SteinMitte
DRCyra0AltLeg08SteinL03.Cast aaDRCyra0AltLeg08Aktivierblitz DRCyra0AltLeg08SteinMitte
DRCyra0AltLeg08SteinR04.Cast aaDRCyra0AltLeg08Aktivierblitz DRCyra0AltLeg08SteinMitte
DRCyra0AltLeg08SteinL04.Cast aaDRCyra0AltLeg08Aktivierblitz DRCyra0AltLeg08SteinMitte
DRCyra0AltLeg08SteinR05.Cast aaDRCyra0AltLeg08Aktivierblitz DRCyra0AltLeg08SteinMitte
DRCyra0AltLeg08SteinL05.Cast aaDRCyra0AltLeg08Aktivierblitz DRCyra0AltLeg08SteinMitte
Let Runde := 12
Elseif (Runde == 12)
DRCyra0AltLeg08SteinMitte.PlayGroup Forward 0
Let Runde := 13
Elseif (Runde == 13)
If (DRCyra0AltLeg08SteinMitte.IsAnimPlaying == 0)
Let Runde := 14
Endif
Elseif (Runde == 14)
DRCyra0AltLeg08SteinMitte.Cast aaDRCyra0AltLeg08Aktivierblitz DRCyra0AltLeg08SteinZiel01
DRCyra0AltLeg08SteinMitte.Cast aaDRCyra0AltLeg08Aktivierblitz DRCyra0AltLeg08SteinZiel02
DRCyra0AltLeg08SteinMitte.Cast aaDRCyra0AltLeg08Aktivierblitz DRCyra0AltLeg08SteinZiel03
DRCyra0AltLeg08SteinMitte.Cast aaDRCyra0AltLeg08Aktivierblitz DRCyra0AltLeg08SteinZiel04
Let Runde := 15
Elseif (Runde == 15)
DRCyra0AltLeg08SteinMitte.PlayGroup Forward 0
Let Runde := 16
Elseif (Runde == 16)
If (DRCyra0AltLeg08SteinMitte.IsAnimPlaying == 0)
Let Runde := 17
Endif
Elseif (Runde == 17)
DRCyra0AltLeg08SteinZiel01.Cast aaDRCyra0AltLeg08Aktivierblitz DRCyra0AltLeg08SteinZielFINAL
DRCyra0AltLeg08SteinZiel02.Cast aaDRCyra0AltLeg08Aktivierblitz DRCyra0AltLeg08SteinZielFINAL
DRCyra0AltLeg08SteinZiel03.Cast aaDRCyra0AltLeg08Aktivierblitz DRCyra0AltLeg08SteinZielFINAL
DRCyra0AltLeg08SteinZiel04.Cast aaDRCyra0AltLeg08Aktivierblitz DRCyra0AltLeg08SteinZielFINAL
DRCyra0AltLeg08TornebelREF.Enable
DRCyra0AltLeg08PortalnexusREF.Enable
Let Runde := 18
Endif
End
;<CSEBlock>
;<CSEStatutoryWarning> This script may contain preprocessor directives parsed by the CSE Script Editor. Refrain from modifying it in the vanilla editor. </CSEStatutoryWarning>
;<CSECaretPos> 5204 </CSECaretPos>
;</CSEBlock>