home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Fresh Fish 4
/
FreshFish_May-June1994.bin
/
new
/
amigalibdisks
/
d994
/
jukebox
/
bwd.jb
< prev
next >
Wrap
Text File
|
1994-04-05
|
249b
|
16 lines
/* skip back to previous track */
/* (c) copyright 1992,93 by F.J. Reichert */
options results;
current track;
if result ~= 0 then do;
toset = result - 1;
if toset > 0 then do
set track toset;
end;
else do
set track 1;
end;
end;
exit(0);