� JOYTEST - P.Baynton V1.0
@%=3:I%=1:*TV255 1
�1:�23,1;0;0;0;0:*FX4 1
( �19,2,7;0;19,3,2;0;:*FX229 1
2#�3:�dh(12,0,"JOYSTICK DISPLAY")
<�8,9)"LEFT"�28,9)"RIGHT"
F5�2:�16,4)"1-SPOT"�16,5)"2-TRACE"�16,6)"3-RADIUS"
P9�1:�1,9)"horiz"�15,9)"vert"�21,9)"horiz"�35,9)"vert"
Z�:�frame:�val
d�j1:�j2:�3,2
n�I%<>3 �69,H%,V%:�69,X%,Y%
x)�I%=3 �H%,V%:�320,320:�X%,Y%:�956,320
�� F%=�(0):�1
�'� F%�1 �8,10)"FIRE"� �8,10)"----"
�+� F%�2 �28,10)"FIRE "� �28,10)"-----"
��val:�2
�(�1,10)�val(A%)"%"�15,10)�val(B%)"%"
�)�21,10)�val(C%)"%"�35,10)�val(D%)"%"
�� I%=1 �spot
�� I%=2 �trace
�� I%=3 �rad
�J%=�(0)
�� J%<>-1:I%=J%-48
�� J%<49 � J%>51
��28,0,8,39,2,12,26:*FX4

@%=&90A:*FX229

�

:

"��spot �3,2

,�69,H%,V%:�j1:�69,H%,V%

6�69,X%,Y%:�j2:�69,X%,Y%

@�

J:

T��trace �1,2

^�H%,V%:�j1:�H%,V%

h�X%,Y%:�j2:�X%,Y%

r�

|:

���rad �3,2

��H%,V%:�j1:�320,320:�H%,V%

��X%,Y%:�j2:�956,320:�X%,Y%

��

�:

���j1

�H%=634-A%/105:V%=10+B%/105

��

�:

���j2

�X%=1270-C%/105:Y%=10+D%/105

��

�:
��dh(X,Y,A$)
� A%,X%,Y%,N%
A%=10:X%=&70:Y%=0
&� N%=1� � A$
0?&70=�(�A$,N%,1)):�&FFF1
:3�23,254,?&71,?&71,?&72,?&72,?&73,?&73,?&74,?&74
D3�23,255,?&75,?&75,?&76,?&76,?&77,?&77,?&78,?&78
N�31,X+N%-1,Y,254,10,8,255:�
X�
b:
l��frame �0,1
v�28,0,31,39,11,12,26
�&�0,0:�1276,0:�1276,640:�0,640:�0,0
�&�4,4:�1272,4:�1272,636:�4,636:�4,4
�#�636,8:�636,632:�640,8:�640,632
�'�288,320:�352,320:�924,320:�988,320
�'�320,288:�320,352:�956,288:�956,352
��
�:
�ݤval(A)=�(A/655.2+.5)
�:
�	��val
�#A%=�(1):B%=�(2):C%=�(3):D%=�(4)
��
�

