OPTIONS Fast; [DEF,ClickTime,(200)] [DEF,DownClick,(~1 Down BEFORE [ClickTime])] [DEF,UpClick,(~1 Up BEFORE [ClickTime])] [DEF,Click,([UpClick,~1] AND [DownClick,~1])] [DEF,CTRL,(Spare3 Down | Ctrl Down)] [DEF,SHIFT,(LeftShift Down | RightShift Down)] [DEF,IfCtrl,(SELECT ENABLE FROM [CTRL] => ~1; ENDCASE => ~2)] [DEF,IfShift,(SELECT ENABLE FROM [SHIFT] => ~1; ENDCASE => ~2)] [DEF,Letter,( ~1 Down => SELECT ENABLE FROM BW Down => SELECT TRIGGER FROM [Click,~1] => [IfShift,{ ~2 RemoveCaretLook },{ ~2 ApplyCaretLook }]; ENDCASE => [IfShift,{ ~2 RemoveLook },{ ~2 ApplyLook }]; ~3 ENDCASE)] SELECT TRIGGER FROM [Letter,H,7, [CTRL] => SELECT TRIGGER FROM [Click,H] => [IfShift,{ ViewBox Squawk }, { SelectMatchingPlaceholderBrackets MakeBox StuffBox }]; ENDCASE => [IfShift,{ ViewBox },{ MakeBox StuffBox }]]; NEXT Down WHILE [CTRL] WHILE [SHIFT] => { SelectMatchingPlaceholderBrackets }; Spare2 Down WHILE [CTRL] WHILE [SHIFT] => { SelectMatchingPlaceholderBrackets }; ENDCASE. ΐHobo.tip To institute new tip table, type CTNL-! then checkpoint. Shoemake, June 5, 1990 2:59 am PDT -- Miscellaneous macro definitions to standardize certain conventions -- Define control and shift keys: U Down -- Make and Stuff a MathChar WHILE [CTRL] => SELECT ENABLE FROM [SHIFT] => { StuffBox }; ENDCASE => { MakeBox }; V Down -- Open Viewer to look at MathChar node WHILE [CTRL] => SELECT ENABLE FROM [SHIFT] => { ViewBox }; ENDCASE; Κ\˜Jšœ™codešœ!Οkœ™8K™"—š˜Kšœ˜—KšœE™EK˜Kšœœ˜Kšœœœ˜,Kšœœœ˜(Kšœœœ˜-K™Kšœ!™!Kšœœœ˜$Kšœœœ$˜.šœœ œœ˜Kšœœ˜ Kšœ˜—šœœ œœ˜ Kšœœ˜Kšœ˜—šœœ ˜ šœ œœ˜šœ œœ˜KšœE˜EKšœ1˜8—Kšœ˜—Kšœ˜ —J˜šœœ˜šœœ˜ šœœœœ˜šœœ!˜)Kšœ8˜8—Kšœ0˜7—K˜—Kš œœœœœ+˜Oš œ œœœœ+˜PK˜—šœΟc™#š œœœœ™"Kšœœ™Kšœ™——K™šœž'™.š œœœœ™"Kšœœ™Kšœ™———K˜Kšœ˜—…—άψ