DECLARE FUNCTION DQBerror$ ()A STRING holding the last error message
With this DQBerror$, you do not need to check for every unsuccessfull result of your DQB function calls anymore: when something goes wrong, DQBerror$ automatically holds a short error message that explains what went wrong.
none
*****************************************************************************
' All integers for speed
DEFINT A-Z
'$INCLUDE:'DIRECTQB.BI'
' Let's initialize the library with one extra layer and one sound, but no EMS
IF DQBinit(1, 1, 0) THEN DQBclose: PRINT DQBerror$: END
' If we get here, no errors have occured
PRINT "DirectQB successfully initialized!"
' Ends program
DQBclose
*****************************************************************************