T,r,i,c,k, ,o,r, ,t,r,e,a,t,!

[Carl Distefano CLDistefano@xxxxxxxx]

Here's a Halloween treat (and a trick or two for good measure):

Do you get spooked by quirky but repetitious editing jobs that are just
short-lived enough to make LDPMing keystrokes a nuisance and remapping keys
out of the question? Do you stay up nights wishing for a way to create
quick 'n' dirty macros without having to edit the keyboard file or fiddle
with save/gets? Are you morbidly averse to SAving and reLOADing your
keyboard file, over and over again, to test and debug new key assignments?

We've all faced the monotonous task of, say, repetitiously DeFining 2
paragraphs + 3 lines and CoPying them, 10 or 20 times, to an adjacent
screen. Instead of laboriously recording and playing back macros, or
RUNning ad hoc code from disk, wouldn't it be convenient to issue a string
of functions "keyboard-style", right from the command line, as though it
were a native command?

Well, now you can -- with KBDMACRO.PM for Xy4 & XyWin, a routine scheduled
for release with the next update of SmartSet but which, along with a III+
analog (KBDMAC3.PM for XyIII+ v3.55+), is previewed here. With KBDMACRO
(a/k/a KB), those monotonous keystrokes are reduced to a straight-forward
keyboard-style command line, e.g.,

KB yd,dp,dp,dl,dl,dl,dx,as,cp,as,do

which can be executed as many times as necessary by hitting your .
For users whose blood curdles at the mention of "Help", the routine also
works as a conventional disk PM: 

RUN KBDMACRO.PM dx,yd,dp,dp,dl,dl,dl,as,cp,as,do

