SannyBuilder.com Forums

Код скрипта:     
{$CLEO}
0000: NOP

:MUSIC
thread 'MUSIC'

:AUDIO
thread 'AUDIO'
wait 0
if
0AAB:  file_exists "CLEO\MP3\loading_theme2.wav"
jf @AUDIO_END
0AAC: $hMP3 = load_audiostream "CLEO\MP3\loading_theme2.wav"
0ABC: set_audiostream $hMP3 volume 1.0
0@ = 0

:AUDIO_1
wait 0
if
0@ == 0
then
    if
    0AB0:  key_pressed 49 // 1
    then
    0AAD: set_audiostream $hMP3 perform_action 1  // PLAY
    wait 250
    0@ = 1
    end
else
    if
    0AB0:  key_pressed 49 // 1
    then
    0AC0: loop_audiostream $hMP3 flag 0
    0AAD: set_audiostream $hMP3 perform_action 0  // STOP
    wait 250
    0@ = 0
    end
end
jump @AUDIO

:AUDIO_END
wait 0
end_thread