HPADÿÿ0|JÉBó…æ¢g8žd—q@Ëf‡žÀ¦handler openpad; begin push recent; pop page into it; if "dial.pad" is not in it and not fromHelp() then push recent; pass; end; handler cancel; begin pop page; end; Handler Help; begin go to pg id 13 of pad "outgoing.hlp"; end; handler closePad; begin global running; if not running then exit; answer "Stopping the timer..." with "Ok"; send "select" to background button "4-Stop Timer"; end;äžÀóïùå7‘_XXXXX fromhelp;:yXdial.padx1‘/*7^*7outgoing.hlp“13’*7runningy*OkStopping the timer... XUselectX4-Stop TimerM ‰*P‡JTo‡±‡±‡±‡±‡±‡±‡±‡‡‡‡‡‡‡‡‡up‡Àÿ‡P‡JOfMs±‡±‡±‡±‡±‡±‡‡‡‡‡‡‡‡‡up‡ Àÿ‡P‡JPhone number‡±‡±‡‡‡‡‡‡‡‡‡5p‡žÿ‡P‡  LNotese±‡±‡±‡±‡±‡‡‡‡‡‡‡‡‡ pÿ‡ð¯šÿ‡>‡(80Handler Select; Begin go home; End; Òž87‹*H‡ IOTž, Homeutton‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡GGpÿ‡D‡'7/Handler Select; Begin cancel; End; Ò77X  :*H‡ CG\ž¶ ¼eutton‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡GGpÿ‡³6§·¯Handler Select; Begin answer "Ok to print this message log?"; if it is not "Ok" then exit; set the printer to on; show background button "Printing..."; set the lockscreen to true; put fld "to" into _to; put fld "of" into _of; put fld "Phone number" into phone; put fld "notes" into notes; push this page; go to page "outgoing" of pad "DPrint"; send "PrintOut" _to,_of,phone,notes to this page; end;Òš·7Ok to print this message log?XXUOkX.*X Ñ ‚à PXPrinting...M  *R PX " PXto&## XXXXof&## XXXXPhone number&## XXXXnotes&## XXX`]DPrint“outgoing’    PrintOut` ‰*H‡ p‹šF 1-Printon‡±‡±‡±‡‡‡‡‡‡‡‡‡1 ‡p‡1x6§·¯Handler Select; Begin get field "Phone Number"; go to pad "dial"; show button id 13; put it into fld "number to dial"; set the focus to button id 13; End; Òž·7XPhone Number&##XXXXdial X13O  *R PXXnumber to dial&X XX13O h*H‡  lžE 2-Dialon‡±‡±‡±‡‡‡‡‡‡‡‡‡1 ‡p‡2y[‡2B:Handler Select; Begin domenu "Previous"; End; ÒžB7Previous   è:*H‡#&tž©eutton‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡GGpÿ‡S‡.>6Handler Select; Begin domenu "next"; End; Òž>7next   è:*H‡),|žPeutton‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡GGpÿ‡)6O_Whandler select; begin global starttime,running; if running then exit; put "** CALL START ON" && date() && "at" && time() & return after the last line of field "Notes"; put seconds() into starttime; put true into running; set the insertpoint of field "Notes" to length(fld "Notes")+1; set the focus to field "Notes"; end;Òž_7running* X  :atX  :** CALL START ON---,XNotes&Xl——A  X  :starttimeXXXrunningXXXXNotes&  Í 1XNotes&##   : PXNotes& h*H‡Ôžï3-Start Timer±‡±‡‡‡‡‡‡‡‡‡1 ‡p‡3z×6-=5handler select; begin global running; if not running then exit; put false into running; put field "Elapsed Time" into t; put "** CALL STOPPED AFTER " after s; get (char 1 to 2 of t) * 1; if it > 0 then put it && "minutes," after s; put (char 4 to 5 of t) * 1 && "seconds" after s; put "Ok,Not In,No Answer,Will Call Back,Wrong Number,Try Later" into list; get popup(5,15,list); if it > 1 then put " (" & item it of list & ")" after s; put s after the last line of field "Notes"; put empty into field "Elapsed Time"; end;Òž=7runningy*runningXXXXElapsed Time&## XXX** CALL STOPPED AFTER XX 1 X21!XXXX0X3minutes,X- XX seconds1 X54!- XX Ok,Not In,No Answer,Will Call Back,Wrong Number,Try Later XXX515    O:XXXX1X3 ) XX (,, XX  XNotes&Xl——A  XElapsed Time&X X*H‡!,Œžd4-Stop Timer±‡±‡‡‡‡‡‡‡‡‡1 ‡p‡4{P‡@#Elapsed time‡±‡±‡‡‡‡‡‡‡‡‡5p‡,žÿ‡Y60@8handler select; begin domenu "new page"; end;Òž@7new page   è:*H‡ /3àžÙ5-New Stamp±‡±‡‡‡‡‡‡‡‡‡1 ‡p‡5|B‡%5-Handler Select; Begin help; End; Òž57X  ï:*H‡FNÔpš~F1=Helpon‡±‡±‡±‡‡‡‡‡‡‡‡‡1‡GGpÿ‡)6´Ä¼handler select; begin ask "Find what name?"; if it is empty then exit; find it in field "To"; if result() is "not found" then answer "Can't find ^"" & it & "^"."; end;ÒžÄ7Find what name?XXTX+*XXXTo&  knot foundX  :+".XCan't find ",,XXU*H‡ 6;ž 6-FindStamp±‡±‡‡‡‡‡‡‡‡‡1 ‡p‡6}H‡ 9Printing...±‡±‡±‡±‡±‡‡‡‡‡‡‡5‡GGpÿ‡+‡¼ÌÄhandler idle; begin global starttime,running; if not running then pass; get seconds() - starttime; convert it to long time; put char 4 to 8 of it into field "Elapsed Time"; end;çÌ7runningy/starttimeX  : XXXXXXXŠXX84XElapsed Time&X X*ÏM~‚ HyperPAD 2.2¨ Brightbi‚l-Roberts & Co.‚‚± Outgoing Me‚sage Log ¸±ÓÚÇĿ܆³Ç³Û†³Ç³Û†³Ç³Û†³Ç³Û†ÃœÄ[ Ca‚l History ]›Ä´Û†³Ç³Û†³Ç³Û†³Ç³Û†³Ç³Û†³Ç³Û†³Ç³Û†³Ç³Û†³Ç³Û†³Ç³Û†³Ç³Û†ÀÇÄÙÛ‡ÉßÿõSelect DIAL to place the ca‚l ; select START TIMER to begin ca‚l tracking. …Ðp‚‡–0ÿ‡Œ‡É€†‡É€†‡É€†‡É€†‡É€†‡0œ€†‡É€†‡É€†‡É€†‡É€†‡É€†‡É€†‡É€†‡É€†‡É€†‡É€†‡É€‡‡É€ÿ‡¤‡ÐÐ0U@Ëøä6ˆÚl ü û _¥=‡4Â7‡€H‡ôÀ John Smith-€HüÀBrightbill-Roberts & Co.#0€H0¼ž(315) 474-3400 €H€HC‡% Áÿÿ Ap•«