/* Clear.rexx */

options results; address MrMPEG

MUIA_List_Entries	= 0x80421654;	MUIV_List_Remove_Active	= -1

call Stop()
list ID SLIST ATTRS MUIA_List_Entries; entries = result
do i = 0 to entries - 1
  list ID SLIST REMOVE POS MUIV_List_Remove_Active
end
string ID FNAME CONTENT "No song is loaded."
text ID LCD LABEL "MrMIDI is also available from Aminet."
text ID ACTIV LABEL "\033b\033r  0"
setvar max 0
text ID MAX LABEL "\033b\033r  0"
setvar total_time '00:00:00'
text ID CURNT LABEL "\033b\033r00:00"
text ID TOTAL LABEL "\033b\033r00:00:00"
return