Files
TempleOS-Rijn/Apps/Psalmody/Examples/expedition.CPP
T
2018-09-08 21:46:22 +02:00

32 lines
1.6 KiB
C++

//8 has graphics
$SP,"",BI=1$
U0 Song()
{
Fs->task_end_cb=&SndTaskEndCB;
MusicSettingsRst;
music.tempo=2.5;
try {
while (!ScanKey) {
Play("3etCFC2qG3DsGDGD2qG3C2sG3D2G3D2G3D2G3D");
Play("etCFC2qG3DsGDGD2qG3C2sG3D2G3D2G3D2G3D");
Sprite($IB,"<star>",BI=1$);
"$$CM,0,8$$";
Play("2qG3EAEADFC",
" \0Off \0 \0to \0 \0yon\0der \0star.\n\0");
Play("2G3EAEADFC",
" \0Damn! \0 \0It's \0 \0ver\0y \0far.\n\0");
}
} catch
PutExcept;
Snd(0);
}
Song;
- Ž<;+