HPAD ÿÿ0|®J ½!DOS Commands L¹6°žšƒV'CHKDSKž[‰žôˆ‰`‰@ % `‰ˆ‰üo0BFORMATüoÊ L¹6°žšƒODISKCOPYüoÊ L¹6°žšƒ,TBACKUPüoÊ L¹6°žšƒÀeRESTOREüo¼ŸL¹6°žšƒ˜oCommand Line¤J¬T¬O6N† :xoptionsëa*£Lk(Xžü… !}Set time/dateFâ,°ž‡*Ÿ¾ ‡ò úhandler fixup(p); begin answer "Unable to locate" && p && ". Would you like to edit the path of your DOS programs?" with "Yes","No"; if it is "Yes" then go to page "Options"; exit to hyperpad; end; function getprogram(p); begin put p into t; get page field "where" of page "options"; if it is not empty then begin if the last char of it is not "\" then put "\" after it; put it before p; get p & ".COM"; if not FileExists(it) then begin get p & ".EXE"; if not FileExists(it) then fixup t; end; return it; exit; end; get findfile(p & ".COM"); if it is empty then begin get findfile(p & ".EXE"); if it is empty then fixup t; end; return it; end; function AskForDisk; begin put the drives into dlist; get the popup of 2,1,dlist; if it is 0 then exit to hyperpad; return item it of dlist; end; function AskForNRDisk; -- non-removable disk begin put the drives into dlist; put the number of items of dlist into n; put empty into list; for i = 1 to n do if not issubst(item i of dlist) then put item i of dlist after the last item of list; get popup(10,10,substitute(list,",",return)); if it is 0 then exit to hyperpad; return item it of list; end; handler GetDestination; begin set the lockscreen to true; go to pad "dostree"; set the check of button "Selecting" to true; set the focus to field "tree"; end; handler cancel; begin go to page "DOS Commands"; end; €ž  €‚¬ €‚þ €‚W€V © $fixup87NoYes. Would you like to edit the path of your DOS programs?XUnable to locate--  UYes + Options0**$ getprogram87X XXXoptionswhere%## XXX .›\ Xl——>.\ XX  XXX .COMX, XXX    ;:y8.EXEX, XXX    ;:y   fixup;: 9*.COMX,   ]: XXX +;.EXEX,   ]: XXX +   fixup;: 9*$ askfordisk7X  Y: XXX21    O:XXXX0X+0* XX9*$askfornrdisk7X  Y: XXX @ XXX XXX1 XXX  6^ X   issubst;:y( X  Xl——@  1  XXX$–ÿ1010 ,   P:   O:XXXX0X+0* XX9*$getdestination7X " Pdostree XSelectingM  Å  PXtree& h*7DOS Commands*.MZ. ÿÿÛ• ~…     , > F X Q´RÍ!&ŠG!.¢&Ä_.Œ.‰´0Í!<r.ÆXËU‹ì‹F=uR´0Í!<rJÄ^&Ä&ŠPXjZËU‹ìƒìƒ~t¸‹å]Ëÿv ÿvš‰Füÿvÿv š‰FþPÿvüèTƒÄëÏU‹ìƒìƒ~t¸‹å]Ëÿv ÿvš‰Fþÿvÿv š‰Fúÿvÿvš‰FüPÿvþÿvúè;ƒÄë¾U‹ìƒìÆFó-ŠFˆF÷ŠFˆFö°ˆFøˆFùFòPFòPšŠFò*ä‹å]ËU‹ìƒìÆFó+ŠFˆFøŠFˆFù‹F ‰FöFòPFòPšŠFò*ä‹å]Ë° étì :Tn¸ŽØºL´ Í!¸LÍ!VW¸ŽØ¾p¿pè#_^šËVW¸ŽØ¾p¿pè _^š Ë;÷sƒï‹ EtòÿëîÃ2ä.ÿ.ËËU‹ìVWÅ~‹‹]‹M‹U‹u‹} Í!WÅ~ ‰‰]‰M‰U‰uE r3öëšÅ~ ¾‹‰u _^‹å]Ëset_timeset_date@FFFFFFFFThis program requires HyperPAD. $ISSUBST@<DATETIMEl>(80Handler Select; Begin go home; End; Òž87‹*H‡IO\žÎHomeutton‡‡‡‡‡‡‡‡‡‡‡‡1‡GGpÿ‡U‡5E=Handler Select; Begin go to page "options"; End; ÒžE7options*H  žX1-Options1p1xD'7/Handler Select; Begin cancel; End; Òž77X  :*HCKDÂ7ùCancelton‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡1‡GGpÿ‡Oæe¶Æ¾Handler Select; Begin get environment("comspec"); if it is empty then get FindFile("COMMAND.COM"); if it is empty then begin get page field "where" of page "options"; if the last char of it is not "\" then put "\" after it; put "COMMAND.COM" after it; end; if not FileExists(it) then answer "Unable to locate COMMAND.COM. The location of this file must be included in your path." else run it; End;ÒžÆ7comspec   &:XXXXX+COMMAND.COM   ]:XXXXX+\optionswhere%##XXXX\XXl——>. \XXX COMMAND.COMXXX X   ;:y_Unable to locate COMMAND.COM. The location of this file must be included in your path.XXU$XXH*Hd 잉2-DOS Prompt for useit ðž1pt2yB%5-Handler Select; Begin help; End; Ò657X  ï:*H‡FNÜž»F1=Helpon‡‡‡‡‡‡‡‡‡‡‡‡1‡GGpÿ‡ 0ÔäÜhandler help; begin get the currentpage; case it of 1 : go to pg id 5 of pad "doscmd.hlp"; 2 : go to pg id 6 of pad "doscmd.hlp"; 3 : go to pg id 8 of pad "doscmd.hlp"; 4 : go to pg id 10 of pad "doscmd.hlp"; 5 : go to pg id 12 of pad "doscmd.hlp"; 6 : go to pg id 17 of pad "doscmd.hlp"; 7 : go to pg id 11 of pad "doscmd.hlp"; 8 : go to pg id 5 of pad "doscmd.hlp"; 9 : go to pg id 19 of pad "doscmd.hlp"; otherwise : exit; end; end;ïžä7X  7:XXXXX$$ 1+doscmd.hlp“5’$àÿ2+doscmd.hlp“6’$Ãÿ3+doscmd.hlp“8’$¦ÿ4+doscmd.hlp“10’$ˆÿ5+doscmd.hlp“12’$jÿ6+doscmd.hlp“17’$Lÿ7+doscmd.hlp“11’$.ÿ8+doscmd.hlp“5’$ÿ9+doscmd.hlp“19’$óþ**cåz‚ HyperPAD 2.2§ Brightbi‚l-Roberts & Co.‚‚± DOS Co‚mands À±ÓÚÈÄ¿Ü…³È³Û…³È³Û…³È³Û…³È³Û…³È³Û…³È³Û…³È³Û…³È³Û…³È³Û…³È³Û…³È³Û…³È³Û…³È³Û…³È³Û…³È³Û…ÀÈÄÙÛ†ÊßÿÿÄÐp‚‡Ž0ÿ‡”‡Ê€…‡Ê€…‡Ê€…‡Ê€…‡Ê€…‡Ê€…‡Ê€…‡Ê€…‡Ê€…‡Ê€…‡Ê€…‡Ê€…‡Ê€…‡Ê€…‡Ê€…‡Ê€…‡Ê€†‡Ê€ÿ‡£‡ÐÐ0%@IX  ¯?qÿJe0@8Handler Select; Begin go to page id 6; End; Òž@76*Hd %Ìžä!Check a diskuserlevelit ðž100pÿtJe0@8Handler Select; Begin go to page id 7; End; Òž@77*Hd % Hžz"Format a diskisk useit ðž100pÿtJr0@8Handler Select; Begin go to page id 4; End; Òž@74*Hd.IPž#Backup filesk for useit ðž100pÿtJe0@8Handler Select; Begin go to page id 8; End; Òž@78*Hd. I Xž¦#Restore files for useit ðž100pÿtLe1A9Handler Select; Begin go to page id 14; End; ÒžA714*Hd. IHž<$Set date and time useit ðž100pÿtWe6F>Handler Select; Begin go to page "DISKCOPY"; End; ÒF7DISKCOPY*Hd %LžÔ$Copy a disksime useit ðž100pÿtH @BKCoverttonÿÿŒž!pÿ_e:JBHandler Select; Begin go to page "Command Line"; End; Ò6J7Command Line*Hd %šÁ%Command linetime useit ðž100pÿt<‡&6.handler cancel; begin go home; end;ž67‹*ª‚$ô Index ÿÜ What DOS co‚mand do you want to do?ÿÿÿÿÿÿÿÿÿÿÿÿ”Use TAB to highlight a bu‚t on, then pre‚s ENTER.Ÿô‡0ÿÜ£ÿÿÿÿÿÿÿÿÿÿÿÿã1 l&ª&0"Æ"\#ò#Š$-%w%"&H % Write corrections to disk´pÿ‡H‡šC:P‡ Drive to check‡±‡‡‡‡‡‡‡‡‡400p‡Hžÿÿÿ‡#X÷ÿHandler Select; Begin get page field "Drive to check"; if it is empty then exit; get environment("comspec") && "/c" & getprogram("chkdsk") && it; if the check of page button id 2 then put " /F" after it; if the check of page button "Display Directories" then put " /V" after it; -- WARNING: can't redirect if correcting!!! if not the check of page button id 2 then put " >err" after it; run it; put "Unable to find CHKDSK.COM in your path" into page field "status"; End; Òž7XDrive to check%##XXXXX+*Xchkdsk  getprogram;:/ccomspec   &:-,-XXXXX2N  Å c /FXXX XDisplay DirectoriesL  Å c /VXXX X2N  Å cy >errXXX XXHUnable to find CHKDSK.COM in your pathXstatus%X X*H‡=A Â7>(Ok Button‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡GGpÿ‡˜Td\Handler Select; Begin put AskForNRDisk() into page field "Drive To Check"; End; Òd7X askfornrdisk;:XDrive To Check%X X*H‡ &\ž­+Pickutton‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡00pÿ‡#X÷ÿHandler Select; Begin get page field "Drive to check"; if it is empty then exit; get environment("comspec") && "/c" & getprogram("chkdsk") && it; if the check of page button id 2 then put " /F" after it; if the check of page button "Display Directories" then put " /V" after it; -- WARNING: can't redirect if correcting!!! if not the check of page button id 2 then put " >err" after it; run it; put "Unable to find CHKDSK.COM in your path" into page field "status"; End; Òž7XDrive to check%##XXXXX+*Xchkdsk  getprogram;:/ccomspec   &:-,-XXXXX2N  Å c /FXXX XDisplay DirectoriesL  Å c /VXXX X2N  Å cy >errXXX XXHUnable to find CHKDSK.COM in your pathXstatus%X X*H‡ =A°ž‘,Ok Button‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡GGpÿ‡#X÷ÿHandler Select; Begin get page field "Drive to check"; if it is empty then exit; get environment("comspec") && "/c" & getprogram("chkdsk") && it; if the check of page button id 2 then put " /F" after it; if the check of page button "Display Directories" then put " /V" after it; -- WARNING: can't redirect if correcting!!! if not the check of page button id 2 then put " >err" after it; run it; put "Unable to find CHKDSK.COM in your path" into page field "status"; End; Òž7XDrive to check%##XXXXX+*Xchkdsk  getprogram;:/ccomspec   &:-,-XXXXX2N  Å c /FXXX XDisplay DirectoriesL  Å c /VXXX X2N  Å cy >errXXX XXHUnable to find CHKDSK.COM in your pathXstatus%X X*H‡ =AÌž0Ok Button‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡GGpÿ‡#X÷ÿHandler Select; Begin get page field "Drive to check"; if it is empty then exit; get environment("comspec") && "/c" & getprogram("chkdsk") && it; if the check of page button id 2 then put " /F" after it; if the check of page button "Display Directories" then put " /V" after it; -- WARNING: can't redirect if correcting!!! if not the check of page button id 2 then put " >err" after it; run it; put "Unable to find CHKDSK.COM in your path" into page field "status"; End; Òž7XDrive to check%##XXXXX+*Xchkdsk  getprogram;:/ccomspec   &:-,-XXXXX2N  Å c /FXXX XDisplay DirectoriesL  Å c /VXXX X2N  Å cy >errXXX XXHUnable to find CHKDSK.COM in your pathXstatus%X X*H‡ =Aðžo3Ok Button‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡GGpÿ‡#X÷ÿHandler Select; Begin get page field "Drive to check"; if it is empty then exit; get environment("comspec") && "/c" & getprogram("chkdsk") && it; if the check of page button id 2 then put " /F" after it; if the check of page button "Display Directories" then put " /V" after it; -- WARNING: can't redirect if correcting!!! if not the check of page button id 2 then put " >err" after it; run it; put "Unable to find CHKDSK.COM in your path" into page field "status"; End; Òž7XDrive to check%##XXXXX+*Xchkdsk  getprogram;:/ccomspec   &:-,-XXXXX2N  Å c /FXXX XDisplay DirectoriesL  Å c /VXXX X2N  Å cy >errXXX XXHUnable to find CHKDSK.COM in your pathXstatus%X X*H‡ =AÜžÞ6Ok Button‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡GGpÿ‡#X÷ÿHandler Select; Begin get page field "Drive to check"; if it is empty then exit; get environment("comspec") && "/c" & getprogram("chkdsk") && it; if the check of page button id 2 then put " /F" after it; if the check of page button "Display Directories" then put " /V" after it; -- WARNING: can't redirect if correcting!!! if not the check of page button id 2 then put " >err" after it; run it; put "Unable to find CHKDSK.COM in your path" into page field "status"; End; Òž7XDrive to check%##XXXXX+*Xchkdsk  getprogram;:/ccomspec   &:-,-XXXXX2N  Å c /FXXX XDisplay DirectoriesL  Å c /VXXX X2N  Å cy >errXXX XXHUnable to find CHKDSK.COM in your pathXstatus%X X*H‡ =AØžM:Ok Button‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡GGpÿ‡GXjzrHandler Select; Begin get page field "Drive to check"; if it is empty then exit; get environment("comspec") && "/c" && getprogram("chkdsk") && it; if the check of page button id 2 then put " /F" after it; -- put " >err" after it; -- put it; exit; run it with pause; put "Unable to find CHKDSK.COM in your path" into page field "status"; End; Òžz7XDrive to check%##XXXXX+*Xchkdsk  getprogram;:/ccomspec   &:---XXXXX2N  Å c /FXXX X HUnable to find CHKDSK.COM in your pathXstatus%X X*H‡ =AÔž¼=Ok Button‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡GGpÿ‡‡˜® handler error; begin answer "Error checking disk." with "Ok"; exit to hyperPAD; end; handler resume; begin if result() is not 0 then error; end;€ž®ôß$error7OkError checking disk. XU0**70X  :. X error;:*Ý·"ñ Check a Disk ÿÇڢĿ¬³¢³¬³¢³¬³¢³¬³¢³¬³¢³¬³¢³¬³¢³¬³¢³¬À¢ÄÙÿÿÿÿÿÿÎPre‚s= TAB to highlight an option, ENTER to change, then select Ok.ñŽ0ÿÿÿÿÿÿÿÿÿÿÿÿÿÿß= O@QA ‰'Ó'ì'c+G,¶/%3”6:r=@‡H‡DžA:P‡ Drive to format±‡‡‡‡‡‡‡‡‡4p‡ôÀÿÿÿ‡€6K[SHandler Select; Begin put "A:" into page field "Drive to Format"; End; Òž[7A:XDrive to Format%X X*H‡#ÀÚBA: Button‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡00pÿ‡€K[SHandler Select; Begin put "B:" into page field "Drive to Format"; End; Ò[7B:XDrive to Format%X X*H‡%)`ž¦CB: Button‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡00pÿ‡Ô¼ÌÄHandler Select; Begin get page field "Drive to format"; if it is empty then exit; get getprogram("format") && it; if the check of page button "360K" then put " /4" after it else if the check of page button "720K" then put " /n:9 /t:80" after it; if the check of page button "Make disk bootable" then put " /S" after it; if the check of page button "Assign a volume label" then put " /V" after it; run it; End; ÒžÌ7XDrive to format%##XXXXX+*Xformat  getprogram;:-XXXXX360KL  Å c /4XXX $)X720KL  Å c /n:9 /t:80XXX XMake disk bootableL  Å c /SXXX XAssign a volume labelL  Å c /VXXX XXH*H‡=AøžrDOk Button‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡GGpÿ‡ù¤´¬Handler Select; Begin set the check of me to true; set the check of page button "720K" to false; set the check of page button "High Density" to false; End; Òž´7fg Å  PX720KL  Å PXHigh DensityL  Å P*H   ˆž’G360K corrections to disk´#pÿù¤´¬Handler Select; Begin set the check of me to true; set the check of page button "360K" to false; set the check of page button "High Density" to false; End; Òž´7fg Å  PX360KL  Å PXHigh DensityL  Å P*H   $ž×H720K corrections to disk´"pÿ霬¤Handler Select; Begin set the check of me to true; set the check of page button "360K" to false; set the check of page button "720K" to false; End; Òž¬7fg Å  PX360KL  Å PX720KL  Å P*H   4žJHigh densityions to disk´"pÿH # 8 Make disk bootableo disk´pÿH# ; Assign a volume labelisk´pÿ"‡@VHhandler openpage; begin set the visible of page button "B:" to "B:" is in the drives; end; handler resume; begin get result(); case it of 4 : answer "Fatal error; disk not formatted"; 6 : answer "Drive not ready; disk not formatted"; 7 : answer "Disk is write protected"; otherwise :; end; end;éVôx7XB:L  *X  Y:B:w P*7X  :XXXXX$$Œ4+(Fatal error; disk not formattedXXU$Íÿ6+,Drive not ready; disk not formattedXXU$™ÿ7+ Disk is write protectedXXU$qÿ*ûÕ"ð Format a Disk ÿÿÿ¼ Type of disk:ŒFormat options:§Ú’Ä¿…ڛĿš³’³…³›³š³’³…³›³š³’³…À›ÄÙšÀ’ÄÙÿÿÿÿÿÿÿ­Pre‚s: TAB to select an option, ENTER to change, then select Ok.ð0ÿÿÿÿÿÿÿÿÿÿÿÿÿÿß9 åK N oBˆB\C(DHGHÒIKQK›K‡H‡äžA:P‡+Source disk in±‡‡‡‡‡‡‡‡‡6p‡ žÿÿÿ‡˜Td\Handler Select; Begin put AskForNRDisk() into page field "Source disk in"; End; Òd7X askfornrdisk;:XSource disk in%X X*H‡-3 Â7¬OPickutton‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡00pÿ‡‡H‡ÈžA:P‡ + Target disk in±‡‡‡‡‡‡‡‡‡4p‡žÿÿÿ‡˜Td\Handler Select; Begin put AskForNRDisk() into page field "Target disk in"; End; Òd7X askfornrdisk;:XTarget disk in%X X*H‡- 3 lžûPPickutton‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡00pÿ‡¬aqiHandler Select; Begin run getprogram("diskcopy") && page field id 1 && page field id 3; End; Òžq7X3'##X1'##diskcopy  getprogram;:--XH*H‡=A Â7ßQOkkutton‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡GGpÿ‡À‡owhandler resume; begin if the result is 1 then answer "Unable to copy disk due to error." with "Ok"; end;ôž71X  :+-OkUnable to copy disk due to error. XU*‘k"ñ Copy a Disk ÿÿÿÿÿÿÿÿÿÿÿÿÿÿ‘:Specify the source and destination drives, then select Ok.•ñ0ÿÿÿÿÿÿÿÿÿÿÿÿÿÿà- ×R™SAOZOFPP©P•QRH{HXPhandler closeField; begin put fullName(the value of me) into me; end;ÖX7fg Ê c   a:fX X*PCÀqTBackup files fromFÈF’¢†<¢t00p ÀÿÿÿHPBackup files tomFÈF’¢†<¢400pØžÿÿÿZ6/?7Handler Select; Begin GetDestination; end; Ò?7X getdestination;:*H‡EKÄÀ¨UPickutton‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡00pÿ‡–6Sc[Handler Select; Begin put AskForDisk() into page field "Backup Files To"; End; Òc7X askfordisk;:XBackup Files To%X X*H‡$ÌÀNVPickutton‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡00pÿ‡H ' Include sub-directories±‡±‡±‡±‡±‡´‡pÿ‡H ' Backup only changed files±‡±‡±‡±‡´‡pÿ‡H ' Overwrite duplicate files±‡±‡±‡±‡´‡pÿ‡Óëóhandler baddest; begin answer "The drive letter to backup to is missing or invalid. Select Pick to choose from a list" with "Ok"; exit to hyperpad; end; Handler Select; Begin get page field id 2; if it is empty then baddest; get char 1 of it & ":"; if it is not in drives() then baddest; put getprogram("backup") && (page field id 1) && it into cmd; if the check of page button id 6 then put " /s" after cmd; if the check of page button id 7 then put " /m" after cmd; if not the check of page button id 8 then put " /a" after cmd; if the check of page button id 12 then put " /D:" & page field "date" after cmd; if the check of page button id 13 then put " /T:" & page field "time" after cmd; run cmd; End; €žÒv$ baddest7OkThe drive letter to backup to is missing or invalid. Select Pick to choose from a list XU0**7X2'##XXXXX+X baddest;::XX1,XXXXX  Y:XxX baddest;:XX1'##backup  getprogram;:-- XXXX6N  Å c /s XX X7N  Å c /m XX X8N  Å cy /a XX X12N  Å c Xdate%## /D:, XX X13N  Å c Xtime%## /T:, XX  XH*H =AžXOkkupton‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡1‡GGpÿ‡O HüÀ1-2-98P @!1datep files tomFÈF’¢†<¢4p žÿÿÿP!1timep files tomFÈF’¢†<¢4p<žÿÿÿ_ogHandler Select; Begin set the locktext of page field "date" to the check of me; pass; End;Òo7Xdate%  Efg Å c P/*H  %Äžî]Backup files since files±‡±‡±‡±‡´‡pÿ‡H_ogHandler Select; Begin set the locktext of page field "time" to the check of me; pass; End;Òo7Xtime%  Efg Å c P/*H  %´žß^Backup files since files±‡±‡±‡±‡´‡pÿ‡!jzrHandler Select; Begin put the directory into page field "backup files from"; put "A:" into page field "backup files to"; set the check of page button id 6 to true; set the check of page button id 8 to true; set the check of page button id 7 to false; set the check of page button id 12 to false; set the check of page button id 13 to false; End; Òz7X  #:Xbackup files from%X XA:Xbackup files to%X XX6N  Å  PX8N  Å  PX7N  Å PX12N  Å PX13N  Å P*HDžº_Set default±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡1‡00pÿ‡?´‹¡“handler resume; begin get the result; case it of 1 : answer "No files were located to backup" with "Ok"; 2 : answer "Some files not backed up due to sharing conflicts" with "Ok"; 4 : answer "Backup stopped due to error" with "Ok"; otherwise :; end; end; handler setdestination(dest); begin put dest into page field "Backup Files From"; set the focus to page button "Ok"; end;ô¡ €o7X  :XXXXX$$°1+.OkNo files were located to backup XU$Çÿ2+@OkSome files not backed up due to sharing conflicts XU$ÿ4+*OkBackup stopped due to error XU$Mÿ*$setdestination87XXBackup Files From%X XXOkL h*á»"ñ Backup Files ÿÿÿÿ‰„ Options:ă Ú©Ä¿¥³©³¥³©³¥³©³¥³©³¥³©³¥À©ÄÙÌ„ ÿÿÿÿÓUse TAB to move betw‚en fields, SPACE to to‚gle options, then select Ok.‡ñŽ0ÿÿÿÿÿÿÿÿÿÿÿÿÿÿßU 'bÝd [TîT@UVUVæV0WzWÄWã\-]J]œ]^É^p_ÝaH¬ÀA:PRestore files fromžšƒ400pD<žÿÿÿH°ÀC:\{›HXPhandler closeField; begin put fullName(the value of me) into me; end;ÖX7fg Ê c   a:fX X*PCXÀœfRestore files tomžšƒt00pDÀÿÿÿH ( Include subdirectoriesries‡‡‡°‡pÿ‡H ( Prompt before overwritings‡‡‡°‡pÿ‡œ6Vf^Handler Select; Begin put AskForDisk() into page field "Restore Files From"; End; Òf7X askfordisk;:XRestore Files From%X X*H‡!'<ÀÿgPickutton‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡00pÿ‡Z6/?7Handler Select; Begin GetDestination; end; Ò?7X getdestination;:*H‡EK€Â7çhPickutton‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡00pÿ‡D'7/Handler Select; Begin cancel; End; Òž77X  :*H CKìÀiCancelton‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡1‡GGpÿ‡OÊ'Handler Select; Begin get char 1 of page field id 1 & ":"; put " " & page field id 2 after it; if the check of page button id 3 then put " /S" after it; if the check of page button id 4 then put " /P" after it; get getprogram("restore") && it; run it; End; Òž'7:X1'##X1,XXXXX2'## ,XXX X3N  Å c /SXXX X4N  Å c /PXXX Xrestore  getprogram;:-XXXXXXH*H =AtžjOkkupton‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡1‡GGpÿ‡O´‡‹¡“handler resume; begin get the result; case it of 1 : answer "No files were located to restore" with "Ok"; 2 : answer "Some files not restored due to sharing conflicts" with "Ok"; 4 : answer "Restore stopped due to error" with "Ok"; otherwise :; end; end; handler setdestination(dest); begin put dest into page field "Restore Files To"; set the focus to page button "Ok"; end;ô¡€p7X  :XXXXX$$±1+/OkNo files were located to restore XU$Æÿ2+?OkSome files not restored due to sharing conflicts XU$ÿ4++OkRestore stopped due to error XU$Lÿ*$setdestination87XXRestore Files To%X XXOkL h*­‡"ð Restore Files ÿÿÿÿ‰ƒ Options:Æ‚ ÚŸÄ¿® ³Ÿ³® ³Ÿ³® ÀŸÄÙÿÿÿÿÿÿÿ (Specify restore options, then select Ok.§ð0ÿÿÿÿÿÿÿÿÿÿÿÿÿÿß9 3lén  f0f‚fgkgµghCiÓiékHP0`drive±‡±‡±‡±‡±‡±‡±‡±‡‡‡‡‡‡‡!p‡žÿÿpÿ‡Hþðøhandler keypress(k); begin get key(k); if it is "enter" then begin get the value of me; put it after the last line of page field "Previous Commands"; if the number of lines of page field "Previous Commands" > 20 then delete line 1 of page field "Previous Cmmands"; get environment("COMSPEC") && "/c" && it; if the check of page button id 6 then run it with programdirectory,pause else run it with programdirectory end; pass; end;æ687X   W: XXXenter +Ðfg Ê c XXX XPrevious Commands%Xl——A  20XPrevious Commands%##3A!XPrevious Cmmands%X1 W /cCOMSPEC   &:-- XXXX6N  Å c  H$  H/*P JTÀQpCommand LineXO6d00pLÀÿÿpÿHD¿ÏÇhandler select; begin get line (the currentline of me) of page field "Previous Commands"; put it into page field "Command Line"; send "keypress" 7181 to page field "Command Line"; end;ÒžÏ7XPrevious Commands%##Xf€g Ú cXXXXXXCommand Line%X X7181keypressXCommand Line% ‰*P *ž¹sPrevious Commands   WŒO6‘pøžÿÿÿRbZHandler Select; Begin send "keypress" 7181 to page field "Command Line"; End; Òžb77181keypressXCommand Line% ‰*H=AˆžQuOkkupton‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡1‡GGpÿ‡OH®#Wait for key after runnings%°pÿL\Thandler openPage; begin put the drive & ">" into page field "drive"; end;é6\7>X  !:,Xdrive%X X*C"ñ Co‚m and Line ÿÿ»ÏÀ„ÄType in the dos co‚mand,¸then select Ok.Á(e.g. Dir, Chkdsk)ÿAfter typing in several¹co‚mands you can select from´the list by hiliting the · desired co‚m and and pre‚sing´Enter.ÿÿÿÿÿòType is a DOS co‚m and, then pre‚s ENTER.§ñŽ0ÿÿÿÿÿÿÿÿÿÿÿÿÿÿß1 tvõv Óoéo;pQs£sÿtàu*v‡H‡{HXPhandler closeField; begin put fullName(the value of me) into me; end;ÖX7fg Ê c   a:fX X*P‡@àÀƒxWhereory for DOS files‡‡‡‡‡d00p‡€Àÿÿpÿ‡Z6/?7Handler Select; Begin GetDestination; end; Ò?7X getdestination;:*H‡DJ pžRyPickutton‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡00pÿ‡DX'7/Handler Select; Begin cancel; End; Òž77X  :*H‡=A|žøyOk Button‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡GGpÿ‡H‡@ 1-Options‡±‡±‡±‡±‡±‡‡‡‡‡‡‡‡pÿ‡ß‡Œ¢”handler setdestination(dest); begin put dest into page field "where"; end; handler openPage; begin set the focus to page field 1; end;€ž¢éÑ$setdestination87XXwhere%X X*7X1% h*lF"ó Options ÿÿ›%Directory to search for DOS programs:«Ú»Ä¿“³»³“À»ÄÙã‚ 0Leave this field blank if you want HyperPAD to l‚ok for programsŽ‚ @in your DOS path. Otherwise, type in the directory that containsŽ‚ your DOS programs.ÿÿÿÿÿÿÿ¯ASpecify the directory to locate DOS programs, then select Cancel.Žó‰0ÿÿÿÿÿÿÿÿÿÿÿÿÿÿâ% Òz³{mxy®y>zˆzP‡`'(ime‡±‡±‡±‡±‡±‡±‡‡‡‡‡‡‡‡‡"!00p‡@žÿÿpÿ‡P‡@*+‡±‡±‡±‡±‡±‡±‡±‡±‡‡‡‡‡‡‡‡‡"!00p‡Hžpÿ‡H ž23P‡`‡±‡±‡±‡±‡±‡±‡±‡±‡‡‡‡‡‡‡‡‡!00p‡Xžpÿ‡Hž59P‡`‡±‡±‡±‡±‡±‡±‡±‡±‡‡‡‡‡‡‡‡‡!00p‡Pžpÿ‡Hž5P‡`‡±‡±‡±‡±‡±‡±‡±‡±‡‡‡‡‡‡‡‡‡!00p‡\žpÿ‡hž4hž1992À‡ÅçÍHandler select; Begin global withmouse; put the mouse into mice; if withmouse and mice then exit; get pg fld 1; if it <= 22 then put it + 1 into pg fld 1; End; Handler mousestilldown; Begin get pg fld 1; if it <= 22 then put it + 1 into pg fld 1; End; handler mouseup; begin global withmouse; put true into withmouse; end; handler mousedown; begin global withmouse; put true into withmouse; wait 200; mousestilldown; end;Òžç×@ÐuÑ7X Ì c XXX withmouse1*X1%##XXXX22X61XX1%X X*7X1%##XXXX22X61XX1%X X*7withmouseXXX*7withmouseXXX200   ò:X  ×:*H‡ 0 3 Üž_w Button‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡00pÿ‡À‡ÅçÍHandler select; Begin global withmouse; put the mouse into mice; if withmouse and mice then exit; get pg fld 2; if it <= 58 then put it + 1 into pg fld 2; End; Handler mousestilldown; Begin get pg fld 2; if it <= 58 then put it + 1 into pg fld 2; End; handler mouseup; begin global withmouse; put true into withmouse; end; handler mousedown; begin global withmouse; put true into withmouse; wait 200; mousestilldown; end;Òžç×@ÐuÑ7X Ì c XXX withmouse1*X2%##XXXX58X61XX2%X X*7X2%##XXXX58X61XX2%X X*7withmouseXXX*7withmouseXXX200   ò:X  ×:*H‡ 0 3 äžk‚w Button‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡00pÿ‡PÃßËHandler Select; Begin date_ -1,2; End; handler mousedown; begin put 0 into c; while mousebutton() > 0 and c < 10 do add 1 to c; end; handler mousestilldown; begin select; wait 10; end;ÒžßÑú×571[2  date_;:*70 XXX10 50X  :311 XXXV$×ÿ*7X  Ò:10   ò:*H‡  ìžw…w Button‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡00pÿ‡NÂÞÊHandler Select; Begin date_ 1,2; End; handler mousedown; begin put 0 into c; while mousebutton() > 0 and c < 10 do add 1 to c; end; handler mousestilldown; begin select; wait 10; end;ÒžÞÑø×3712  date_;:*70 XXX10 50X  :311 XXXV$×ÿ*7X  Ò:10   ò:*H‡   ôž‡w Button‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡00pÿ‡¼ÃåËHandler select; Begin global withmouse; put the mouse into mice; if withmouse and mice then exit; get pg fld 1; if it >= 1 then put it - 1 into pg fld 1; End; Handler mousestilldown; Begin get pg fld 1; if it >= 1 then put it - 1 into pg fld 1; End; handler mouseup; begin global withmouse; put true into withmouse; end; handler mousedown; begin global withmouse; put true into withmouse; wait 200; mousestilldown; end;Òžå×=ÐqÑ‹7X Ì c XXX withmouse1*X1%##XXXX1X41X X1%X X*7X1%##XXXX1X41X X1%X X*7withmouseXXX*7withmouseXXX200   ò:X  ×:*H‡ # & üž­ˆw Button‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡00pÿ‡¼ÃåËHandler select; Begin global withmouse; put the mouse into mice; if withmouse and mice then exit; get pg fld 2; if it >= 1 then put it - 1 into pg fld 2; End; Handler mousestilldown; Begin get pg fld 2; if it >= 1 then put it - 1 into pg fld 2; End; handler mouseup; begin global withmouse; put true into withmouse; end; handler mousedown; begin global withmouse; put true into withmouse; wait 200; mousestilldown; end;Òžå×=ÐqÑ‹7X Ì c XXX withmouse1*X2%##XXXX1X41X X2%X X*7X2%##XXXX1X41X X2%X X*7withmouseXXX*7withmouseXXX200   ò:X  ×:*H‡# & žµ‹w Button‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡00pÿ‡PÃßËHandler Select; Begin date_ -1,1; End; handler mousedown; begin put 0 into c; while mousebutton() > 0 and c < 10 do add 1 to c; end; handler mousestilldown; begin select; wait 10; end;ÒžßÑú×571[1  date_;:*70 XXX10 50X  :311 XXXV$×ÿ*7X  Ò:10   ò:*H‡  ž½Žw Button‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡00pÿ‡NÂÞÊHandler Select; Begin date_ 1,1; End; handler mousedown; begin put 0 into c; while mousebutton() > 0 and c < 10 do add 1 to c; end; handler mousestilldown; begin select; wait 10; end;ÒžÞÑø×3711  date_;:*70 XXX10 50X  :311 XXXV$×ÿ*7X  Ò:10   ò:*H‡ žYw Button‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡00pÿ‡ŒàðèHandler Select; Begin answer "Are you sure to want to change your DOS date and time?"; if it is not "Ok" then exit; set_time pg fld id 4, pg fld id 5; set_date pg fld id 6, pg fld id 7, pg fld id 8; cancel; End; Òžð7Are you sure to want to change your DOS date and time?X£UOk£.*X§'##X§'##¨set_timeX§'##X§'##X§'##¨set_date¨*H‡.AÈžó‘Set date and time‡‡‡‡‡‡‡‡1‡GGpÿ‡PÃßËHandler Select; Begin date_ -1,3; End; handler mousedown; begin put 0 into c; while mousebutton() > 0 and c < 10 do add 1 to c; end; handler mousestilldown; begin select; wait 10; end;ÒžßÑú×571[3  date_;:*70 XXX10 50X  :311 XXXV$×ÿ*7X  Ò:10   ò:*H‡ $žË“w Button‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡00pÿ‡NÂÞÊHandler Select; Begin date_ 1,3; End; handler mousedown; begin put 0 into c; while mousebutton() > 0 and c < 10 do add 1 to c; end; handler mousestilldown; begin select; wait 10; end;ÒžÞÑøׇ3713  date_;:*70 XXX10 50X  :311 XXXV$×ÿ*7X  Ò:10   ò:*H‡  ,žg•w Button‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡00pÿ‡'H ž1992,5,4,23,59,2,2PH2holder change;:$.previous!p¸žÿÿpÿ D'7/Handler Select; Begin openPage; End;Òž77X  é:*H‡ tž|—Todaytton‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡00pÿ‡Q‡/K7handler openpage; begin get the seconds; convert it to dateitems; put it into pg fld "holder"; put item 1 of it into pg fld 5; put item 2 of it into pg fld 4; put item 3 of it into pg fld 3; put item 4 of it into pg fld id 4; put item 5 of it into pg fld id 5; end; handler date_(x,y); begin add x to item y of pg fld "holder"; convert pg fld "holder" to dateitems; put item 1 of pg fld "holder" into pg fld 5; put item 2 of pg fld "holder" into pg fld 4; put item 3 of pg fld "holder" into pg fld 3; end; Handler Change(x,y,z); Begin set the lockscreen to true; put field "_date" into tmp; convert tmp to dateitems; if x is 4 then add y to item 3 of tmp else begin put 1 into item 3 of tmp; add x to item y of tmp; end; convert tmp to date; put tmp into field "_date"; End;éžK€ö€¦7X  :XXXXXXXŠXXholder%X XXX1X5%X XXX2X4%X XXX3X3%X XXX4X4'X XXX5X5'X X*$date_87XXholder%X  XVXholder%X ŠXholder%##X1X5%X XXholder%##X2X4%X XXholder%##X3X3%X X*$change87X " PX_date&## XXX XXŠ4X+  X3 XV$(1 X3 XX X  XV XXŠ X_date&X X*ÉYlî Set Time and Date ÿÿ™ Set date:‘ Set time:¬Ú”Ä¿ƒÚ“Ä¿¢³‡/‚/‰³ƒ³… :0Š³¢³‡Days‰³ƒ³†Hoursˆ³¢³”³ƒ³“³¢³‡Months‡³ƒ³†Minutes†³¢³”³ƒ³“³¢³‡Yearsˆ³ƒ³“³¢³”³ƒ³“³¢À”ÄÙƒÀ“ÄÙÿÿÿÿÿñ Select the a‚row bu‚t8ons (,) to change the date and time, then select Save.‚î“0ÿÿ˜•†‰‹ –¸“‚¸“„¸“„¸“ƒ¹“ƒ¹“„¸“„¸˜Îƒÿÿÿÿÿÿ†q ˜_H}š}ì}~W~p~Â~Ú~,D!‚-…Ɇcˆk‹sŽ©‘“•·–—*——