Path: utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!samsung!zaphod.mps.ohio-state.edu!rpi!crdgw1!sixhub!crdgw1.crd.ge.com!ibmbin-request From: ibmbin-request@crdgw1.crd.ge.com Newsgroups: comp.binaries.ibm.pc Subject: v08i115: gold, provide VT100 "gold" key (part 01/01) Summary: Turns caplock into the gold key for vt100 apps Message-ID: <2054@sixhub.UUCP> Date: 10 Oct 90 09:05:27 GMT Sender: davidsen@sixhub.UUCP Followup-To: comp.binaries.ibm.pc.d Lines: 198 Approved: davidsen@sixhub.UUCP X-Submissions-to: ibmbin@crdgw1.crd.ge.com X-Questions-to: ibmbin-request@crdgw1.crd.ge.com Checksum: 1431221205 (Verify with "brik -cv") Posting-number: Volume 08, Issue 115 Submitted-by: rde@ukc.ac.uk Archive-name: gold/part01 This is a small TSR that makes the NUM LOCK key on an enhanced keyboard work as the VTnnn GOLD key in MS-Kermit, instead of toggling NUM LOCK. Normally it transmits the scan code for F1, but this can be changed. The key interception can be turned on and off without unloading the TSR or rebooting. It does require enhanced keyboard support in the BIOS, but a lot of machines now seem to have this. An assembled version, the source (MASM) and a short document file are included. Bob Eager University of Kent at Canterbury, UK rde@ukc.ac.uk [ Checksums obtained with the 4.3BSD "sum" or System V "sum -r" command. checksum size (bytes) file (between BEGIN--cut and END--cut lines) 36823 9723 part01 checksum size (bytes) file 39032 7036 gold.zoo -- bill ] gold part01/01 BEGIN--cut here--cut here begin 644 gold.zoo M6D]/(#(N,#`@07)C:&EV92X:``#$&3EOVH!P4J4)DR=#ECA,X"1(DXH7B3C<,1,$%31IYH"` M`_*,G#`BVX2!HY,.FC(C2X(XF5(C1Q`HYHP)XP;$F#=DD-*H@20%"#IO0!B) M`54J5:M8D-FS,@PH`@ M4F0(""M48L"`X6)F32MAV-0IH_-MW#)X_,ZA0WBN#LL*=B2`D:`%B#EUQHSA M/&=F@ABMT0HF`\+-&SH@#(_.S&9GSY]M;,O([1N$D"1/IKRN`P<.7.`\.9=Q M0\?VC-QUW,"N?KT,;R+10=C9.R?-FZHH>("8X0)&"MLTUI09""Q!&&"%J"0PA10(]@``#$4@DX.&!0P0H1QIAG(&4 M'`/6(8<;*S%A!(8:!M'AATL95H8999BW$A5!"`$C##G,F,"!5(0A!H5)$/$C M$4,(>6`3@A4&!QN@@9`DA4-,4<01"6AYQ$M.4.%<%E04`0(450C!1!*.G3#$ M$XR=0"$)0FR9A!,)%!%%%0F00.$34G`)@V0P($%A$%-,49)!6>J0Y98L$#&% MHUZR4,2DCQ[!0J*4;HE:G4?UFE3DX!!IOO$&7P!COE1AP/PT*&3S_!^\E ML<4?3Z/RS(?9-E>OE7$&Y=PYE(0,1@R/O?'(1@.8\,G!#FF8S1R\8JZ!44EJ#QE(09Z5 MFIK<)"?\0R`(*DB&"WJ,96_82+JX$Y:D/2<]9@$*`5 M/FPV<*"#5T!(0BJ186RJ\1`(#B:RN)SL6U.9"U*2MK4HS@H$X]J)LNC"FZN) MS#9J-$X9(/B&N8R0*B7$W^`R@@4J-"Q=:KO0&5@P\NF8C!J\::,!>J@ M`H``A%$-X9ZA&QX+6$,C$%H$(P=S`T$?8E`#!@\+K5*HNACZ(!"0(2R^,8IA MSK"2DYZ*E/KD"O)(XC6F+.&5&YDIJ0B7`(0B3PT+#>I*_&8%?#*!!80CFM%H ME-&7R1%K6IM>:@JIDL*J;IK3`R$2:W10$8M$2E*3WA.I,!B"4FG$ MU*\U10PH"L,:I*H$JJX3IU2X:E9_L]6_>16LA1LKV\J*E+.B**V`6:M0-K(2 M0%T6!X5"WEVOXH;UR`$X5T-LLM:@3KI28513H,(0UL:VT8Y,14BIVC%3B)1F M/E-'#TF"%(H06=4.#*]ZK2T[\50$)Q`!"@(,UK`.Z#\4Z(M?H*$@(B^X$@TZ M"UH?U`EWL7A("\J,C"U3H2G]**TF3*$%Z)'.=^?6K_GN98=AC*9J@.A)/8*2 M/:($)!,S!-*XV`L%99.D4'723)\`Q7=I3,`:0U0MG=@%+^%!T57.X(:#6X M<4V/0?#2C!!Y+CE>S7)X"9PFOX8T1=8D)^E08``=6`Y(U*17880BV.PKRD?H MY8^)(^2J/#G,2N0MZ3KDFB"P(;%DZ,B:JX7<(Z>YRC&Y0J]M/*;19[Z"$PH?!RB,/6A"V8;5G5;,K=B+Z)DH M:B7T7?0O&NWLRSS:WD1B<&Q]W>2%D$I*Y)&R!S`(V)+W/!@[OIFQ5+6J3M>E MU8=P];(PF#/R?AE,`B7FSLG*LRF'PV2[H%K9D=]KN!+S;XT:(5`'91O.%W<%IWAIYP)W+&Y0? M7.6C`C@5U!F_3E?WNMDEH`%+K#M"EX0`QND0`65)SII7AM3`Y?H)W!``QX+.;``Y>%0I:YFHS(5J6M""IRL MYU2FU.D$B8P*37#-TQ201[+U@.!2E>UJ/@.;6AK1!2D[[6<7_2L'@4Z'/*]% MK@'#=)O!LFW),62@2%AKAC2<045M]CSECKBC2T56"&0RTT0[!LXM"`$+*ZA! M%Q22V@,=?Z$Y#&C6@`.[$H6/>E.E<^O&4"U2!$%`+%B`:Y?"4FQS`E,`%W+0 M$:XQ8:]4+C;B4V_P+4'E`APH)QLG?+>6`\A32%R&2I2#22725LE%?3(0`XOS M4\$!@.\6!`E(`T,``V]#5J$!'!\F>O_E2F_V;RSH@N@E+>L%-ZL$`@53'#VS M!C%511*37_-1'P+3,%NT'M&4;5#P!*=R*<@C8F_@6K\W!<&'3PDX`Y-1?`>R M9%+H6NT!8RL862VX.$XG'N!B&*Z4=_GT2FJ0AU5!2D7U5U_U'<:7(PLU`P<3 M%SZ1+`]34`51518'`AC'4XB6:0E`$0=(!`GX$E.`&S1R`E)('S"0B(EQA7OG M+O!B'A[H6:S2R7W2#!RFV$EA@6MPV=&Q# M8S8F,9-A*,<8/\C#4<6AC?U26MOV50Q'=(:X4YCF2]%('%!!2CA3+N=B'KY# M*EH`B3M',0WU$$8%;_)FR')\8(FY@=^1F'&]@86VPBM;(`B)((R188"=(,B9"B\AHBS2"BS+(<35X M@SB)43NHA,'X%\,(A#>W+,USD^A8=E!0>!YCDOG8;P=RDG[A&W>0A2N'>QWB MA<87!KX'?!]HABPP`S6@CM?72]1VA-5&7NF(DVQ3ASKQ1J8TACKP?F6X:2KU M?EWI>]%#/V&Y:97"E?;GE2,C/N0#@)B(@"RP:4C0:6QC'3ET1T870O[38+J8 M@#)0EEA4B,"AENL!17!ADW.H:R`A$MFDB9!DEW\9/'F)!7MY,?,S('=I/:^W>T1'F/]SF!ZIF.O4F'CR MF&\0F5)!>7%A;KWA65P M%6((EM.W6^A7)LO6,RD<1A'O."!.-57$4T?NP13:P2&3!@4A@A<(DQ1-598RCBG&$Y!4G``CC@ ME@?2EVBY+E?1!D+Q7*2A,V5(!"O:HHM38/[X$U#$'GBT-4Z8=R1#.3LA.2HX M-AT:`S(P*B&D(+(`B<0!B>PCD@!W-*(^42GTY8,S5)4UQ2J!=WJ',IJ2K8)6ER67%Z`BUP`D'0J`?" M6JX%6V%!';$4%WRZI`Z1;;D5'5-*(W6X$R[3'F)016V`%>J2!K+$I4%JGJ5R M*DTJDFRS$5F32B4Y5+1'D34P*N^FHBSJHD-JIWU0@`PQHKP:Y$@K7 M)4F`/)#)'=7JA%?3?6!6KN_1`G,0KYOZ;N^W*1\[G+::?^;Y;D.`F70*J9(4 M.L^IHRP0.LAS`J&SBLMU*D8EKL@C%'3PJ&10L1)1`QDKB0O5IJS85=*JE[0: MGV$H,R&KKE5;(6>8L]:Z:XGV$(GIL^KSB<-#M$5@M*:"M-E(&$SKM%1``U%K ML`=YB0:HF)R8'Y\(!1DZ(#(3&):41Z%#BFNKBZX(D[`('#,YBVWY@K2RD\+7 MDX,R(U,Y,/6&%#]HGDDYFB;W7*"1BPLZ$F$AL1JJB&FP'E7A&I5$,UES'8)6 M9#A#)9C$=ETGH4$61[W4?T15NOQHE6C!'6$@''J'-:@8+S4' M4]/CQ(BAQ?.R,CIK%(0QQF4&'+8S-=*RK<^%*POC,;E*%6L0,")3%3NECR!T MCS27-%J<&-4!$CQ!(@22,!QJL4<,KE(JHE4*&N=:1,':KY[JKKS'LG1[Q&R* MK\%!8@K+R4@%L,A#&F(0RG<[M:2N"NH(+9O,:B7C;LR`Y M!6OZB4#4+?XA?KN,O""HO(S+O.#BO)M:PI(;@ZEI@S!``YAK2L`T%?;6N:)) MK77R'*9=PB:%2(+>*=7NDDP>+T&H?",%"9K M2=;BD+9TQD00,*_[%SL8R1+1PJ-2)KF5`/>I?LRVG_U)$%=\(+Z%->T!T0-% M<0)HJ/=:S3>HAM#V,B,MSD*)%[`A&[3QS4OYJM5H69?2:CJP!3+0)%W0FL"Q M'1`$$FYPF,WI=_5\:S00)*1IB)2SJQ&HU+]\1V2Q4P5*&I!]TWXW-D!K.D*+P0TK!2S@(G!*`AZH/J2]MJ>= MVD%W`JSM$)S(&J3]@,,H@;P&0D)A@7O\4QKX&\]G'9R7-%8V1#IS%WFPBJ9C M(;*]VA[(B;A!VJ%(A:YD)%M+QN\2+R<0VZI-V],=DHB3`&Y"%5#);\7AH"L) MWK-=VV1S*=]!VL:K$_#=M^5]`H#[9>`R%\!AN$Z`N*3SW=`=WO=]*6M*VL7< M'_\1N`]#X*AMX!GL$)F2)]9%AJ-V=2S]>`[A$!H0$-RGQ/T"`1L5```($P`` MZ11LHO>K3@(``!,"```!````````````9V]L9"YC;VT`9V5S``H`?_8[```` M`````````$`I(R@``-=YX;8C`("#"`\"XO>$3@$7_UP4".`"D`\"!NE0X%&D MC@$7H`8$6*>`1S&/($4R`)3OF0L=)@0$<`C118(`"H#5&0#KWS-_R.H\!(7Q M9]"/B"P4?9;0`"U@S2J8L'>D`(0Z#1I9*"6`5H)F(7`)8`+V`"X`,,#R&-`G MJP5O7;^&'4`VA**8`61`?9&33@0>_^C\T*HO+EA<`>H:P/6B!MA$'FXR,K`@ M@-8:`1B7.%S!<0C($R8*FT,<\&<@DP!^O@(!^"6;%8\&=!KP",/' M``\]?P2P`*%JG;O8`&R#H+./1P(Z]V[30>%DD;=<`@`T\J%)P#Q3=(0LFI=K M@'8?G[R#CZ&5PP"OAQ.#U3KAO=R[,F$%:,97IP&MZ:U#@%;=P1?".BC((,TZ M`L@2@'+,.0>==&[I8-]A!-2%7P"P","?/:W))-19=9G@B`$L`$!+$F#I8@$` M9\4`%@!/.-&``B0\8801-Y(PQ1MRR)$'""TLAT8:.8 M98*`)`@D0!$&IFV404<9FJB./.";AAAV0ID'&I*-F:BJJ M/08$W*?$_0(!Q1H``&(5``#I%-&B%<[+"```8P4```$```````````!G;VQD M+F1O8P!G97,`"@!_-S$`````````````0"DC*```00@<2+"@P"-/F!`!T0+$ MG#1MZK`)0Z<,"(0*0:PIDP?$G31TT(!P4J4)""9/ABQIH(`EQH5IYH`(XQ`B M'#86J4R1`@(%E3)RVJ1Q0]%B&#=D0$RA$Z:CE#(/R91Q0R<%"#ARWIR1$Z:- M1S1IQHB,"6)H1:1ER+"D\P9$FS`;R](!42;,0Z`@V(*H,\?B$J!"Y]J=Z89N MQ(ELY8`P\T8Q32M4W$AV"#0-U+R`AX9APQ+%'31`+4HN3)8B")QVY\:``%"Y8LK]">^Q($F3>70>9M^S8N\)$E3Z9>$3%LM\-:8,E$EAN-O<4&&QV]!0<Y"-=E%""VV4 MAPL@4)&@6W"E1P=+<+PQQT-BX-23A7L]Y,89^UDT11%4@+!$$5GT]T8;;R$% MPAMF^)A95>NAZ!Y_(B*7%!MOO+$&2YNUX>)<9>`1QAAT0)BC0UT9)=-CD4T6 MI70]O4?EC2"L4!]9[PD'(4M=V@8''6D(M\-^IM%Y1ULBRB3R^Y,,03)IF1AHQFM443&6DD"F9C'1WZ M'H-!;<9B5EMU%5U(F`)7&!UY4#BF?T12IT.D!B7[H4*1FDC61P_.!&8:=A0U M)E9:<=4&IM3!9Q)**GETZJ*VV?5I6X/*L<9,,I'T[7Q8&@GMHD/-41&;;U#( M545CSE$FNV,2N!V)SLKT5D<,"L;&'4W))$89+/GGAAU36485IMG)599,+;Z8 M1HSGYG5=84@F^5X99IA1!I@@T`@L'$.=<6Q+"BAK4'E/&&%$I-TBAM>&(VM\ M:!AGA#%4RQV]'//,+-E<$,Y.-,N?=7(D2M6R"]EK[<$M6\3J')WF46'2P2Z- MK-,#O10I"F&849%B[YF*W5QC;,9&KR?2R9^=':&L,LMIF#SUD$4F15:E217W M1ATK*H"3'1#,;F4H0T*,I08[-`GONR0+EX2"E'X M="@AOF>$;6!)=JYC&R%)A41)2%(>%F>>MGB/-JUL0A"FT`1,F4\F=9E#TMJ" M'#JD\)=([(HPAU+,]R0*)]6Z6K784(?+#!!UC>EC8;*YS<4,)2F=LHU,&E*R MOM#AC`I8C0RDV*W5S*".D8(":OI"&2,=I2/$<@Y5#*68$YZ!C_9"I4STXAQ, M">$-8@!!$6HH!R*RI#=E`$(=UC`&%WS)!2N-U`IH0`,0R$`&-P#!#6Q``];` M`)=SN4$-<)"#2&D@(-RGQ/T"`40;```,&P``Z!1MOOES10```#@````!```` M````````;6%K92YB870`9V5S``H`?^A%`````````````$`I(R@``-N$F=,& MQ)DW;,CL:*"`31HW:PPB5,BP#)XR,L0\E)C0A<4R',FX&/.F344Y`T$>[/A1 M`T,-`0'