Eerie, you say? Give it try! ('Twould be a grave error not to.) The
package is UUencoded below. Explicit how-to, including step-by-step
instructions for creating a  in XyIII+. Enjoy!
 
--------------
Carl Distefano * * * CLDistefano@xxxxxxxx
--------------


Moronic UUenCoder for XyWrite RexXPL v1.0 R.J.Holmgren 9/22/96
begin 644 KBMAC10.MUD
MKD=,8:\-"GM[-2Q(96QP-$M"1&UA8W)O+$AE;'`T:V)]?2!(96QP(&9O5=R:71E(&9OBQD>"QB>"PH+&XL92PO
M+#$L,"PP+"DL8W`L87,L>60L87,L9&\\2&5L<&ME>3X-"@T*07,@:6X@86-T
M=6%L(&ME>6)O87)D('5S86=E+"!C;VUM87,@8F5T=V5E;B`R+6-H87)A8W1E
M<@T*9G5N8W1I;VYS(&UA>2!B92!O;6ET=&5D(&9O'0@=VET:"!(;VQM
M9W)E;B=S($UO"QM+'4L8RPI/$AE;'!K97D^
M#0H-"D9O31\6'E7:6X-"G-E92!334%25%-%5"Y.5%,@*&EN(%--05)4;FYN
M+EI)4"DN("!&;W(@82!D971A:6QE9"!D:7-C=7-S:6]N#0IO9B!T96-H;FEQ
M=65S(&9O30@2&5L<"]-96YU(&9I
M;&5S+`T*&5C=71E(&$@;&ES="!O9B!C;VUM
M86YDOKE-6.#`W+*^N1TQBKZY%2:^N1TQDKZY%2:^N4U@X
M,#WLV+$AE;'`T2T)$;6%C,RQ(96QP-&MB?7T@2&5L<"!F;W(@2T)$34%#,RY0
M32!;0TQ$70T*KDQ-,J^N4DTW.*\-"DM"1$U!0S,N4$T@+2T@0RY,+D1I6)O87)D+7-T>6QE(&UA8W)O60L9'`L9&PL8F,L8RQA+"`L;BQU+&PL>&,L8F,L
M9W0L>'`L8W`L87,L>60L87,\2&5L<&ME>3X-"@T*2G5S="!A&-X<&-P87-Y9&%S8F-G=#Q(96QP:V5Y/@T*#0JN1D.O#0I&;W(@=7-E
M(&)Y(%)%3E5-0D52+EA033H-"E)E;G5M8F5R($M"1$U!0S,N4$T@:6X@4$%#
M2R!M;V1E#0I$969A=6QT(%-A=F4O1V5T(')A;F=E(#T@6S`P?#(Q,5T@.#`Q
M+3@R,@T*4F%N9V4@WM#+$M"1&UA8S,L:V)]?2!2=6X@+DM"1"!M86-R;W,@9G)O;2!#36QI;F4@
M*%AY24E)*RD@6T-,1%T-"@T*`JY36#`P+*Y)4S(Q,:^OKDQ"8:^N4U@X,#$L
MKDE3,#"OKZY35C@P,BP@0##_@`%`,?^``T`R_X`%0#/_@`=`-/^`"4`U_X`+
M0#;_@`U`-_^`#T`X_X`10#G_@!-`0?^`%4!"_X`70$/_@!E`1/^`&T!%_X`=
M0$;_@!]`1_^`(4!(_X`C0$G_@"5`2O^`)T!+_X`I0$S_@"M`3?^`+4!._X`O
M0$__@#%`4/^`,T!1_X`U0%+_@#=`4_^`.4!4_X`[0%7_@#U`5O^`/T!7_X!!
M0%C_@$-`6?^`14!:_X!'043_@$E!4_^`2T)&_X!-0DO_@$]"4_^`44-#_X!3
M0T3_@%5#2/^`5T-)_X!90TS_@%M#3?^`74-._X!?0U#_@&%#4O^`8T-3_X!E
M0U7_@&=$0_^`:41&_X!K1TC_@&U$3/^`;T10_X!Q1%/_@'-$5_^`=45,_X!W
M15+_@'E%6/^`>T9$_X%/1U3_@'U(3?^`?TTP_X"!33'_@(--,O^`A4TS_X"'
M333_@(E--?^`BTTV_X"-33?_@(]-./^`D4U$_X"3357_@)5-5O^`ETY#_X"9
M3DS_@)M.2_^`G4Y0_X"?3E+_@*%.4_^`HTY4_X"E3E?_@*=00_^`J5!$_X"K
M4$S_@*U04/^`KU!2_X"Q4%/_@+-05/^`M5!5_X"W4%?_@+E2,/^`NU(Q_X"]
M4C+_@+]2,_^`P5(T_X##4C7_@,52-O^`QU(W_X#)4CC_@,M2.?^`S5)#_X#/
M4D3_@-%21?^`TU),_X#54E#_@-=24_^`V5)6_X#;4E?_@-U31/^`WU-(_X#A
M4TG_@.-32_^`Y5--_X#G4T[_@.E34_^`ZU-5_X#M4U;_@.]41O^`\51)_X#S
M5$[_@/544_^`]U5$_X#Y5T'_@/M70_^`_U=,_X#_5T[_@0%74_^!`U=8_X$%
M5U?_@0=80_^!"5A$_X$+1%3_@0U3,?^!#U,R_X$14S/_@1-3-/^!%5,U_X$7
M4S;_@1E3-_^!&U-0_X$=0D/_@1],0O^!(4Q%_X$C3D;_@2501O^!)U10_X$I
M0D3_@2M-4_^!+4Y-_X$O3$3_@3%,3/^!,TQ2_X$U3%7_@3=54/^!.49&_X$[
M643_@3U$3_^!/T18_X%!4T__@45/4/^!1U=:_X%)3EC_@4M35_^!349-_X%1
M5$S_@5-44O^!551%_X%7143_@5E%1?^!6TA#_X%=14/_@5]-0_^!82,Q_X%C
M(S+_@64C,_^!9R,T_X%I(S7_@6LC-O^!;2,W_X%O(SC_@7$C.?^!20T_X%[)#7_@7TD-O^!?R0W_X&!)#C_@8,D.?^!A412_X&'
M14[_@8E#,/^!BT,Q_X&-0S+_@8]#,_^!D4,T_X&30S7_@95#-O^!ET,W_X&9
M0SC_@9M#.?^!G45&_X&?24+_@:%.3_^!HTY)_X&E0T__@:,F4/^!Y291_X'G)E+_@>DF4_^!ZR94_X'M)E7_@>\F5O^!\297_X'S
M)EC_@?4F6?^!]R9:_X'Y2$S_@?LD0?^!_R1"_X'_)$/_@@$D1/^"`R1%_X(%
M)$;_@@U$Q_X)]
M43+_@G]1,_^"@5$T_X*#437_@H51-O^"AU$W_X*)43C_@HM43_^"C4E2_X*/
M05+_@I%!6/^"DT1"_X*51$7_@I=(1O^"F5-!_X*;5%C_@IU40_^"GU1"_X*A
MKZY35C@P,RPLKZY35C@P-"P;6*^N4U8X,#4L&U@;6*^N4U8X,#8L&U@;6!M8
MKZY35C@P-RS_,$2OKE-6.#`X+*^N4U8X,#DLKZY,0F*OKDE&KDE3.#`SK^ZN
M25,X,#&O/#"OKD=,9:^N14FOKEA3.#`Q+#@P,RPX,#@L.#$P+#@Q,:^N249`
MZN25,X,#*O/BTQKZY84S@P,BPX,3(L.#$T+#@Q-2PX,3:O
MKEA3.#$V+#@P-BPX,3`L.#$R+#@Q-*^N4U@X,3(LKDE3.#$RKZ^N1TQDKZY%
M2:^N6%,X,#@L.#`T+#@Q,"PX,3(L.#$SKZY)1JY)4S@Q,J\]/:Y)4S@P-Z^O
MKE-6.#$R+`T*KZY%2:^N3$)DKZY05C@Q,J^N249`"!!.@T*2&]W('1O($EN2!L;V%D(&$@2&5L<"!F:6QE+"!G;R!D
M:7)E8W1L>2!T;R!3=&5P(#(N("!/=&AET,L2T)$;6%C,RQK8GU]("XN+B(@=&\@(BXN+B"N
M4U8X,C(LKZY%6*\"(@T*#0HS+B`@4U1O2!H879E(&]N92`H:6YS=')U8W1I;VYS(&)E;&]W*2X-"@T*07!P
M96YD:7@@0CH-"DAO=R!T;R!3970@57`@82`\2&5L<&ME>3X@:6X@6'E)24DK
M('8S+C4U*PT**%!ABBN25,P,*\I/#&OKD58KZY%2:^N4U8P,2P;4Z^N4U8R,3`LKZY35C(Q
M,2ROKEA3,#`L,#$L,C$P+#`R+#(Q,:^N249`2!O6)O87)D(&9I;&4@=&\@87-S:6=N('1H92!S879E+V=E="!U2!E>&ES=&EN9R!A2$-
""AH`
`
end


--------------
Carl Distefano * * *  CLDistefano@xxxxxxxx
--------------