🚀 go-pugleaf

Checksum: 2370290716 (verify with brik -cv)
Submitted-by: Joel Miller <miller1@usacis.asn.net>
Posting-number: Volume 7, Issue 23
Archive-name: hkey.jm

BEGIN_DOC hkey.doc

HKEY.LIB v2.0       by Joel Miller


OVERVIEW:

     Here is a library which will let you assign stuff to your keys as
defaults.  If you are in USER MODE then any user key assignments
take precedence over your hard key assignments.

DETAILS:

     There are six commands in the library. They are -

1. ASNHKEYS - Make a hard key assignment.

   2:  item  - whatever you want to assign to the key
   1:  RC.P  - the RowColumn.Plane of the key
   ASNHKEYS [ENTER]


2. DELHKEYS - Delete 1 or more hard key assignments.

   1:  RC.P               to delete a single assignment
   DELHKEYS [ENTER]

   1:  { RC.P RC.P  ...}  to delete multiple assignments
   DELHKEYS [ENTER]

   1:  0                  to delete all assignments
   DELHKEYS [ENTER]


3. STOHKEYS - Store multiple assignments.

   1:  {  item1 RC.P item2 RC.P ...}
   STOHKEYS [ENTER]


4. RCLHKEYS - Recalls all current assignments in a list.

   RCLHKEYS [ENTER]  ---->  { item1 RC.P item2 RC.P ...}


5. HARDKEY  - Activate the hard keys.

6. DEFAULT  - Restore default keys.  [ON - C] will do this too.


All of the first four commands have the same syntax as the commands
used for the user keys assignments. You can read your user manual
for any syntax help if you need it.

The assignments are kept in a variable called 'HKEYS' in the
NULL directory.

Also note that just like the user keys, if you delete previously
assigned keys one by one, the variable used to store the assignments
will contain embedded EMPTY lists!! This is a waste of memory and can
be fixed by executing << RCLHKEYS 0 DELHKEYS STOHKEYS >> after deleting
the last assignment a key had.

PROBLEMS:

    Since I am using the AppMode, whenever you go into any menu that is
supposed to display a screen when entered ( like the I/O SETUP ), nothing is displayed.  The menu comes up OK but the you must hit REVIEW to get the info screen.  The problem lies within the menu definition which calls a 'review' routine.  The 'review' routine checks to see what modes the 48 is in and disables the automatic info screens.  I am open to suggestions for a fix.


IMPROVEMENTS TO v1.0:

    v1.0 did not allow you to disable the standard keys like you can through user mode.  It also did not handle a user mode 'SKEY' definition.
    This has been fixed in v2.0, you can now disable any standard key assignments in USER MODE by following the directions in the USER MANUAL.  Any 'SKEY' definition will produce a 'hardkey' definition or the default definition depending on whether or not you have done a hardkey assignment to that key.

END_DOC


BEGIN_ASC hkey.asc
%%HP: T(1)A(R)F(.); @ tasc v2.52 file
"04B20985003184B4549502A384162746B4569737026723E20331973410000000
010100A5400E4A202F0000000000000000000000000000000007300085000000
0000000000000000000000000000000000000F70007084142544B45495400704
454641455C445500801435E484B4549535000804454C484B4549535100803545
F484B4549535200802534C484B454953530045000440004300042000E8000080
00E4A20D2000F2000F50005010035100512007230063300A43008973000D9D20
FDE819FF30D9D202AC1429E20973700B2130B21308973100D9D20ECE819FF30D
9D20AAB367F816D9D209E55079E6084E205084B454953587046B21302AC149E5
50CAF0629E20973700B213012040D9D20FA450DBC363C370F28155233029E209
7310043370B2130B21308973200D9D20ECE8112040D9D20FA450DBC36300407F
E30B9F063C37029E2097300043370B2130B21308973300D9D2079E6084E20508
4B454953532046DA9169E550D12367F8169E5509E550322308943611436C9B26
D1236A2170D9D208943611436C9B26D123685A16D9D20BCE26AF250852701227
029D14AF250CAF06B213043370B21306643644230B21308973400D9D2079E60D
9D20D9D20D8A14DA9160CA30CA130F3F1433BF38DA16D9D208813079E60D6E20
4035B4549579B302C23079E6084E204035B45495916368DA16C01267BE26B213
0D9D2057FF30191621EF30CA30B2130B21303991618A3079E6084E205084B454
953532046DA916D9D20852300CA30B213033BF3B2130D5D8333D8383C8390D83
B21308973500D9D2085C8371D83B2130D9D20119209730090770B2130D9D2079
E6084E205084B454953532046A21709E550D1236CB916D9D20A3B463C3708813
04337044B4695450B213088130C1216C9B26D1236CB916D9D209BC269BC26881
30B204095450B21308DF061003600CD1CAF0600CD179E6084E205084B4549535
87046B213081E0FF9D"
END_ASC

BYTES: #D9FFh 711

BEGIN_UU hkey.uue
begin 644 hkey
M2%!(4#0X+4)`*Y!8`!-(2T59(#I(87)D2V5Y<R!V,BXP$WE#`0```!`0`%H$
MX*0"\@````````````````````!P`P!8````````````````````````````
M\`<`!TA!4D1+15D$<$!49!14Q415``A!4TY(2T594P"`0%3$A+14E#45``A3
M5$](2T594P*`(#7$A+14E#4U`%0`0`0`-`!``@".```(`$XJT`(`+P#P!0`%
M`3`5`!4"<#(`-@.@-`"8-P#0V0+?CI'_`YTM(,I!DBZ0-P>P$@,K,8!Y$P"=
M+>#L&/D_T-D"JCMVCV&=+9!>!9=N@.0"!4A+15E3>$"V$@.B')1>!:P/)ND"
M>7,`*S$0`@2=+?!*!;T\-CP'+QA5,@.2+I`W`4`S!RLQL!(#F#<"T-D"SHX1
M`@2=+?!*!;T\-@`$]SZP^6##<R#I`GD#`#1SL!(#*S&`>3,`G2UPZ09(+E"`
MM%24-34"9*T9EEX%'3)VCV'I59!>!2,R@$EC$33&N6(=,J82!YTM@$EC$33&
MN6(=,H:E89TML.QB^E*`)0<A<B#90?I2P/I@*S%`,P<K,6!&8T0RL!(#F#<$
MT-D"EV[0V0*=+="H0:T9!JP#K#'P\T$S^X.M89TM@!@#EV[0Y@($4TM%69<[
M("P#EVZ`Y`($4TM%61DVAJUA#"%VZV(K,=#9`G7_`Y%A$OX#K`,K,;`2`Y,9
M%J@#EVZ`Y`(%2$M%65,C0-::89TM@"4#P#JP$@,S^[,2`UV-,],X.(R3T#@K
M,8!Y4P"=+8#%.!>-LQ(#G2T0D0)Y`Y!P!RLQT-D"EVZ`Y`(%2$M%65,C0*82
M!^E5T"%CO!G6V0(Z2S8\!X@Q0#,'1$N6104K,8`8`QP2QKEB'3+&FV&=+9#+
L8KDLAA@#*T"0104K,8#]8`$P!L`=K`\&P!V7;H#D`@5(2T594WA`MA(#&`X#
`
end
sum -r/size 52672/1013 section (from "begin" to "end")
sum -r/size 5541/719 entire input file
END_UU