00000000  0d 00 0a 1e f4 20 4a 4f  59 54 45 53 54 20 2d 20  |..... JOYTEST - |
00000010  50 2e 42 61 79 6e 74 6f  6e 20 56 31 2e 30 0d 00  |P.Baynton V1.0..|
00000020  14 16 40 25 3d 33 3a 49  25 3d 31 3a 2a 54 56 32  |..@%=3:I%=1:*TV2|
00000030  35 35 20 31 0d 00 1e 1b  eb 31 3a ef 32 33 2c 31  |55 1.....1:.23,1|
00000040  3b 30 3b 30 3b 30 3b 30  3a 2a 46 58 34 20 31 0d  |;0;0;0;0:*FX4 1.|
00000050  00 28 20 ef 31 39 2c 32  2c 37 3b 30 3b 31 39 2c  |.( .19,2,7;0;19,|
00000060  33 2c 32 3b 30 3b 3a 2a  46 58 32 32 39 20 31 0d  |3,2;0;:*FX229 1.|
00000070  00 32 23 fb 33 3a f2 64  68 28 31 32 2c 30 2c 22  |.2#.3:.dh(12,0,"|
00000080  4a 4f 59 53 54 49 43 4b  20 44 49 53 50 4c 41 59  |JOYSTICK DISPLAY|
00000090  22 29 0d 00 3c 1d f1 8a  38 2c 39 29 22 4c 45 46  |")..<...8,9)"LEF|
000000a0  54 22 8a 32 38 2c 39 29  22 52 49 47 48 54 22 0d  |T".28,9)"RIGHT".|
000000b0  00 46 35 fb 32 3a f1 8a  31 36 2c 34 29 22 31 2d  |.F5.2:..16,4)"1-|
000000c0  53 50 4f 54 22 8a 31 36  2c 35 29 22 32 2d 54 52  |SPOT".16,5)"2-TR|
000000d0  41 43 45 22 8a 31 36 2c  36 29 22 33 2d 52 41 44  |ACE".16,6)"3-RAD|
000000e0  49 55 53 22 0d 00 50 39  fb 31 3a f1 8a 31 2c 39  |IUS"..P9.1:..1,9|
000000f0  29 22 68 6f 72 69 7a 22  8a 31 35 2c 39 29 22 76  |)"horiz".15,9)"v|
00000100  65 72 74 22 8a 32 31 2c  39 29 22 68 6f 72 69 7a  |ert".21,9)"horiz|
00000110  22 8a 33 35 2c 39 29 22  76 65 72 74 22 0d 00 5a  |".35,9)"vert"..Z|
00000120  11 f5 3a f2 66 72 61 6d  65 3a f2 76 61 6c 0d 00  |..:.frame:.val..|
00000130  64 10 f2 6a 31 3a f2 6a  32 3a e6 33 2c 32 0d 00  |d..j1:.j2:.3,2..|
00000140  6e 1e e7 49 25 3c 3e 33  20 f0 36 39 2c 48 25 2c  |n..I%<>3 .69,H%,|
00000150  56 25 3a f0 36 39 2c 58  25 2c 59 25 0d 00 78 29  |V%:.69,X%,Y%..x)|
00000160  e7 49 25 3d 33 20 ec 48  25 2c 56 25 3a df 33 32  |.I%=3 .H%,V%:.32|
00000170  30 2c 33 32 30 3a ec 58  25 2c 59 25 3a df 39 35  |0,320:.X%,Y%:.95|
00000180  36 2c 33 32 30 0d 00 82  10 f5 20 46 25 3d 96 28  |6,320..... F%=.(|
00000190  30 29 3a fb 31 0d 00 8c  27 e7 20 46 25 80 31 20  |0):.1...'. F%.1 |
000001a0  f1 8a 38 2c 31 30 29 22  46 49 52 45 22 8b 20 f1  |..8,10)"FIRE". .|
000001b0  8a 38 2c 31 30 29 22 2d  2d 2d 2d 22 0d 00 96 2b  |.8,10)"----"...+|
000001c0  e7 20 46 25 80 32 20 f1  8a 32 38 2c 31 30 29 22  |. F%.2 ..28,10)"|
000001d0  46 49 52 45 20 22 8b 20  f1 8a 32 38 2c 31 30 29  |FIRE ". ..28,10)|
000001e0  22 2d 2d 2d 2d 2d 22 0d  00 a0 0b f2 76 61 6c 3a  |"-----".....val:|
000001f0  fb 32 0d 00 aa 28 f1 8a  31 2c 31 30 29 a4 76 61  |.2...(..1,10).va|
00000200  6c 28 41 25 29 22 25 22  8a 31 35 2c 31 30 29 a4  |l(A%)"%".15,10).|
00000210  76 61 6c 28 42 25 29 22  25 22 0d 00 b4 29 f1 8a  |val(B%)"%"...)..|
00000220  32 31 2c 31 30 29 a4 76  61 6c 28 43 25 29 22 25  |21,10).val(C%)"%|
00000230  22 8a 33 35 2c 31 30 29  a4 76 61 6c 28 44 25 29  |".35,10).val(D%)|
00000240  22 25 22 0d 00 be 10 e7  20 49 25 3d 31 20 f2 73  |"%"..... I%=1 .s|
00000250  70 6f 74 0d 00 c8 11 e7  20 49 25 3d 32 20 f2 74  |pot..... I%=2 .t|
00000260  72 61 63 65 0d 00 d2 0f  e7 20 49 25 3d 33 20 f2  |race..... I%=3 .|
00000270  72 61 64 0d 00 dc 0b 4a  25 3d a6 28 30 29 0d 00  |rad....J%=.(0)..|
00000280  e6 15 fd 20 4a 25 3c 3e  2d 31 3a 49 25 3d 4a 25  |... J%<>-1:I%=J%|
00000290  2d 34 38 0d 00 f0 13 fd  20 4a 25 3c 34 39 20 84  |-48..... J%<49 .|
000002a0  20 4a 25 3e 35 31 0d 00  fa 1b ef 32 38 2c 30 2c  | J%>51.....28,0,|
000002b0  38 2c 33 39 2c 32 2c 31  32 2c 32 36 3a 2a 46 58  |8,39,2,12,26:*FX|
000002c0  34 0d 01 04 12 40 25 3d  26 39 30 41 3a 2a 46 58  |4....@%=&90A:*FX|
000002d0  32 32 39 0d 01 0e 05 e0  0d 01 18 05 3a 0d 01 22  |229.........:.."|
000002e0  0f dd f2 73 70 6f 74 20  e6 33 2c 32 0d 01 2c 1b  |...spot .3,2..,.|
000002f0  f0 36 39 2c 48 25 2c 56  25 3a f2 6a 31 3a f0 36  |.69,H%,V%:.j1:.6|
00000300  39 2c 48 25 2c 56 25 0d  01 36 1b f0 36 39 2c 58  |9,H%,V%..6..69,X|
00000310  25 2c 59 25 3a f2 6a 32  3a f0 36 39 2c 58 25 2c  |%,Y%:.j2:.69,X%,|
00000320  59 25 0d 01 40 05 e1 0d  01 4a 05 3a 0d 01 54 10  |Y%..@....J.:..T.|
00000330  dd f2 74 72 61 63 65 20  e6 31 2c 32 0d 01 5e 15  |..trace .1,2..^.|
00000340  ec 48 25 2c 56 25 3a f2  6a 31 3a df 48 25 2c 56  |.H%,V%:.j1:.H%,V|
00000350  25 0d 01 68 15 ec 58 25  2c 59 25 3a f2 6a 32 3a  |%..h..X%,Y%:.j2:|
00000360  df 58 25 2c 59 25 0d 01  72 05 e1 0d 01 7c 05 3a  |.X%,Y%..r....|.:|
00000370  0d 01 86 0e dd f2 72 61  64 20 e6 33 2c 32 0d 01  |......rad .3,2..|
00000380  90 1e ec 48 25 2c 56 25  3a f2 6a 31 3a df 33 32  |...H%,V%:.j1:.32|
00000390  30 2c 33 32 30 3a df 48  25 2c 56 25 0d 01 9a 1e  |0,320:.H%,V%....|
000003a0  ec 58 25 2c 59 25 3a f2  6a 32 3a df 39 35 36 2c  |.X%,Y%:.j2:.956,|
000003b0  33 32 30 3a df 58 25 2c  59 25 0d 01 a4 05 e1 0d  |320:.X%,Y%......|
000003c0  01 ae 05 3a 0d 01 b8 08  dd f2 6a 31 0d 01 c2 1e  |...:......j1....|
000003d0  48 25 3d 36 33 34 2d 41  25 2f 31 30 35 3a 56 25  |H%=634-A%/105:V%|
000003e0  3d 31 30 2b 42 25 2f 31  30 35 0d 01 cc 05 e1 0d  |=10+B%/105......|
000003f0  01 d6 05 3a 0d 01 e0 08  dd f2 6a 32 0d 01 ea 1f  |...:......j2....|
00000400  58 25 3d 31 32 37 30 2d  43 25 2f 31 30 35 3a 59  |X%=1270-C%/105:Y|
00000410  25 3d 31 30 2b 44 25 2f  31 30 35 0d 01 f4 05 e1  |%=10+D%/105.....|
00000420  0d 01 fe 05 3a 0d 02 08  10 dd f2 64 68 28 58 2c  |....:......dh(X,|
00000430  59 2c 41 24 29 0d 02 12  11 ea 20 41 25 2c 58 25  |Y,A$)..... A%,X%|
00000440  2c 59 25 2c 4e 25 0d 02  1c 15 41 25 3d 31 30 3a  |,Y%,N%....A%=10:|
00000450  58 25 3d 26 37 30 3a 59  25 3d 30 0d 02 26 10 e3  |X%=&70:Y%=0..&..|
00000460  20 4e 25 3d 31 b8 20 a9  20 41 24 0d 02 30 1c 3f  | N%=1. . A$..0.?|
00000470  26 37 30 3d 97 28 c1 41  24 2c 4e 25 2c 31 29 29  |&70=.(.A$,N%,1))|
00000480  3a d6 26 46 46 46 31 0d  02 3a 33 ef 32 33 2c 32  |:.&FFF1..:3.23,2|
00000490  35 34 2c 3f 26 37 31 2c  3f 26 37 31 2c 3f 26 37  |54,?&71,?&71,?&7|
000004a0  32 2c 3f 26 37 32 2c 3f  26 37 33 2c 3f 26 37 33  |2,?&72,?&73,?&73|
000004b0  2c 3f 26 37 34 2c 3f 26  37 34 0d 02 44 33 ef 32  |,?&74,?&74..D3.2|
000004c0  33 2c 32 35 35 2c 3f 26  37 35 2c 3f 26 37 35 2c  |3,255,?&75,?&75,|
000004d0  3f 26 37 36 2c 3f 26 37  36 2c 3f 26 37 37 2c 3f  |?&76,?&76,?&77,?|
000004e0  26 37 37 2c 3f 26 37 38  2c 3f 26 37 38 0d 02 4e  |&77,?&78,?&78..N|
000004f0  1f ef 33 31 2c 58 2b 4e  25 2d 31 2c 59 2c 32 35  |..31,X+N%-1,Y,25|
00000500  34 2c 31 30 2c 38 2c 32  35 35 3a ed 0d 02 58 05  |4,10,8,255:...X.|
00000510  e1 0d 02 62 05 3a 0d 02  6c 10 dd f2 66 72 61 6d  |...b.:..l...fram|
00000520  65 20 e6 30 2c 31 0d 02  76 18 ef 32 38 2c 30 2c  |e .0,1..v..28,0,|
00000530  33 31 2c 33 39 2c 31 31  2c 31 32 2c 32 36 0d 02  |31,39,11,12,26..|
00000540  80 26 ec 30 2c 30 3a df  31 32 37 36 2c 30 3a df  |.&.0,0:.1276,0:.|
00000550  31 32 37 36 2c 36 34 30  3a df 30 2c 36 34 30 3a  |1276,640:.0,640:|
00000560  df 30 2c 30 0d 02 8a 26  ec 34 2c 34 3a df 31 32  |.0,0...&.4,4:.12|
00000570  37 32 2c 34 3a df 31 32  37 32 2c 36 33 36 3a df  |72,4:.1272,636:.|
00000580  34 2c 36 33 36 3a df 34  2c 34 0d 02 94 23 ec 36  |4,636:.4,4...#.6|
00000590  33 36 2c 38 3a df 36 33  36 2c 36 33 32 3a ec 36  |36,8:.636,632:.6|
000005a0  34 30 2c 38 3a df 36 34  30 2c 36 33 32 0d 02 9e  |40,8:.640,632...|
000005b0  27 ec 32 38 38 2c 33 32  30 3a df 33 35 32 2c 33  |'.288,320:.352,3|
000005c0  32 30 3a ec 39 32 34 2c  33 32 30 3a df 39 38 38  |20:.924,320:.988|
000005d0  2c 33 32 30 0d 02 a8 27  ec 33 32 30 2c 32 38 38  |,320...'.320,288|
000005e0  3a df 33 32 30 2c 33 35  32 3a ec 39 35 36 2c 32  |:.320,352:.956,2|
000005f0  38 38 3a df 39 35 36 2c  33 35 32 0d 02 b2 05 e1  |88:.956,352.....|
00000600  0d 02 bc 05 3a 0d 02 c6  1a dd a4 76 61 6c 28 41  |....:......val(A|
00000610  29 3d a8 28 41 2f 36 35  35 2e 32 2b 2e 35 29 0d  |)=.(A/655.2+.5).|
00000620  02 d0 05 3a 0d 02 da 09  dd f2 76 61 6c 0d 02 e4  |...:......val...|
00000630  23 41 25 3d 96 28 31 29  3a 42 25 3d 96 28 32 29  |#A%=.(1):B%=.(2)|
00000640  3a 43 25 3d 96 28 33 29  3a 44 25 3d 96 28 34 29  |:C%=.(3):D%=.(4)|
00000650  0d 02 ee 05 e1 0d ff                              |.......|
00000657