mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-09-09 15:10:18 +00:00
12 lines
172 B
QBasic
12 lines
172 B
QBasic
$CONSOLE:ONLY
|
|
OPTION _EXPLICIT
|
|
|
|
$UNSTABLE:MIDI
|
|
$MIDISOUNDFONT:"include/soundfont.sf3"
|
|
|
|
DIM h AS LONG: h = _SNDOPEN("2SKIPIX.mid")
|
|
|
|
PRINT "play time ="; _SNDLEN(h)
|
|
|
|
SYSTEM
|
|
|