scn NAME
short once
begin onactivate
if once==0
if getstage PWBGQuestRolf == 10
setstage PWBGQuestRolf 20
set once to 1
endif
elseif once==1
activate
endif
end
scn NAME
short once
begin onactivate
if once==0
if getstage PWBGQuestRolf == 10
setstage PWBGQuestRolf 20
set once to 1
activate
endif
elseif once==1
activate
endif
end
scn NAME
begin onactivate
if getstage PWBGQuestRolf == 10
setstage PWBGQuestRolf 20
else
activate
endif
end
scn NAME
begin onactivate
if getstage PWBGQuestRolf == 10
setstage PWBGQuestRolf 20
endif
activate
end
Scn Beschuss
Begin OnEquip
"Punkt1Ref".cast Feuerball "Ziel1Ref"
End
scn aaaTeleporterScript01
short button
short teleporter
begin onActivate
messagebox "Wohin wollt ihr reisen?" , "Skingrad" , "Bravil" , "Chorrol" , "Die Kaiserstadt" , "Leyawiin" , "Cheydinhal" , "Kvatch"
if teleporter == 0
set teleporter to 1
endif
end
Begin GameMode
if teleporter == 1
set button to GetButtonPressed
if button == 0 && teleporter == 1
Player.GetInCell SkingradCastle
set teleporter to 1
elseif button == 1 && teleporter == 1
Player.GetInCell BravilCastleGreatHall
set teleporter to 1
elseif button == 2 && teleporter == 1
Player.GetInCell ChorrolCastle
set teleporter to 1
elseif button == 3 && teleporter == 1
Player.GetInCell ICPalace
set teleporter to 1
elseif button == 6 && teleporter == 1
Player.GetInCell LeyawiinCastle
set teleporter to 1
elseif button == 7 && teleporter == 1
GetInCell CheydinhalCastle
set teleporter to 1
elseif button == 8 && teleporter == 1
GetInCell Kvatch
return
endif
endif
end
scn aaaTeleporterScript01
short button
short teleporter
begin onActivate
messagebox "Wohin wollt ihr reisen?" , "Skingrad" , "Bravil" , "Chorrol" , "Die Kaiserstadt" , "Leyawiin" , "Cheydinhal" , "Kvatch"
if teleporter == 0
set teleporter to 1
endif
end
Begin GameMode
if teleporter == 1
set button to GetButtonPressed
if button == 0 && teleporter == 1
Player.moveto MarkerSK
set teleporter to 1
elseif button == 1 && teleporter == 1
Player.moveto MarkerBRA
set teleporter to 1
elseif button == 2 && teleporter == 1
Player.moveto MarkerCHO
set teleporter to 1
elseif button == 3 && teleporter == 1
Player.moveto MarkerIC
set teleporter to 1
elseif button == 6 && teleporter == 1
Player.moveto MarkerLEY
set teleporter to 1
elseif button == 7 && teleporter == 1
player.moveto MarkerCHEY
set teleporter to 1
elseif button == 8 && teleporter == 1
player.moveto MarkerKVA
return
endif
endif
end
scn aaDRCyra0ParentScript04Druckplatte
short Aktiviert
ref DruckplatteRef
ref ParentRef
float TimerToBack
begin GameMode
If (Aktiviert == 0)
If (getDistance player < 60)
Let ParentRef := getParentRef
Let DruckplatteRef := getSelf
Let Aktiviert := 1
Let TimerToBack := getsecondpassed
DruckplatteRef.playgroup forward 0
Endif
Elseif (Aktiviert == 1)
If (GetSecondsPassed - Timer >= 5)
Let Aktiviert := 0
Let TimerToBack := 0
DruckplatteRef.playgroup backward 0
Endif
Endif
End
begin onReset
reset3DState
set activated to 0
end