diff options
| author | Ian C <ianc@noddybox.co.uk> | 2005-11-29 20:35:03 +0000 |
|---|---|---|
| committer | Ian C <ianc@noddybox.co.uk> | 2005-11-29 20:35:03 +0000 |
| commit | 991c2de75c4d8d78e135d38eae2dfbd09ac0573a (patch) | |
| tree | eb35adc13d226828db62a627788b66693ff516d3 /sounds.bmx | |
| parent | 44f5889373f05d53a94a052fedffbd7d6c0f21e0 (diff) | |
Implementing new special block code
Diffstat (limited to 'sounds.bmx')
| -rw-r--r-- | sounds.bmx | 22 |
1 files changed, 19 insertions, 3 deletions
@@ -14,22 +14,38 @@ Type Sound Global popsfx:TSound
Global clicksfx:TSound
Global pathsfx:TSound
+
+ Global play_pop:Int
+ Global play_click:Int
+ Global play_path:Int
Function Init()
popsfx=LoadSound("incbin::SFX/pop.wav")
clicksfx=LoadSound("incbin::SFX/click.wav")
pathsfx=LoadSound("incbin::SFX/path.wav")
+ play_pop=False
+ play_click=False
+ play_path=False
End Function
Function Pop()
- popsfx.Play()
+ play_pop=True
End Function
Function Click()
- clicksfx.Play()
+ play_click=True
End Function
Function Path()
- pathsfx.Play()
+ play_path=True
+ End Function
+
+ Function Process()
+ If play_pop Then popsfx.Play()
+ If play_click Then clicksfx.Play()
+ If play_path Then pathsfx.Play()
+ play_pop=False
+ play_click=False
+ play_path=False
End Function
End Type
|