HPAD Mÿÿ0|JEwB…x~^Ý4”£šd÷iŽa àI‡.>6handler cancel; begin go to pad "pad"; end;ž>7pad *K‡4D<Handler Select; Begin go to previous page; End; ÒžD7=*H$'žÇw Button‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡1‡GGpÿ‡OG‡0@8Handler Select; Begin go to next page; End; Òž@7<*H),Øž^w Button‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡1‡GGpÿ‡O>‡(80Handler Select; Begin go home; End; Òž87‹*HIOèžñHomeutton‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡1‡GGpÿ‡OP DText‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡%pp‡´žpÿ‡P DTitle±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡$pp‡hÀpÿ‡¢‡îþöHandler Select; Begin answer "Sort index card according to:" with "Title","Note Text","Cancel"; case it of "Title" : sort by word 1 of field "Title"; "Note Text" : sort by word 1 of field "Text"; otherwise:; end; End; Òžþ7CancelNote TextTitleSort index card according to: XUX$$WTitle+ YXTitle&##X1 Z$ÓÿNote Text+ YXText&##X1 Z$¦ÿ*Høž1-Sorton‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡1 ‡Gp‡1xU‡]sehandler seperator(w); begin print "+"; print repchar(w - 2,"-"); print "+" & return; end; Handler Select; Begin answer "Print this index card?"; if it is not "Ok" then exit; set the printer to on; show button id 12; put 60 into wid; print "+"; print repchar(wid - 2,"-"); print "+" & return; get field "title"; print "| " & it; print repchar(wid - 3- length(it)," "); print "|" & return; seperator wid; print "| "; put "Index Card #" && the currentpage into st1; get field "Last Revised"; convert it to long date; put "Revised on" && it into st2; print st1; print repchar(wid - (length(st1) + length(st2) + 4)," "); print st2; print " |" & return; seperator wid; put field "text" into notes; put the number of lines of notes into numlines; for i = 1 to numlines do begin get "| " & line i of notes; print it; print repchar(wid - (length(it) + 1)," "); print "|" & return; end; print "+"; print repchar(wid - 2,"-"); print "+" & return & return; set the printer to off; hide button id 12; beep 2; End;*€šsÒ¯$ seperator87+}2X -   Z:} +,}*7Print this index card?XXUOkX.*X Ñ ‚à PX12O  *R P60 XXX+}2  -   Z:} +,}Xtitle&##XXXXX| ,}X   :3     Z:} |,}   seperator;:| }X  7:Index Card #- XXXXLast Revised&##XXXXXXXŠXRevised on- XXX }4    :    :     Z:} }  |,}   seperator;:Xtext&## XXX A XXX1 XXX  6b X | ,XXXXX}1X   :     Z:} |,}1  XXX$’ÿ+}2  -   Z:} +,,}X Ñ ‚ß PX12O  *S P2   ð:*Hàiš 3-Printn‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡1 ‡Gp‡3zP@;ELast Revised‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡$p‡Äž‡ÿ‡‹‡ü Handler Select; Begin global lastfind; ask "Find what?" with lastfind; if it is not empty then begin put it into lastfind; find part it; if the result is "not found" then answer "Can't find ^"" & it & "^"." with "Ok"; end; End; Òž 7lastfindFind what? XTX.TXlastfindXXXX X knot foundX  :+ Ok".XCan't find ",, XU*H  „Sœ2-Findn‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡1 ‡Gp‡2yH  9Printing is progress...±‡±‡±‡±‡±‡5‡GGpÿ‡B‡%5-Handler Select; Begin help; End; Òž57X  ï:*H FNJš!F1=Helpon‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡1‡GGpÿ‡OD‡'7/Handler Select; Begin cancel; End; Òž77X  :*HCGž¯¼eutton‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡±‡1‡GGpÿ‡Oz@hHhandler openpage; begin global text_copy,title_copy; put field "title" into title_copy; put field "text" into text_copy; hide button id 12; end; handler closepage; begin global text_copy,title_copy; if (field "text" is not text_copy) or (field "title" is not title_copy) then put the date into field "Last Revised"; end; handler openpad; begin set the focus to field "title"; pass; end; handler help; begin go to pg id 5 of pad "index.hlp"; end; handler newpage; begin put the date into field "last revised"; set the focus to field "title"; end;éžhê¾ä€ï1àG7Xtitle&##title_copyXXXXtext&##text_copyXXXX12O  *S P*7title_copyXtitle&##.text_copyXtext&##.2!X  :XLast Revised&X X*7Xtitle& h/*7index.hlp“5’*7X  :Xlast revised&X XXtitle& h*ˆ‚ HyperPAD 2.2¨ Brightbi‚l-Roberts & Co.‚‚± Index Cards Á±ÿ–ÜÏÛ “ºÄÛ “º_Û “º_Û “º_Û “º_Û “º_Û “º_Û “º_Û “º_Û “º_Û “º_Û “º_Û “º_Û ÎÛ‚ ’¼ßŠ ÿÿÃUse TAB to highlight a bu‚t on or field, F2 to edit a field.”Ðp‚‡0ÿ‡›‡¼p€‡€‘‡¼p€“‡pºtp€“‡¼p€“‡¼p€“‡¼p€“‡¼p€“‡¼p€“‡¼p€“‡¼p€“‡¼p€“‡¼p€“‡¼p€‡€‘‡¼p€‡€‘‡¼p€‡€‘‡¼p€‡€‘‡½€ÿ‡û‡ÐÐ0A@?» §1{Íà d®×eõ®T€ï°žš™‚ George Washington Thomas Jefferson Andrew Jackson Abraham Lincoln Teddy Roosevelt Herbert Hoover Franklin Delano Roosevelt Harry S Truman John F. Kennedy€ˆž Presidents€Àž12/8/89ÿÿˆ8Y€H€H€Hi£š7/20/90ÿÿ–¬Â