62 lines
1.4 KiB
Plaintext
62 lines
1.4 KiB
Plaintext
ENTRY TESTSTART
|
|
[TESTSTART]{
|
|
song=loadSong("test.flac")
|
|
setFG(Color_Blue)
|
|
"Hello (Press Enter)"
|
|
-- print("PLAY SONG (1)")
|
|
-- print("MESSAGE (2)")
|
|
-- print("An Adventure (3)")
|
|
-- print("QUIT (4)")
|
|
fancy("left","PLAY SONG (1),MESSAGE (2),An Adventure (3),QUIT (4)")
|
|
::choice::
|
|
write("Choose: ")
|
|
choice=getInput()
|
|
if choice=="1" then JUMP("SONG")|SKIP(0)
|
|
if choice=="2" then JUMP("YO")|SKIP(0)
|
|
if choice=="4" then QUIT()|SKIP(0)
|
|
if choice=="3" then SKIP(2)|SKIP(0)
|
|
GOTO("choice")
|
|
"We are here now! Time for some fun..."
|
|
::name::
|
|
write("Please enter your name: ")
|
|
name=getInput()
|
|
ClearLine()
|
|
setCC()
|
|
if name=="" then GOTO("name")|SKIP(0)
|
|
print("So your name is $name$ huh...")
|
|
"I won't judge haha"
|
|
"Anyway let's get controls for that song"
|
|
print("Stop (s)")
|
|
print("Play (t)")
|
|
print("Pause (a)")
|
|
print("Resume (r)")
|
|
print("Quit (q)")
|
|
::control::
|
|
write("Choose: ")
|
|
choice=getInput()
|
|
if choice=="s" then STOP(song)|SKIP(0)
|
|
if choice=="t" then JUMP("PLAYS")|SKIP(0)
|
|
if choice=="a" then pauseSong(song)|SKIP(0)
|
|
if choice=="r" then resumeSong(song)|SKIP(0)
|
|
if choice=="q" then QUIT()|SKIP(0)
|
|
GOTO("control")
|
|
}
|
|
[ClearLine:function()]{
|
|
whiteOut()
|
|
setCC()
|
|
}
|
|
[PLAYS]{
|
|
pauseSong(song)
|
|
song=loadSong("test.flac")
|
|
playSong(song)
|
|
GOTO("control")
|
|
}
|
|
[SONG]{
|
|
playSong(song)
|
|
GOTO("choice")
|
|
}
|
|
[YO]{
|
|
"How are you doing?"
|
|
GOTO("choice")
|
|
}
|