64 lines
1.1 KiB
Scala
64 lines
1.1 KiB
Scala
;;; Sierra Script 1.0 - (do not remove this comment)
|
|
(script# 305)
|
|
(include sci.sh)
|
|
(use Main)
|
|
(use Class_255_0)
|
|
(use Cycle)
|
|
(use InvI)
|
|
(use Obj)
|
|
|
|
(public
|
|
shootBow 0
|
|
)
|
|
|
|
(local
|
|
gEgoViewer
|
|
)
|
|
(instance shootBow of Script
|
|
(properties)
|
|
|
|
(method (init)
|
|
(= global204 1)
|
|
(Load rsVIEW 31)
|
|
(Load rsVIEW 68)
|
|
(super init:)
|
|
)
|
|
|
|
(method (changeState newState)
|
|
(switch (= state newState)
|
|
(0
|
|
(proc0_8)
|
|
(= gGEgoView (gEgo view?))
|
|
(= gGEgoBaseSetter (gEgo baseSetter?))
|
|
(= gEgoViewer (gEgo viewer?))
|
|
(gEgo
|
|
viewer: 0
|
|
baseSetter: (ScriptID 0 1)
|
|
view: (if (== gGEgoView 2) 31 else 68)
|
|
setMotion: 0
|
|
cel: 0
|
|
setCycle: End self
|
|
)
|
|
)
|
|
(1
|
|
(gEgo view: gGEgoView setCycle: Walk)
|
|
(= global204 0)
|
|
((Inv at: 14) loop: (+ ((Inv at: 14) loop?) 1))
|
|
(= global120 (Print 305 0 67 -1 10 88))
|
|
(Timer setReal: self 4)
|
|
)
|
|
(2
|
|
(proc0_21)
|
|
(Print 305 1)
|
|
(gEgo
|
|
viewer: gEgoViewer
|
|
baseSetter: gGEgoBaseSetter
|
|
script: gGEgoScript
|
|
)
|
|
(proc0_9)
|
|
(DisposeScript 305)
|
|
)
|
|
)
|
|
)
|
|
)
|