mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-09-07 02:30:17 +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
|
||
|
|
|