Autor: Jurek Kowalski (jkowal_at_um.szczecin.pl)
Data: Mon 18 Jan 1999 - 17:38:46 MET
Grzegorz Szyszlo wrote:
> przy okazji pytanie za 100 punktow. ma ktos gotyw skrypt
> w REXX ktory by potrafil odpalic program z ikony ?
Funkcja wyciagnieta z dzialajacego skryptu:
----------------------------------
mks_vir:
parse upper arg d1 d2
call SysCreateObject 'WPProgram','MKS_VIR NET' d1 d2,'<WP_DESKTOP>',,
"EXENAME=R:\TOOLS\mks_vir.exe;PARAMETERS=" d1 d2 "/M /Z /I /R;"||,
"OBJECTID=<MKS_VIR>;SET DOS_AUTOEXEC=C:\a_0_mks.bat;"||,
"PROGTYPE=WINDOWEDVDM;STARTUPDIR=C:\WORK\AV\MKSVIR;OPEN=DEFAULT;"||,
"SET VIDEO_MODE_RESTRICTION=CGA ;"||,
"ICONFILE=c:\work\av\mksvir\mks_vir.ico"
do forever
call SysSleep 60
'go | grep " VDM ( MKS_VIR NET "'
if rc\=0 then leave
end
call SysDestroyObject '<MKS_VIR>'
return
----------------------------------
Cala zabawa ukrywa sie w opcji OPEN=DEFAULT :-)
Jesli juz znasz nazwe obiektu to mozesz go usunac (przed albo zaraz po)
albo odpalic z linii komend, czyli w rexxie:
'open "<MKS_VIR>"'
Wtedy tez nie musisz go cyklicznie tworzyc i niszczyc.
Open uzywany przeze mnie z 1993 (ftp://dawid.um.szczecin.pl/open.zip)
open najnowszy, nie sprawdzalem (ftp://dawid.um.szczecin.pl/open201.zip)
PS. Nie wiem jak w FC/2 odtworzyc Twoje zablokowanie pliku.
Ile razy copy nie chcialo brac pliku uzywalem cat plik > kopia.
-- | | \ | | | _| -_) | / \__/ \_,_|_| \___|_\_\
To archiwum zostało wygenerowane przez hypermail 2.1.7 : Tue 18 May 2004 - 15:20:22 MET DST