/* Stop.rexx */

options results; address MrMPEG

MUIA_Disabled		= 0x80423661;	MUIA_NoNotify		= 0x804237f9
MUIA_Selected		= 0x8042654b;	MUIA_Slider_Level	= 0x8042ae3a

image ID STOP ATTRS MUIA_Disabled 1
check ID PLAY
if result = 1 then do
  check ID PLAY ATTRS MUIA_Selected 0 MUIA_NoNotify 1
  setvar stopped 1
end
call setclip('MrMPEG_FLAG', 1)
address command 'Kill >NIL: MPEGA'
slider ID PROG ATTRS MUIA_Slider_Level 0
setvar current_time '00:00'
/* text ID CURNT LABEL "\033b\033r00:00" */
image ID STOP ATTRS MUIA_Disabled 0
return