; Dice
; ----
; A simple dice roller
;
setfont verdana,24,B
banner DICE
delay 15
banoff

:roll
random 6,A
banner %A,C|50,200|100
msgbox Dice,Click OK to roll again,1
ifmsg CANCEL,exit
goto roll


:exit