mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-07-06 18:40:23 +00:00
13 lines
172 B
QBasic
13 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
|
|
|