40 lines
623 B
Plaintext
40 lines
623 B
Plaintext
Scriptname _00E_Gaboff_GrammophoneSC extends ObjectReference
|
|
|
|
Event OnUpdate()
|
|
|
|
bIsPlaying = False
|
|
|
|
EndEvent
|
|
|
|
Event OnActivate(ObjectReference akActionRef)
|
|
|
|
If !bIsPlaying
|
|
|
|
int iButton = _00E_Gaboff_GrammophoneMSG.Show()
|
|
|
|
if iButton == 0
|
|
|
|
bIsPlaying = True
|
|
PlayerREF.RemoveItem(Gold001, 5)
|
|
_00E_MUS_Special_OceansWidowM.Play(Self)
|
|
RegisterForSingleUpdate(160)
|
|
|
|
Else
|
|
|
|
Return
|
|
|
|
EndIf
|
|
|
|
EndIf
|
|
|
|
EndEvent
|
|
|
|
bool bIsPlaying
|
|
|
|
Actor Property PlayerREF Auto
|
|
|
|
MiscObject Property Gold001 Auto
|
|
|
|
Message Property _00E_Gaboff_GrammophoneMSG Auto
|
|
|
|
Sound Property _00E_MUS_Special_OceansWidowM Auto |