[net.micro.atari16] Dvorak <-> Qwerty keyboard mappers.

mugc@utecfa.UUCP (ModemUserGroupChairman) (04/26/86)

....
...
.

	Here are two *programs* that you can use to switch between the
QWERTY and the DVORAK layout.

	Unfortunately, I don't have the sources with me right now (I
thought I had them), else I would have posted them. Since the ST's
keycaps are removable, it should be possible, I suppose, to modify the
layout and then run dvorak.tos from an auto-folder to get a dvorak
keyboard.

	The two files are dvorak.uux and qwerty.uux. Both should uudecode
to .tos files. dvorak.tos converts qwerty to dvorak and qwerty.tos goes
the other way.

-----------cut for dvorak.tos (uuencoded)-----------------------

begin 644 dvorak.tos
M8!H   &:   #0@  ! P                  "I/+GP   C<*FT !" M  S0
MK0 4T*T '-"\   ! "\ (\    C@+PT_ #\\ $I.0=_\    #$ZY   !*"\\
M     $Y!3E;_^CZ\ !L_/  "3KD   &*5(\^O !P/SP  DZY   !BE2/0F[_
M_F B,&[__M'(T<@B?    9HNL)@ /SP "4ZY   !BE2/4F[__@QN  ;__FW6
M/KP &S\\  ).N0   8I4CSZ\ '$_/  "3KD   &*5(\NO   !#0_/  )3KD 
M  &*5(\NO   !%0_/  )3KD   &*5(\NO   !'@_/  )3KD   &*5(\NO   
M!(P_/  )3KD   &*5(\NO   !*4_/  )3KD   &*5(\NO   !+X_/  )3KD 
M  &*5(].7DYU3E;__&$ _Q8NO    K(O/    C(O/    ;(_/  03KD   %J
MW_P    *0E<O.0  ". _/  Q3KD   &*7(].7DYU(]\   CD3DXO.0  ".1.
M=2/?   (Y$Y-+SD   CD3G4CWP  ".1.02\Y   (Y$YU   #,@   UT   .(
M   #LP   ]X   0) !LQ,C,T-38W.#DP #T("2<L+G!Y9F=C<FPO70T 86]E
M=6ED:'1N<RU@ %P[<6IK>&)M=W9Z    (                      M    
M*P    !_                    *"DO*C<X.30U-C$R,S N#0          
M        &R% (R0E7B8J*"E[*P@)(CP^4%E&1T-23#]]#0!!3T55241(5$Y3
M7WX ?#I12DM80DU75EH    @                     "T    K     '\ 
M                   H*2\J-S@Y-#4V,3(S,"X-                   ;
M,3(S-#4V-S@Y,%L]" DG+"Y0649'0U),+UT- $%/155)1$A43E,G8 !<.U%*
M2UA"35=66@   "                      +0   "L     ?P          
M         "@I+RHW.#DT-38Q,C,P+@T                 \/#P\/#P\/#P
M\/#P\/#P\/#P\/#P\/#P\/#P\/#P\/#P\/#P\/#P\ H- 'P@(" @(" @(" @
M($163U)!2R @24Y35$%,3$52(" @(" @(" @('P*#0!\(" @(" @(" @("!.
M96UI<VES($-O;7!U=&EN9R @(" @(" @("!\"@T ?" Q+S,P+S@V(" @(" @
M(+TQ.3@V($IO;F%T:&%N($1A<W1E96P@? H- 'P@+2TM+2TM+2T@86QL(')I
M9VAT<R!R97-E<G9E9" M+2TM+2TM('P*#0#P\/#P\/#P\/#P\/#P\/#P\/#P
M\/#P\/#P\/#P\/#P\/#P\/#P\/#P"@T 5&AI<R!P<F]G<F%M(&UA>2!N;W0@
M8F4@<V]L9"X*#0!)9B!Y;W4@9FEN9"!T:&ES('!R;V=R86T@;V8@=F%L=64*
M#0!P;&5A<V4@<V5N9" D-2!T;PH- " @(" @($IO;F%T:&%N($1A<W1E96P*
M#0 @(" @(" Q,#(R(#)N9"!3="X@(S$W"@T (" @(" @4V%N=&$@36]N:6-A
M($-!(#DP-# S"@T     !!X6&A 6#AP0" H("@@*" H("@@*% 8&"@X*# @(
M" @(!@0$! 0$                                                
M                                                            
M                                                            
M                                                            
M                                                            
&        
 
end

----------- cut for qwerty.tos (uuencoded) ----------------------------

begin 644 qwerty.tos
M8!H   "&        ! P                  "I/+GP   2&*FT !" M  S0
MK0 4T*T '-"\   ! "\ (\    2*+PT_ #\\ $I.0=_\    #$ZY    1"\\
M     $Y!3E;__#Z\ !A.N0   %9.7DYU(]\   2.3DXO.0  !(Y.=2/?   $
MCDY-+SD   2.3G4CWP  !(Y.02\Y   $CDYU    !!X6%@H(" @(" #__FW6
M/KP &S\\  ).N0   8I4CSZ\ '$_/  "3KD   &*5(\NO   !#0_/  )3KD 
M  &*5(\NO   !%0_/  )3KD   &*5(\NO   !'@_/                   
M                                                            
M                                                            
8                                
 
end

-----------------------------------------------------------------------

When you decode, you should get:

      21      65    1536 PDS/ST/dvorak.tos
       1       5     384 PDS/ST/qwerty.tos
      22      70    1920 total


		Anees Munshi

-- 
			Anees Munshi
			@ University of Toronto Engineering Comp. Facility :A
			{allegra,ihnp4,linus,decvax}!utzoo!utcsri!utecfa!mugc
                        {ihnp4|decvax|utzoo|utcsri}!utecfa!utecfb!munshi