home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga ACS 1997 #4
/
amigaacscoverdisc1997-041997.iso
/
w_acs_6'97
/
eagleplayer
/
installdata
/
arexxexamples.lha
/
EP_PlayPause.dopus
< prev
next >
Wrap
Text File
|
1993-10-05
|
445b
|
26 lines
/* Delitrackeransteuerung über Diropus (Play<->Pause)
(c) 1992 Henryk Richter
' = (alt)(ä)
*/
options results
if pos('rexx_EP',SHOW('Ports')) = 0 then do
address 'DOPUS.1'
toptext 'Eagleplayer-Port not found'
exit 0
end
address 'rexx_EP'
status g ply
if result=="yes" then do
pause
address 'DOPUS.1'
toptext 'Eagleplayer: Pause Playing'
end
else do
play
address 'DOPUS.1'
toptext 'Eagleplayer: Start Playing'
end
exit