[comp.binaries.atari.st] v13i055: dcmshift -- Right mouse button activates shift, ctrl, or alt

koreth@panarthea.ebay.sun.com (Steven Grimm) (01/28/91)

Submitted-by: vanleejf@udavxb.oca.udayton.edu (Jim Van Leeuwen)
Posting-number: Volume 13, Issue 55
Archive-name: dcmshift

--------------------------------------------------------------
Double Click Mouse Shifter
--------------------------------------------------------------
Description:
This is a handy little freeware program which will allow the
use of the right mouse button to emulate the SHIFT (either
left or right), CONTROL, and ALTERNATE keys.  It only uses
approximately 650 bytes of memory.

Requirements:
Any ST, color or monochrome.

Enjoy!

*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
Progress always involves risk;  you can't steal second with your foot on first!
*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
"We didn't start the fire,   /   ___/_                          Jim Van Leeuwen
 it was always burning      /   /  /  \                The University of Dayton
 since the world's been    /   /  /   /                            Dayton, Ohio
 turning..."   -- Billy   /___/__/   /  Bitnet: VANLEEJF@DAYTON     GEnie: JVAN
                   Joel      /______/ Internet: vanleejf@udavxb.oca.udayton.edu

----------------------------------Cut Here-------------------------------------
table
 !"#$%&'()*+,-./0123456789:;<=>?
