HPADÿÿ0|J— Bpƒx~^Ý4LžØ÷iŽa÷ B÷i÷iœŽah6H÷i÷iÔžf¬6 ‡©Å±handler help; begin go to pad "setup.hlp"; end; handler cancel; begin end; handler domenu(d); begin if d is not in "next,previous,first,last,back" then pass; end;ïžÅÖèÛ7setup.hlp *7*87next,previous,first,last,backXx/*B%5-Handler Select; Begin help; End; Òž57X  ï:*HFNž‡F1=Helpon1GGpÿ|ÚêâHandler Select; Begin answer "Aborting Setup prevents you from using some of the pads that come with HyperPAD. Are you sure you want to abort Setup?"; if it is not "Ok" then exit; go home; go to page 1; End; Òê7Aborting Setup prevents you from using some of the pads that come with HyperPAD. Are you sure you want to abort Setup?XXUOkX.*‹1*HGNˆžAbortueTOEXEC.BATD‡‡1‡GGpÿ‡OP@ Iž±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡!p‡È´špÿ‡fðr‚ HyperPAD 2.2¨ Brightbi‚l-Roberts & Co.‚‚± Setup DZœ—Ü ¢Ú•Ä‚ Upgrade to HPAD 2.0‚–Ä¿Ü‹³•—ß •³Û Š³Â³Û Š³Â³Û Š³Â³Û Š³Â³Û Š³Â³Û Š³Â³Û Š³Â³Û Š³Â³Û Š³Â³Û Š³Â³Û ŠÀÂÄÙÛ ‹ÄßÿÿÿÿÿŠÐp‚‡‡0ÿ‡ž‡–—p–€‹‡—––€‹‡Ä€‹‡Ä€‹‡Ä€‹‡Ä€‹‡Ä€‹‡Ä€‹‡Ä€‹‡Ä€‹‡Ä€‹‡Ä€‹‡Ä€Œ‡Ä€ÿ‡ÿ‡ÿ‡ÿ‡¹‡Ð0@/ Ë“Ýh€H¨žTSS When upgrading from HyperPAD 1.0 to HyperPAD 2.0, HyperPAD will attempt to copy the data contained in the Phone, Index, Note, and Home pads into the new pads. This procedure does not effect your old pads. Setup may not be able to complete this process if you have made modifications to the 1.0 pads (i.e., by adding or deleting fields).¹eumHandler Select; Begin go to the next page; for i = 1 to 4 do put empty into page field i; End; Òšu7<1 XXX4 6&X %X X1  XXX$Ïÿ*H‡#-€ž Continuen‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡pÿ‡mHXPhandler openPage; begin set the focus to page button "Continue"; end;éX7XContinueL h*a= ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿPre‚s ENTER to continueƒ.µÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿß % ” ¶ Û }‡€Hhžihh Type in the directory containing the HyperPAD 1.0 files: Then, select one of the following buttons:P‡@ PhoneDone‡±‡±‡±‡±‡±‡Ü‡Ü‡Ü‡Ü‡Ü‡Ü‡B p‡Tžÿÿpÿ‡P‡@IndexDone‡±‡±‡±‡±‡±‡Ü‡Ü‡Ü‡Ü‡Ü‡Ü‡B p‡Üžÿÿpÿ‡P‡@"HomeDone‡±‡±‡±‡±‡±‡Ü‡Ü‡Ü‡Ü‡Ü‡Ü‡B p‡žÿÿpÿ‡‡h‡ðžC:\HPADP‡@$*NoteDone‡±‡±‡±‡±‡±‡Ü‡Ü‡Ü‡Ü‡Ü‡Ü‡B p‡žÿÿpÿ‡Î @PHhandler select; begin put getName("phone") into oldName; push this page; set the lockMessages to true; go to pad oldname; if not checkFieldNames("Address,Name,Notes,Phone") then exit; put the number of pages into numPages; for i = 1 to numPages do begin go to page i of pad oldname; put field "Name" into _name; put field "Address" into _address; put field "Notes" into _notes; put field "Phone" into _phone; go to the last page of pad "phone"; send "doMenu" "New Page" to hyperPAD; put the first word of _name into field "First Name"; put the last word of _name into field "Last Name"; put line 1 of _phone into field "Home Phone"; put line 2 of _phone into field "Work Phone"; put line 3 of _phone into field "Fax Phone"; get the last line of _address; put the last word of it into field "Zip"; delete the last word of it; if (the number of items of it) > 1 then begin put trim(item 1 of it) into field "City"; put trim(item 2 of it) into field "State"; end else begin put the last word of it into field "State"; delete the last word of it; put trim(it) into field "City"; end; delete the last line of _address; put substitute(_address,return,space) into field "address"; if _notes is not empty then begin send "select" to background button "4-Note"; put _notes into field "Note"; end; end; pop page; allDone "phone"; end;ÒžP7phone  getname;: XXX`]X Ý  P  Address,Name,Notes,Phone  checkfieldnames;:y*B XXX1 XXX  6Ñ “ ’XName&## XXXXAddress&## XXXXNotes&## XXXXPhone&## XXXphone“B’New PagedoMenuX‰ XI XFirst Name&X X Xl——? XLast Name&X X X1XHome Phone&X X X2XWork Phone&X X X3XFax Phone&X X Xl——AXXXXXXl——? XZip&X XXXl——? W1X@3NXX1   6:XCity&X XXX2   6:XState&X X$WXXl——? XState&X XXXl——? WX   6:XCity&X X Xl——A W     P:Xaddress&X X .-selectX4-NoteM ‰ XNote&X X1  XXX$#ý^phone  alldone;:*H‡  ž÷Phonetton‡‡‡‡‡‡‡‡‡‡‡‡1‡00pÿ‡26¢²ªhandler select; begin put getName("index") into oldName; push this page; set the lockMessages to true; go to pad oldname; if not checkFieldNames("Index Title,Notes,Date") then exit; put the number of pages into numPages; for i = 1 to numPages do begin go to page i of pad oldname; put field "Index Title" into _title; put field "Notes" into _notes; put field "Date" into _date; go to the last page of pad "index"; send "doMenu" "New Page" to hyperPAD; put _title into field "Title"; put _notes into field "Text"; put _date into field "Last Revised"; end; pop page; allDone "index"; end;Òž²7index  getname;: XXX`]X Ý  P  Index Title,Notes,Date  checkfieldnames;:y*B XXX1 XXX  6Õ “ ’XIndex Title&## XXXXNotes&## XXXXDate&## XXXindex“B’New PagedoMenuX‰ XTitle&X X XText&X X XLast Revised&X X1  XXX$ÿ^index  alldone;:*H‡ œžIndextton‡‡‡‡‡‡‡‡‡‡‡‡1‡00pÿ‡®6brjhandler select; begin put getName("home") into oldName; push this page; set the lockMessages to true; go to pad oldname; put the number of page buttons into numBtns; put empty into descriptions; put empty into infos; for i = 1 to numBtns do begin get line 3 of the script of page button i; if word 1 of it is "run" and char 1 of word 2 of it is quote then begin put the name of page button i after the last line of descriptions; delete word 1 of it; set the delimiter to quote; put item 2 of it into pname; set the delimiter to ","; put pname into cmdLine; delete word 1 of cmdLine; put "programdirectory" is in it into pdir; put word 1 of pname & ",,," & trim(cmdLine) & ",," & pdir after the last line of infos; end; end; go to the first page of pad "run"; put descriptions after the last line of field "Programs"; put infos after the last line of field "Program Info"; send "sortprograms" to this page; pop page; allDone "home"; end;Òžr7 home  getname;: XXX`]X Ý  P  XD XXX XXX XXX1 XXX  6;X L  ZcX3XXXXXX2 1+runXX1 +1ãX L  Xc Xl——A  XX1 WX è  PXX2 XXXX è , P  XXX X1 WXprogramdirectoryw XXX ,,    6:,,, X1 ,,,, Xl——A  1  XXX$¹þrun“ ’ XPrograms&Xl——A   XProgram Info&Xl——A  sortprograms` ‰^home  alldone;:*H‡ "pžHometton‡‡‡‡‡‡‡‡‡‡‡‡1‡00pÿ‡pHp{HXPhandler closeField; begin put fullName(the value of me) into me; end;ÖžX7fg Ê c   a:fX X*P G ÀŸ%HyperPAD 1.0 PathÕè&ëPždpÜÀÿÿpÿpHpˆ6;KChandler select; begin put getName("note") into oldName; push this page; set the lockMessages to true; go to pad oldname; if not checkFieldNames("Left Page,Right Page") then exit; put the number of pages into numPages; for i = 1 to numPages do begin go to page i of pad oldname; put field "Left Page" into lpage; put field "Right Page" into rpage; go to the last page of pad "note"; send "doMenu" "New Page" to hyperPAD; put lpage & return & rpage into field "Note"; end; pop page; allDone "note"; end;ÒžK7note  getname;: XXX`]X Ý  P  Left Page,Right Page  checkfieldnames;:y*B XXX1 XXX  6– “ ’XLeft Page&## XXXXRight Page&## XXXnote“B’New PagedoMenuX‰  ,,XNote&X X1  XXX$^ÿ^note  alldone;:*H‡$ *§š„&Notetton‡‡‡‡‡‡‡‡‡‡‡‡1‡00pÿ‡pHp¬6ƒ“‹handler select; begin get page field id 4; if the last char of it is not "\" then put "\" after it; checkName it & "phone.pad"; checkName it & "index.pad"; checkName it & "home.pad"; checkName it & "note.pad"; send "select" to page button "Phone"; send "select" to page button "Index"; send "select" to page button "Home"; send "select" to page button "Note"; end;Òž“7X4'##XXXX\XXl——>. \XXX phone.padX,  checkname;:index.padX,  checkname;:home.padX,  checkname;:note.padX,  checkname;:selectXPhoneL ‰selectXIndexL ‰selectXHomeL ‰selectXNoteL ‰*H‡9 Cˆµšn*All Padsn‡‡‡‡‡‡‡‡‡‡‡‡1‡00pÿ‡pHpšgwoHandler Select; Begin go to pg id 40 of pad "setup"; set the focus to pg button "Continue"; End; Òžw7setup“40’XContinueL h*H‡ #-¸ž|-Continuen‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡pÿ‡™‡ÇïÏhandler openPage; begin set the focus to page field id 4; end; function checkFieldNames(fieldNames); begin put the number of background fields into numFields; get ""; for i = 1 to numFields do put (the name of field i) & "" after it; put the number of items of fieldNames into n; for i = 1 to n do if "" & item i of fieldNames & "" is not in it then begin answer "Unable to import data from modified pad." with "Ok"; pop page; return false; exit; end; return true; end; handler checkName(padName); begin if fileExists(padName) then exit; answer "Can't find" && padName with "Ok"; exit to hyperPAD; end; function getName(padName); begin if page field padName is "DONE" then exit to hyperPAD; get page field id 4; if the last char of it is not "\" then put "\" after it; get it & padName & ".pad"; checkName it; return it; end; handler allDone(padName); begin set the lockMessages to false; put "DONE" into page field padName; put "done" into d; if page field "note" is d and page field "phone" is d and page field "home" is d and page field "index" is d then send "select" to page button "continue"; end;éžï(€‚ý)€*€‚R+€í7X4' h*$checkfieldnames87XE XXX XXX1 XXX  61X &  Xc, XX 1  XXX$ÃÿX@ XXX1 XXX  6k XX ,,x<OkUnable to import data from modified pad.  U^9*1  XXX$‰ÿ9*$ checkname87X   ;:*OkXCan't find-  U0**$ getname87DONEXX%##+0*X4'## XXX\ Xl——>.\ XX .padX ,, XXX   checkname;: 9*$ alldone87X Ý PDONEXX%X Xdone XXX Xindex%##+ Xhome%##+ Xphone%##+ Xnote%##+111selectXcontinueL ‰*­‰ ÿÿŽ‚ Upgrade to HPAD 2.0ÿÿ™Ú¾Ä¿³¾³À¾ÄÙÿÿÿÿÿÿÿÿñPre‚s, TAB to highlight a pad to upgrade, then pre‚s ENTER.•ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿßU b.ý5 ‘ã5‡¥ÇE?%‰%&n&*X*-f-.