### 4/19/83 KPHRASE 2.20 cl *** ËÅÙÐÈÒÁÓÅ ÍÁÃÒÏÆÅÁÔÕÒÅ *** KPHRASE allows you to code a number of commonly used phrases and place them in independent hold buffers. In the edit mode, these phrases can be inserted in text by typing the appropriate keycode. Key phrases may be up to 75 characters long and must be identified by a single alphanumeric character. You may have a maximum of 40 phrases which may contain any keyboard characters. The keycodes and keyphrases may be in a disk file or on your screen at the time you execute Kphrase. You may wish to save a version of Kphrase with a set of your phrases already installed. When Kphrase asks you 'DO YOU WANT TO SAVE THE CONFIGURED KEY PHRASES (Y/N)', answer 'Y' and give a filename such as SAVEKEYP.WPM. The file KEYS.A can be used as a demonstration file for Kphrase. # :ss100 :cp :pr "#0/#6/#13/Åîôåò ëåùãïäå (DEL to list,RET to edit): #6/" :cm :rk %2 :on %2-16 / 500 / :on %2-13 /+2 / /+2 :pr "#0/#6/#13/#6/" :ee 3 :on %2-6 42 / 42 :oe 2 ;Reentry after list function :%A = "list.key" ro/%A/ :on $0 / /+2 / rd ho/%A/ :pr "#0/#13/#6/The key file: %A is not on your disk." :in :EE 3 :pr "#0/#13/Ëåù îïô äåæéîåä #6/" ;20 :ee 3 s//^/b/b ;23 :mc $2+1 :on ?-186 37 / 37 :mc $2-1 s/º// s/»// :on ?-32 36 36 / :%1=? :%1=%1-128 :sp %A %1 s/?/%A :%A="" :on -1 /-8 b ;36 b/s/^//sa/Þ/^/ ;37 b/s/^// :cp :ee 3 ; ; *42 %2%2%2%2%2%2%2%2%2%2%2%2%2%2%2%2%2%2%2 %2%2%2%2%2%2%2%2%2%2%2%2%2%2%2%2%2%2%2 %2%2%2%2%2%2%2%2%2%2%2%2%2%2%2%2%2%2%2 :on -1 20 ####$ :pr "#1/#13/Ãïîæéçõòéîç..." :ss 100 t/f1 :on ?-64 /+4 / /+4 :in "#0/#13/Filename of keyphrases and keycodes: #6/" %A ro/%A/ :on $0 /-3 /-3 / t/ri ;8 t/l79/s/<@@ :on $3-41 20 20 / D1000 :in "#1/#13/Åòòïò­­Ïöåò ´° ëåù ðèòáóåó. Ãïòòåãô áîä òåôòù ËÅÙÐÈÒÁÓÅ." AE :sl %A %1 ;20 was there a file? :on %1 /+2 /+2 / t/s/list.key/%A/ ;install filename in macro :on -1 30 ;if not, write out file from screen t/s/<@@ h0/h500 wo/list.key/ t/w/wd e/u/h0 t ;30 sl/¦ :on $2-1 / 31 / :on ?-13 /+5 / /+5 :on %3 /+2 /+2 / :%3=0 b0/s/=/=º/ f1 :on -1 31 :on ?-32 / 31 / :on $2 / / /+1 :on ?-64 / 67 / :on ?-60 /+2 / /+2 s/?/¼/ :on -1 63 :on ?-63 /+2 / /+2 s/?/¿/ :on -1 63 :on ?-37 /+2 / /+2 s/?/»¥/ :on -1 62 :on ?-92 /+2 / /+2 s/?/Ü/ :on -1 63 :on ?-94 /+2 / /+2 s/?/Þ/ :on -1 63 :on ?-47 /+2 / /+2 s/?/¯/ :on -1 63 :on ?-59 65 / 65 s/?/»»/ :%3=1 ;62 :mc $2-1 ;63 :on -1 31 s//\\\\/ ;65 :on -1 31 :pr "#0/#13/Keyphrase - beginning to self-configure #6/" :pr "" t ;69 sl/< :on ?-13 /+1 / /+1 :on $2-75 80 80 / b0 :cm :cp :pr "#0/#3/Åòòïò éî Ëåù Ðèòáóå Æïòíáô­ Ãïòòåãô, ôèåî èéô Ãïîôéîõå #6/" :cm :pr "#13/#7/#2/" :ee 69 t ;80 :on ?-13 / 95 :%1=? :mc 2 :%A=!< b0/d1 e/b8 :on ?-13 /+1 / /+1 s/