From 991c2de75c4d8d78e135d38eae2dfbd09ac0573a Mon Sep 17 00:00:00 2001 From: Ian C Date: Tue, 29 Nov 2005 20:35:03 +0000 Subject: Implementing new special block code --- sounds.bmx | 22 +++++++++++++++++++--- 1 file changed, 19 insertions(+), 3 deletions(-) (limited to 'sounds.bmx') diff --git a/sounds.bmx b/sounds.bmx index b33ccec..51f37e7 100644 --- a/sounds.bmx +++ b/sounds.bmx @@ -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 -- cgit v1.2.3