Hi
Long story short - i lost most s/w including registered SID2 (Tim Martin) and all i have left is a bunch of scripts created by my old friend "PJ" in the early 1990's, ive long since lost contact with him. While i was creating music and graphics he was busy learning DOS/ARexx and would often supply a disk with a script and a few files for SID, i would add them to a SID button and Hey Presto - stuff would happen!
Without SID these scripts are fairly useless so i want to start modifying them for use with the Dos command "Requestfile".
Below is a simple(ish) script he wrote to open a requester and give more options to the "READ" button in SID. Through the art of Black Magic or other dark force SID would pass the selected file into the script as "" and launch the "" with the selected program from the requester.
What i want to do is replace SID with Requestfile but i have no idea where to start, how can i get the selected file from Requestfile into this script?
.key file
;$VER: SID_READ GUI
failat 9999
;- Setup Programs & Paths
Set Read="Run SYS:tools/cli/PPMORE"
Set PlusEd="Run SYS:tools/PlusED"
Set GoCed="Rx SS:Ced.rexx"
Set IDEdit="EDIZ_TXT"
;-End Setup
Lab start
Set req=`Requestchoice "SID_READ GUI" "Select program to read*N" "ASCII" "FILEID" "ANSI" "EDIT" "ADD2PLUG" "EXIT"`
if $req eq "0"
Skip Exit
endif
if $req eq "1"
$Read ""
endif
if $req eq "2"
$IDEDIT ""
endif
if $req eq "3"
$PlusEd ""
if $req eq "4"
$GoCed ""
endif
if $req eq "5"
Search SS:EDIZ_LHA_Plugs ""
if warn
Echo >>SS:EDIZ_LHA_Plugs ""
endif
endif
;skip back start
Lab
Thanks