@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_
begin 644 DCMSHIFT.LZH
M(NHM;&@Q+6,&  !F#@  <F$D%B  #$1#35-(2494+D1/0X"?Z'/UG9[?A[_1z
MP[_J=7I>"X!;W=;S,Y:SLL3]_P%_WU^?T +FT]^UGMN+33)\6Q ?=^/C/(H:y
MVH^\\>3\JH#]M=05$5]R!+K(\E^6T5>W"BQ*MX_>-YUJWQ0_@JK!Q/T]1/@'x
M]=B,P9OZ;BZ=S_R(RZY:HLSU2N^]?'?'S6AF5A6R/5$7E-HR5+'RE%1"A+";w
M(H72JB0P ,A6ZE0(AZBDTD)/43BB437_(C^#A\@80Y&_%]/BI5ID/?'?/'@Ov
M? 'R &)V(=*7"J  =@!S(@;CV"Z_-O18?87(GX,[WWWX&<>3;E<^-Q5(E=_)u
M<%->9T5>G%.#BIEW[OQ=K('<&82'[0383Y5H<^]_X&X^_E('$:-:CA2"G@ASt
M+V$:VE ?SXC%)QXWB+RM_6Z]!3V^*YRQK\IKUKML4YL\=[T;6>U-XKS5*7"Gs
MN\3O3:V Z)SZVT,%W>\Z[;5H/U51*7MMT85+4;2DGLW+!)/B:EAM=I*G6*5[r
M;A.';)NYIFG"BV-I-;NH[X^5B$3?NJ/IS/J_\7$_U&WB)E--1C7RTZ1T#TXUq
M+(-YQ3.#U#CO):9G#*K]M?IDM.ZVH9,I>A(X!G?%;THZ7F%29 3CI=(S4U'Jp
MKEE;1X/,Q0EP$._D8-^Z(JQ:$VB6.C>;3&GD0EC*,NS,$H5$IH;AX5+GA*7$o
M\"V3"07+# <Q:&D+7.^P -V2&N0J^.>)]9/I%$5:\":8H84ZVDM/P]M9W=*Ln
M@_\G.=0']8Y8 !&D> J2@OQ$YH2#@=2$_$5Q]8P5>/SHRVV-?GI$@-1-E]\@m
M^F!+%"_\6G,)03\,J JZFE]FLFF:[]+NC@+'E-(D8BOK2@?G8_-SCC]%39K%l
M2VDTTVNJA%46.E#1@ZE[(RN\-R3BR5)H<A?:,V"&ACZ/[.*,9@&E:$LM'"E&k
M#DDY)#1P9)\NH.1(_6QCUR^$-*.N0(#O*QDLZ;Y5&0A>WY92KW'95['5'OE%j
M?"F@M<33<)MV5<&]P#3XNCX,([N1A;'CZB/:(H[UU;EL"33\9[/5-!33MKLVi
M/NEQI&FP<%: &%KWQ7,3]Z+IZ+ (>G%<?61AKL6W\%SIM7U=+>S88D0NR X;h
MS]ATTIE0[6V%8D%_]W4J<B_.]-7=QJ2=EA.1_3UA-!MI:HI43$^"DY6IQ@TTg
M37A_XD0FKDN^M?$'9!ZZ=* (!BP83 026<;#WFII_Z]]]RVN%BPP,)NLO&3:f
MZY[MAHT#<I7RT*OW9>'IK\;9>XFMS00<7%X"_5B,5=395>MCM,GMBGMN!,H'e
M* BHJ#>/^MY/>/UO<L[0KZJ/"\&FZXEV)KW.7!U;_>[>:5Z&%QW39(J1ZO_Ld
M1:ZH\@/2]SM-)F./=2>Z3F'+U6MMH::GM8K)+KVKB[W)<VT5\;X+,8GLS!@Hc
MHVQ'*_OLRPC;,EW;@]W,EL3K]'+W^MN JJP'I7IB>-_"RGQ.?#BY<(.PIBP<b
M7+U5*+Q)'::221<)N\UFPJ SH!_O[TJ$L*<BL(WKBQV*:9_LQ$W9<]*AM:O-a
MC'+SI]BTX[[=(N_)U[ F%/E2:#,\CTC35RQ_X);UA_A;H[$%_4?_2>[+ISM=z
MGIYH1IML,/Z.*@2)1\^&$/92FS$XW0&P;0!Q3/Z;J:>/NPZ1IWR[(B*AO9,Jy
M!;>@:I"#;1,EY&LR<:@[<"_1*NH\#32-2S9QZO]^2 XOW<^@C],?[2OX&?+Bx
M0&H:J^WY1[8S3/Y3\N=0G8@:W4[B;=TQEZ_HQ[V\B5!@UN.M35^99IYO]G^ w
MU4A"?NVTO#"]IQ-6-F%;9LTLLAL+]L]_'/Z^RV0]G,R/?:'XL/,9="8[K7-Fv
M2DI=ZX/P2U8*U;5.MRQQ[G50\DT$QX'7*GG7XUR^Y9<6S4*+F%FXZK\50.Z:u
MHU;;U)>N^R1EJOKI!LO>5::\*VTX;0^8*IVHRHS2YKD$]SP\88_?M\8<SWVVt
MYO))KE5Z^9AUFWF:,0EA[C)ERJ8?"214U]<">9CL&ZOW(S/4C6O$9=]&\+)Fs
M)^J]\ O*+[=W195(EER@KC@C1,^RAJN9N+ZL:@@^9F8]H8Z]SY:_=*Q=0--2r
MDRE9+I 38551DBAE[0,<+P2D]UWMF*4&ZQT%7 DAV=1Q6W&JV@ZAU]K)\N Yq
MB2VC."2F\=(P50"LZ3F3,)\7;!2E(9K8))%.E<KFI)>/0"1GCDTP[3[@TSS^p
M7Q"MA2I0(ADM;&@Q+6L$   0"0  <V0D%B  #$1#35-(2494+E!21U \]FFQo
MF'D!", >POW[LE@ .4 &+==ENAS^]V; +QM>['[[R<ZSYL@#YU#W.\ZP)D2Kn
MYX[P=3*:.5'\J#M?2E[DWK+2_1F=<:1G; '^&MZL7FOIHO'!=YMV$. 7U1A0m
M7&M*=- .'(&>FK\N:<AXZ .,!>6XIG&+:;3),UWPR&A#IB#G8FY1._HXKD#4l
MB<#%S#<?8_-40"AGZ6GGIF+>)"$!P,BM2\R07,U$NF5I3JAX%3Q1$/?'(0]/k
M2>F>_>5=M6GY5>Z&YU\00?J7?018,UHP+TCE_3"8>Q7U/F1C*L,=;\Y/@%-?j
M5XF457/B=NROY[C_TZ?P_[F/N.$90,A8(2-C"\< =E6.H(YN[4/QY"_*@\K9i
M!+GRH/*R."5[\DR(NO3TG9&_/%@$.C9[ Y&_S*@Z]=<^Y\X]_C"0O"^]&SIDh
M %X"95G\#_DZJNI3@]_F+US^W@UO2RU53Y 8O('=*B\&%Q?PW>@3Z1"(OU/Sg
M>B_ TE@"_BCTN+T]9B_IU$_Q26")J*5=YPU.62-=%6<3-J#T_9$G\-N10K_Kf
MF^C^[<;8$%"BX"/M!OD$2 (3]"@FM\*8D']GV3D*[C?]79V4B9=]XKVW+]*Oe
MHKXZ"\W*AD2H9"$DR8KZ@"\Q;CPC/B%&=-*&:@U(>D3U1AA_+,.]6L8:>*=.d
MILQ*-BN3 ^CO4'.$^QDQBI+/K9<#N.*CY$\6$;+]L EHC_*Y"-)RI115,Z6Fc
MF\GC^;4#]?R*#_=K#OCUV>5D<E?(INMH6JE!ZSPXXZT'CC#1E7Z)\.?-)*WAb
M4A555*P^2J^6WD*K_UU(U7LMX8[1F>X*)P_$'J;:*[2V<<IT&%L@[TPD*-:5a
M+>1,] #@$31F=09=<O6<!Y$"[86#5 %BPY51;'0\\P!N8 <T /?Q[!,\T?G*z
M2W@X?G6U<=G+S^\74G$ /.LG1%.Q]66H?>0-Y+(D_S_B44GB0CQHK;[69B_;y
M?PA::[J F&Q<EAE1=$[UG BD0>BPW4) A(*3E"H1=[CX>*#@MS'M1DDA^9D>x
MZ7HYSX4N%,?#J.&ON,#1[X4</9\UWOK/^*3VF1>@J79](PH@A1@&Z>6-T6UJw
M 3N3+^?'=JV4^32N_G9?Z_["\FK9'W(;=OOL6S&YN_$J^#.]JQOYY.J%EOHMv
MH@$-S=B')YD.3U,%94IUMO!/0EW58U'FK=3!ZU^/1_%&@)=-1-WN8$]7>5R@u
M)&W8BWLX=P@OB8\.I-"#$8U=,'HHT[#J> "!N0:RY:I>)@@M/#D0U_T4&R;@t
M8;QVSZL?2&RUJ,1HWQY[16/678.1J/+!:ML,4F?UY_.?@)K-_1B&/+X#L,0Os
MOYE72NLQD@0O@0<R9N=Z:WZ E1$%$GW4:O<1L ^.38D".>(7;\//><*)Z'FOr
MQAZQ[04.0R:4H) C$"9TPS,@MTE%!-3:]@GW@*-CMUK3$O#>P;/9#I\ZJZ3%q
MI,XRS>43100O/VL&%E.V5  D.,*7&3!^!N66QC"$[Y_ >2^T'6SQNUOMN:>Ep
$;\ = .43o
 n
end