K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































	:�CK$�""�1440���&�� **************************************************_�� * LOC OF ENTRY/MOVE DIR ARRAY ENTRIES SUBROUTINE *��� **************************************************���"LOCATION OF ENTRY:    ����";:�BL:�BL�N�1�BL�1��"��":�1490K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































	���CM$�"�"�CM$�"�"���N�N�1:�I�N�1�BL�1��1:F$(I)�F$(I�1):�:�6�� *********************R�� * DISK STATUS CHECK *n� *********************��15,EN,EM$,ET,ES:�EN��0��1600���"� ***************************�,� * DISK UNIT ERROR ROUTIK






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































	NE *�6� ***************************@�"�"�12)"DISK UNIT ERROR!"NJ�"ERROR # -"EN"�; TRACK -"ET"�; SECTOR  -"SEhT�"ERROR MSG - "EM$:��^� ******************************�h� * EXIT DIRECTORY MANIPULATOR *�r� ***************************K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































�***|�"�MANIPULATE ANOTHER DISKETTE (Y/N)";:�"N���";AN$.��AN$��"Y"�AN$��"N"�1660l��"DISKETTE BEING VALIDATED":�15,8,15:�15,"V":�15,"I":�15{��AN$�"Y"������0��1600���"� ***************************�,� * DISK UNIT ERROR ROUTI
  2,  6, 76,220,  3,160,  5,162,  0,189,240,  3,201, 42`0�240, 17,201, 63,240,  7,209,111,240,  3,169,255, 96,200,232�:�224, 16,208,232,160,  2,177,111,201,130,208,239, 96,160,  3�D�177,111,133,  6,200,177,111,133,  7, 32,  3,  3, 32, 83,  3#N

&
� ******************************K� * DIRECTORY MANIPULATOR INIT *p� ******************************�(�"�"�9)"�DIRECTORY MANIPULATOR�"�2��5)"INSERT DISKETTE TO MANIPULATE":�1430�<�F$(144):�I�1�11:FL$�FL$��(0):�:TY$��(131)��(18)��(0
D *:� ********************?D�"SELECT DIRECTORY MANIPULATION COMMAND:"TN�CM$:�CM$�""�590|X�CM$�"�"��"RE-LIST DIRECTORY":�370�b�CM$�"H"��1340:�370�lOK�1:�CM$�"�"��"ALPHABATIZE DIRECTORY":�920:�370�v�CM$�"�"��"INSERT BLANK ENTRY":�10
	**********$^
� * PRINT DIRECTORY ROUTINE *Fh
� ***************************�r
Z�1:OD�0:P1�20:PG�P1:X��((N�1)�2)�1:�(N�1)�(2�(X�1))�1�X�X�1:OD�1�|
XX�X�1:PC��(XX�PG):�(XX�PG)�PC��0�PC�PC�1��
�XX�PG�X�PG�1��
�I�1�XX:�"�"�(�(Z),2)"�";�(F$(Z),4,16

$;:�850">�2,F$(XX);:� * PUT DIR ENTRIES INTO BUFFER *eH�Z��8�XX��(N�1)��2,"SG";:� * TRASH BYTES FOR DIR ENTRIES 2-7 *lR�Z�\�15,"U2:";2;0;18;S%(I):� * WRITE DIR SECTOR *�f�"WRITING TRACK 18 SECTOR"�(S%(I))�p�I:�2:�15:�1660�z� ********
�N�18�BL�N�1�F$(X)�F$(X�1)B�:N�N�1:�10501L� **********************NV� * INSERT ----- ENTRY *k`� **********************�j�1490:F$(BL)�TY$�"----------------"�FL$:��t� *************************�~� * INSERT 'REMARK' ENTRY *��� **��208,248,173,  0, 28, 41,247,141,  0, 28, 96,  0,178,  0,250dX�  0,186,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0�b�  0,  0, 32, 14, 32,230, 27, 61, 27,152,  2,230,194, 68,  633,111,198,  9, 16,240,165,  6,208,219, 32, 15,  3&�238,

)	F�S%(18):S%(1)�1:�I�1�170	P�I�6�S%(I�1)�2:�F	Z�I�12�S%(I�1)�3:�\	dS%(I�1)�S%(I)�3:�r	nT�18:S�1:N�1:OK�0�	xSP$�"":�I�1�16:SP$�SP$��(160):��	�� ******************�	�� * INIT DISK UNIT *�	�� ******************�	��15,8,15,"I0":�1550

10:�370'��CM$�"�"��"DELETE BLANK ENTRIES":�1050:�370W��CM$�"�"��"INSERT -----� ENTRY":�1130:�370���CM$�"�"��"INSERT 'REMARK' ENTRY":�1170:�370���CM$�"�"��"SWAP DIRECTORY ENTRIES":�1230:�370���CM$�"�"��"DELETE DIRECTORY ENTRY":�1280:�370�
):Z�Z�1@
�
�OD�0�(OD�1�2�XX��X)���19)"��"�(�(X),2)"�";�(F$(X),4,16):X�X�1q
�
��(I�PG)�1�PC��2�PG�PG�P1:�1430:PC�PC�1:�440z
�
�460�
�
Z�X:�PC��2�X�Z�P1�
�
�PC�1�X��(((2�XX)�(2�I))�2)�Z�
�
�I�
�
�15:�2�
�
� *****************�
�
� * CHECK DIR OK? *
*****************�� * ALPHABATIZE DIRECTORY *9�� *************************A�X�NU�X��(X�2):�X�0��l��I�1�((N�1)�X):Y�I��Z�Y�X:��(F$(Y),4,16)���(F$(Z),4,16)�970��FF$�F$(Y):F$(Y)�F$(Z):F$(Z)�FF$:Y�Y�X:�Y�0�950���:�930��� *********
************************��1490:�"ENTER REMARK:";:�RM$:��(RM$)�16�1170[���(RM$)�16��I�1�(16��(RM$)):RM$�RM$��(160):�t�F$(BL)�TY$�RM$�FL$:���� *************************��� * SWAP DIRECTORY ENTRIES *��� *************************��"1ST 
(� * HELP MENU *2� *************1<�"�   DIRECTORY MANIPULATOR HELP MENU"wF�"   F1 -> RE-LIST DIRECTORY":�"   F2 -> ALPHABATIZE DIRECTORY"�P�"   F3 -> INSERT BLANK ENTRY":�"   F4 -> DELETE BLANK ENTRIES"Z�"   F5 -> INSERT -----� 
���12)" DISK UNIT OK !"6
�� **************************W
�� * READ DIRECTORY ROUTINE *x
�� **************************�
��2,8,2,"#"�
��15,"U1";2;0;T;S�
��1550�
��#2,T$,S$:� * TRACK & SECTOR OF NEXT DIR ENTRY *�
�T��(T$��(0)):S��(S$��(0))
��"�":�580�� **********************4�� * RE-WRITE DIRECTORY *Q�� **********************���"�  WRITING NEW DIRECTORY...PLEASE WAIT!�"��F$�"":�I�1�32:F$�F$��(0):�I���15,8,15,"I0":�1550����12)" DISK UNIT OK !"�2,8,2,"#":X��(
�
� *****************9�
�:�"DIRECTORY OK (Y/N)";:�"N���";OK$\�OK$��"Y"�OK$��"N"��"���":�510��OK$�"Y"�OK�0��1660:� * EXIT DIR MANIPULATOR *��OK$�"Y"�OK�1��730:� * RE-WRITE DIRECTORY *�&� ********************�0� * SELECT MANIP CM
*************�� * INSERT BLANK ENTRY *-�� **********************W��1490:F$(BL)��(0)��(0)��(0)�SP$�FL$:�v�� ************************�� * DELETE BLANK ENTRIES *�� ************************��I�1�N�1:��(F$(I))�0�1070�$�:��.�X�BL
";:�1490:A�BL:�"2ND ";:�1490:F$(B)�F$(A):F$(A)�F$(BL)(�F$(BL)�F$(B):�I�� **************************j�� * DELETE DIRECTORY ENTRY *��� **************************��1490:�X�BL�N�1�
�BL�N�1�F$(X)�F$(X�1)��:N�N�1:��� *************�	ENTRY":�"   F6 -> INSERT 'REMARK' ENTRY"Qd�"   F7 -> SWAP DIRECTORY ENTRIES":�"   F8 -> DELETE DIRECTORY ENTRY"]n�1430:�zx� **********************��� * HIT KEY SUBROUTINE *��� **********************���:��13)"HIT ANY KEY!!!"���CK$

�I�1�82
F$�"":�X�1�30:� * GET DIRECTORY ENTRIES *S
�#2,B$:B��(B$��(0)):�X�1�A�B`"
�X�4�C�Br,
F$�F$��(B):�X�6
�A��0�(A�0�C�160)�F$(N)�F$:N�N�1�@
�#2,B$,B$:�I:� * DIR ENTRIES 2-7 GARBAGE 1ST 2 BYTES *�J
�T��0�220T
� *****************
(N�1)�8):XX�0:�((N�1)�8)�X��0�X�X�1G�I�1�X:�15,"B-P:";2;0:� * POSITION BUFFER POINTER *�T�18:�I�X�T�0:� * SET NEXT DIR SEC POINTER TO 0 IF LAST SECTOR *� �2,�(T);�(S%(I�1));:� * POINTER TO NEXT TR/SE OF DIR *�*�Z�1�8:XX�XX�1�4�XX��N��2,F1";2;0;18;S(I)��15,"B-P";2;EN(I)�32�2:�!��.�� UNLOCKC�RW�1:CL�12:� 190]�NC$�" UNLOCK  FILES "g�� 800��� 15,8,15:� 2,8,2,"#"��� I�0 � NF:� SF(I)�0 � � 660��� 690���#2,A$:� A$�"" � A$��(0)��FT��(A$):FT�(FT � 191)��� 680
#�"�":�53280,0:�53281,6:�646,1G
�X�51456�52224:�Q:�X,Q:�:�51456q�"�"�5)"LIGHTNING LOADER ACTIVATED":��d�162,  5,189, 11,201,149,115,202, 16,248, 96,234,234,234, 76�n� 17,201,132,176,230,122,208,  2,230,123,160,  0,177,122,2014	x� 81,2f� 190:� AR$;:�p� NF�PG�38�19  � �Cu� 190:� " ";:RW�3:CL�38:J�0:ZN�1:� 190:� AR$;:�Iz�}� 190:� " ";:RW�3:CL�18:J�0:ZN�0:� 190:� AR$;:����15,A$,B$,C$,D$��RW�23:CL�0:� 190:� "                                      ";�RW�23:CL�0:� 19	201,153@��  0,200,200,208,247, 96,173, 18,208, 41,  7,201,  3,144,247���169, 39,141,  0,221,205,  0,221,208,251,169,  7,141,  0,221�
�162,  4,234,202, 16,252,162,  3,173,  0,221, 10,  8, 10, 38

�176, 40, 38,176,202, 16,242,165,176, 73,255, 9�$�"P" � � A$;:� 1000j'� 10050`� 15:� 15,8,15,"I0:":�15:a� "@0:FILE LOCK V0222",8XH� 15,8,15:�15,A$,B$,C$,D$xI�:� A$"�"B$"�"C$"�"D$:�15:�HIT "YL$"<RETURN>"BL$;�3'� 70:�:� "READING DIRECTORY":�8'� 200:PG�0:ZN�0:� 400�B'RW�24:CL�0:�4,208, 14, 96, 32,109,202Lh
�169, 77, 32,168,255,169, 45, 76,168,255,162,  5,108,  0,  3�r
�196, 13, 14, 79, 78, 45, 82, 65, 77, 32, 12,  1, 65,196, 13�|
� 67, 72, 69,  1, 75, 83, 85, 77, 32, 69, 82, 18, 79,210, 13�
� 70, 73, 76, 69, 32, 69, 82,:� 900��� I
� 2:�15:� � SELECT FILES<%RW�1:CL�12:� 190:� YL$NC$;X&RW�24:CL�0:� 190:� CD$;x'RW�3:CL�18:� 190:� AR$;:J�0�*� 50�+� A$�CM$ � ��,� A$��(13) � �   820:� 810�-� A$�AR$ � � 10000:� EXIT AND START OVER
.� A$��(19
40,  5,164,176, 76,121,  0,200,177,122,201,147,208,244u	�� 24,165,122,105,  2,133,122,144,  2,230,123, 32,212,225,160�	��  0,196,183,240,  8,177,187,153,240,203,200, 16,244,169,160�	��153,240,203,200,192, 16,144,248, 32, 11,202,120, 32,201,2018
�0:� A$"�"B$"�"C$"�"D$;:ER�1:��ER�0:��� NF�38 � �<�PG�PG�1:� PG�38�NF � PG�0H�� 400:�l'�:� FL$(76),S(76),EN(76),SF(76)�'BL$��(154):YL$��(158):RV$��(18):RO$��(146):AR$��(95)�'� 53280,11:� 53281,0:� �(147)BL$;'CD$�BL$�"  <CRSR> <H6, 32,109,202D

�169, 73, 32,168,255, 32,174,255,169,  0,160,203,133,176,132�
"
�177,169,  0,160,  3,133,178,132,179,169,  8,133,180, 32,131�
,
�202,169, 87, 32,168,255,165,178, 32,168,255,165,179, 32,1686
�255,169, 32, 32,168,255,160,  0,162, 31,  0, 24, 74,176,250,162,  3,169,  0,  6,  8X�
� 42, 10,  6,  8, 42, 10,141,  0, 24,202, 16,240,162,  1,202��
�208,253,234,234,169,  0,141,  0, 24, 96,120,165, 58, 32, 33��
�  3,160,  0,185,  0,  6, 32, 33,  3,200,208,247,173,  1,  6�
�133,  7,17 82, 79, 32, 13, 13, 13, 72, 73P�
� 76, 79, 65, 68, 46,  3, 54, 52, 32, 86, 48, 55, 50, 56, 56��
� 50, 41, 41, 67, 41, 32, 49, 57, 56, 50, 32, 66, 89, 32,  3��
� 79, 69, 77, 95, 69, 79, 83,  5, 32, 67, 85, 27, 73, 75,  1�
� 27, 83, 57,121, 25, 6)  � � 190:� " ";:� 1000:� 805)/� A$��(157) � �  890:� 810H0� A$��(17)  � �  840:� 810g1� A$��(145) � �  860:� 810�2� A$��(29)  � �  880:� 810�3� 810�4TP�CL:CL�CL�17:I�PG�38�ZN�19�J�5�SF(I)�1��190:��(146)FL$(CF�I);:SF(I)�0:� 8247�160,  1,162,  8,165,185,240,  6,172,  2,200,174,  3,200,132y
��174,134,175, 32,147,201,176,  8, 32,201,201, 32,144,201,144�
��248, 88,165,185,208,  4,166,174,164,175,173,  0,200, 13,  1�
��200,208,  3, 76,156,225, 76,161,225,162,  2, 44,162,  4,17OME>"�YL$�" MOVES "�BL$�" <RTRN>"�YL$�" SELECTS �"�BL$Z'HD$��(18)�"          FILE LOCK V0222/85            "��(146)e$'� HD$;�.'�:� "INSERT DISK AND HIT "YL$"<RETURN>"BL$;�3'� 70:�:� "READING DIRECTORY":�8'� 200:PG�0:ZN�0:� 400�B'RW�24:CL�0:�177,176, 32,168,255H@
�230,176,230,178,202, 16,244, 32,174,255,198,180,208,210, 32�J
�131,202,169, 69, 32,168,255,169,112, 32,168,255,169,  3, 32�T
�168,255, 76,174,255, 32,174,255,169,  0,133,144,165,186, 32^
�177,255,169,111, 32,147,255,165,14
3,  0,  6,133,  6, 88, 96, 32,  0,193,169, 18,133\�  6,169,  1,133,  7, 32,  3,  3, 32,100,  3,160,  7,132,  9��169,  0,136,133,111,132,112, 32,169,  3,240, 61, 24,165,111��105, 32,133,111,198,  9, 16,240,165,  6,208,219, 32, 15,  3&�238,
7, 88, 89,  9, 81, 91, 25, 56, 61, 32T�
� 53, 32, 76, 25,  3,169,224,133,  0,165,  0, 48,252,201,  2��
�144,  9,162,  0,138,157,  0,  6,232,208,250, 96,120,169,  6��
�133, 49, 76,209,244,133,  8,173,  0, 24, 74,144,250,169,  8�
�141,  0, 24,173,� SF(I)�0 � � 190:� �(18)FL$(CF�I)�(146);:SF(I)�1'8CL�TP:�FHI�PG�38�ZN�19�J:� I�NF � �^IJ�J�1:� J�19 � J�19oL� 190:� " ";�MRW�RW�1:� RW�21 � RW�21:J�J�1�R� 190:� AR$;:��\J�J�1:� J�0 � J�0�]� 190:� " ";�aRW�RW�1:� RW�3 � RW�3�3<��  0,200,208, 25,173,  1,200,240, 18,160,  0,189,  0,200,145}��174,236,  1,200,240,  6, 32,194,201,232,208,240, 56, 96,160���  0,189,  0,200,145,174, 32,194,201,232,208,245, 24, 96,230���174,208,  2,230,175, 96, 32,216,201,160,  0, 32,216, 190"G'�YL$ "SCRATCH LOCK UNLOCK PAGE BOOT QUIT ?  "BL$�(157);,H'� 100=L'� A$�"Q" � �gQ'� A$�"S" � � A$;:CM$�A$:� 500:� 10000�V'� A$�"L" � � A$;:CM$�A$:� 600:� 10000�['� A$�"U" � � A$;:CM$�A$:� 700:� 10000�`'� A$�"B" � � A$;:� 10000�e'� A253,185,32,192,145,208,185,72,192,145,212I;��136,16,243,32,226,193,88,96,234,234,234,234,234,234,234,234,32�L��226,193,32,132,194,170,165,251,32,155,193,32,205,193,166,254,202�]��240,208,56,165,208,233,40,133,210,133,214,165,209,233,0,133,211n��
� FILE LOCK V0222/85&
� 1000022� 198,0J4� A$:� A$�"" � � 52P7�fF� WAIT FOR RETURNzP� 198,0:� 204,0�U� A$:� 207,0:� A$���(13) � � 85�Z� 204,1:� " "�(157);:��d� WAIT FOR KEY�i� 198,0:� 204,0
	n� A$:� 207,0:� A$�"" � � C:ROW�BR�A:�4120COL�BC:ROW�BR�A(� ROW�1 � ROW�5 �40908"�3010:�5010N,�K$:�K$��"" �4160T6�r@��(DO$,5);�(SP$,6);:�3040xJ��TA��(�(1)�4)�1�^A2��(�(1)�2)�h���� ***  PREPARE TO SCROLL  ***��� COL��BC �5060��� BR�ROW � �	,210,145,208,104,145,212,198,211,198,254,16,201G:ƒ32,226,193,88,96,234,234,234,234,234,234,234,234,32,226,193,32�Kƒ132,194,165,251,166,211,32,155,193,177,208,133,210,177,212,72,164�\ƒ253,240,15,136,177,208,72,177,212,200,145,212,104,145,208,136,
H�1:�B1$;:�K$��(147)�8100*T�HM$;�6);�(117);:�X�1�27:��(96);:�:��(105)Z^��6)�(98);" ";:�X�1�25:��(164);:�:�" "�(98)sh��(DO$,2):� X�1 � 20�r� �6);�(98);�(167);�25);�(180);�(98)�|����HM$;�(DO$,23);����6)�(98);" ";:�X�1�25:��(163);:�:�" F$:S(NF)�SC:EN(NF)�F:NF�NF�1E
� F9J
� T��0 � TK�T:SC�S:� 230DO
�2:�15RT
NF�NF�1:�o�
� PRINT FORMATTED SCREEN��
� �(147);:� HD$:���
RW�2:CL�0:H�20:W�19:� 150:��
RW�2:CL�20:H�20:W�19:� 150��
� FILL SCREEN WITH FILES��
RW�3:CL�1:� 190:Z24,32,119,193,202,16,234,48,184,41,3,9,216,133,215,164,253\��177,210,145,208,177,214,145,212,136,16,245,165,211,133,209,165,210����133,208,165,215,133,213,165,214,133,212,96,72,169,216,133,208,172����136,2,136,132,209,24,165,208,105,40,133,208,165
110	s� 204,1:� " "�(157);:�.	�� BOX ROUTINE8	�� 190i	�� �(117);:� I�0 � W�2:� �(99);:� I:� �(105);�	�� J�0 � H�2:RW�RW�1:� 190�	�� �(103);:� I�0 � W�2:� " ";:� I:� �(104);�	�� J�	�RW�RW�1:� 190

�� �(106);:� I�0 � W�2:� �(99);:� I:� �(�VU��(ROW�BR):D�4:TR�ROW�1"�� BR�ROW � D�3:TR�ROW�1B�BR�ROW:�1010:ROW�TR:�3040:�Z�� ROW��BR � �6010:�x�HU��(COL�BC):D�2:TC�COL�1��� BC�COL � D�1:TC�COL�1��BC�COL:�1010:COL�TC:�3040:���� COL��BC � ��p� *******  BUZZER  *******�208mƒ241,165,2,208,3,169,32,44,165,210,145,208,104,145,212,198,211\~ƒ198,254,16,203,48,182,166,252,138,24,101,254,133,211,96,234,24��ƒ164,252,166,251,32,240,255,96,234136,145,212,104,145,208,200,196,253,144,239,165,2,208)ƒ3,169,32,44,165"�(98)���6);�(106);:�X�1�27:��(96);:�:��(107)!�� ROW�1 � 51�� COL�1 � 5a�� ROW�5 � COL�5 � �B3$;:CU$�BS$:�3040:�8170z��B3$;:CU$�BS$:� 3040���B1$;:CU$�T$:�3040���B2$;:CU$�SZ$:�3040���CO$(ROW);CH$(CH);B2$;�(125):CH�CH�1��� COL�N�0
�
� J�0 � 18:I�PG�38�ZN�19�J8
�
� SF(I)�0 � � FL$(I);:� 464X
�
� SF(I)�1 � � RV$FL$(I)RO$;n
�
RW�RW�1:� 190:� J�
�
RW�3:CL�21:� 190:ZN�1�
�
� J�0 � 18:I�PG�38�ZN�19�J�
�
� SF(I)�0 � � FL$(I);:� 474�
�
� SF(I)�1 � � RV$FL$(I)RO$;�
�
RW�RW�1:,209,105,0,133+���209,202,16,240,24,104,101,208,133,208,133,212,165,209,105,0,133h���209,41,3,9,216,133,213,164,253,96,165,2,208,3,169,32,44����177,208,153,32,192,177,212,153,72,192,136,16,236,96,120,162,30����181,208,72,189,0,192,149,208,104,157107);
�� BL$;:�(
�� SET CURSOR LOCATIOMH
�� 214,RW:� 211,CL:� 58640:�]
�� READ DIRECTORY}
�� 15,8,15,"I0:":� 2,8,2,"#"�
�TK�18:SC�1:NF�0�
��15,"U1";2;0;TK;SC�
��#2,A$:A$�A$��(0):T��(A$)�
��#2,A$:A$�A$��(0):S��(A$)
� F�0 � 7:� 8 ENTz�A�1�8:�54296,15:�T�1�3:�:�54296,0:�T�1�3:�:���=d� ***  PONG SUBROUTINE  ***InS�54272Vx� S�1,20b�� S�5,9n�� S�6,9{�� S�24,4��� S�4,17����X� ***  GET KEYBOARD INPUT  ***�b�K$:�K$�"" � �2110:�7010�l�K$��(147)�350� "�g� 800k� 15,8,15:� 2,8,2,"#"9l� I�0 � NF:� SF(I)�0 � � 660Cv� 690`{�#2,A$:� A$�"" � A$��(0)z�FT��(A$):FT�(FT � 64)��� 680��� 900��� I��� 2:�15:���� 695:�2,�(FT);���15,"B-P";2;0���15,"U2";2;0;18;S(I):����15,"U�� ROW���(#� *******  ML ROUTINES  *******#2#�I�49416�498151<#�T:�I,T:�7F#�|��32,226,193,165,251,166,252,32,155,193,32,205,193,166,254,202,48���21,24,165,208,105,40,133,210,133,214,165,209,105,0,133,211,32*��119,193,202,16,235,164,� 190:� J�
ZN�0:��
� SCRATCH0�
NC$�"SCRATCH  FILES ":� 800H� 15,8,15i� I�0 � NF:� SF(I)�0 � � 540�
F$�FL$(I):� �(F$,1)�">" � � 540�F$��(F$,�(F$)�1)��15,"S0:"F$:� 900�� I�&� 15�W��X� LOCK�bNC$�"   LOCK  FILES,0,192,202,16,241,96,2345���234,234,234,234,234,234,234,32,226,193,32,132,194,165,251,166,211yƒ32,155,193,160,0,177,208,133,210,177,212,72,144,13,200,177,208�ƒ72,177,212,136,145,212,104,145,208,200,196,253,144,239,165,2,208)ƒ3,169,32,44,165RIES/SEC
�15,"B-P";2;F�32�26
�#2,A$:� A$�"" � A$��(0)T
A��(A$):� �(A$)�0 � � 325v
L$�">":� (A � 64) �0 � L$�"�"�"
�#2,A$:�#2,A$�,
F$�L$�""�1
� I�0 �  15:�#2,A$:� A$�"" � A$��(0)�6
� �(A$)�160 � � 320�;
F$�F$�A$�@
� IB
FL$(NF)�v�K$�" " � �5000:�7010(�� K$�"A" � ROW�1 � ROW�ROW�1:�3010:�7010U�� K$�"Z" � ROW�5 � ROW�ROW�1:�3010:�7010��� K$�"." � COL�5 � COL�COL�1:�3010:�7010��� K$�"," � COL�1 � COL�COL�1:�3010:�7010���7010�@� *******  DRAW BOARD  *******�JC
��2,B:�"�";P�B�A�256:�253,(B��(B))�256:�254,Bt��:��(�(A),2,�(�(A))�1);"DATA ";���I�0��(2)�1��A$��(�(A�I))�","���A�I��(251)�256��(252)�63780����(A$,2,�(A$)�1);���A�I��(251)�256��(252)�63830���I:�63830$��"� ":� 63870*V��"� ":�6

�� 173,37,3,141,190,192,169,188,141,36K	�� 3,169,192,141,37,3,173,20,3,201t	�� 55,240,21,141,102,192,173,21,3,141�	(�� 103,192,120,169,55,141,20,3,169,192�	2�� 141,21,3,88,96,165,197,201,64,240�	<�� 40,205,127,193,240,35,141,127,193,201
F�� 4,2

)
� -------- THE TILE GAME ----------M�   (C) MURDOCK & BLACKBURN '84h�           10/15/1984n��d�X�1�6:�CH:CO$(X)��(CH):��n� 28,158,156,30,150,5�xB1$��(154):B2$��(31):B3$��(152):C1$�B1$:C2$��(144)��SC$��(147):HM$��(19)	�� S
	189,0,1,240,7,157,119,2,232;
�� 76,251,192,169,32,157,119,2,232,173g
�� 125,193,208,29,134,198,173,122,193,24�
�� 109,126,193,141,122,193,144,3,238,123�
"�� 193,166,252,164,253,173,130,193,133,214�
,�� 76,198,192,160,0,185,65,193,240,86�� 200,
J
PX�0:�53280,PX:�53281,PX$T
�SC$:K$�""A^
�DO$;SP$;B1$;:�8010:�360Kh
�HM$;qr
ROW�5:COL�1:BR�5:BC�5:MV�0:CU$�T$�|
� DO$;�7);CO$(2);"JOYSTICK OR KEYBOARD  (J/K)"C2$;��
�KK$:�KK$�""�390��
�KK$�"J" �420��
�KK$��"K" �390��
�DO$;SP$;:�3040
ROW�1)�4�2LH�(HU�1)�5:V�(VU�1)�4:V�251,L:�252,T:�253,H�1:�254,V�1D`�6510Pj� X�1�Rbt�254,V�1:�2,1k~� MLq��~�� S�4,16������ K$:� K$�""�1500������ ***   READ JOY STICK  ***��JV��(56320)���K$:�K$��(147)�350
�FR�J
31��(198),13b`��"G�63850":�A�631�634:�A,145:�:�A,13:�636,13:�198,6ha���j��"��":�A�1�3:�"        ":�:�"���";�t�A��(253)�256��(254)��(2):�63750�~�Q��(43):U��(44)�����(Q�4�256�U)��131�63900��Q1��(Q�256�U):U1��(Q�1�256�U):Q�Q1:U�U1:�638801��

08,8,173,124,193,73,255,141,124D
P�� 193,201,5,208,8,173,125,193,73,255m
Z�� 141,125,193,201,6,240,31,201,3,240�
d�� 3,76,49,234,169,70,32,153,192,141�
n�� 122,193,141,128,193,165,21,141,123,193�
x�� 141,129,193,162,255,108,0,3,169,91��� 32,153,1
C$;CO$(6)<	��53280,2:�53281,2:��249)"HOLD ON, JUST A SECOND"`	�DO$�HM$:�X�1�24:DO$�DO$��(17):��	�U3$�"":�X�1�3:U3$�U3$��(145):��	�R3$�"":�X�1�3:R3$�R3$��(29):��	�L5$�"":�X�1�5:L5$�L5$��(157):��	�SP$�"":�X�1�39:SP$�SP$�" ":� 
�SZ$��(17)��(29
157,119,2,232,76,49,193,76,185@�� 193,68,65,84,65,0,13,69,78,84YJ�� 69,82,32,76,73,78,69,32,78,85|T�� 77,66,69,82,58,32,0,13,69,78�^�� 84,69,82,32,76,73,78,69,32,73�h�� 78,67,82,69,77,69,78,84,40,48�r�� 45,50,53,53,41,58,32,0,0,0�|�� 0,0,10

�
� ***  MIX Y/N PRINT  ***<
�
�CO$(4);DO$;�(SP$,15);"MIX  (Y/N)";O
�
�A$:�A$�""�450�
�
�A$� "Y"� �DO$;SP$;:�3040:�4010:MV�0:�DO$;SP$;:�490�
�
�A$� "N"� �DO$;SP$;:�490�
�
�450�
�
CU$�T$:�3040:�KK$�"K" �7000�
�
�2010�
�� ***  SCROLL ROUTINE  *
V�16:� FR��16� �5010:�2010�JV�15�(JV�15)5� JV�0 � �2110:�2010`� JV�1 � ROW�1 � ROW�ROW�1:�3010:�2010�� JV�2 � ROW�5 � ROW�ROW�1:�3010:�2010� � JV�8 � COL�5 � COL�COL�1:�3010:�2010�*� JV�4 � COL�1 � COL�COL�1:�3010:�20104�2010:� sP�Q�256�U:�P,0:�P�1,0O���"����������������������"n���"TYPE LIST TO SEE DATA�"����"���������������������"I))�","���A�I��(251)�256��(252)�63780����(A$,2,�(A$)�1);���A�I��(251)�256��(252)�63830���I:�63830$��"� ":� 63870*V��"� ":�6
92,141,126,193,173,128,193,141F��� 122,193,173,129,193,141,129,193,162,255l��� 108,0,3,160,193,32,30,171,32,96���� 165,134,122,132,123,32,115,0,170,240���� 243,162,255,134,58,144,1,96,32,107���� 169,169,0,133,198,165,20,96,32,87��� 241,8,133
)��(110)��(163)��(109)��(157)��(157)@
�SZ$�SZ$��(157)��(17)��(125)t
�T$��(111)��(183)��(183)��(183)��(112)�L5$��(17)�
�T$�T$��(165)�R3$��(167)�L5$��(17)�
�T$�T$��(165)�R3$��(167)�L5$��(17)�
�T$�T$��(108)��(175)��(175)��(175)��(186)�L5$�U3$

,64,0,0���"����������������������":�"TO CONVERT MEMORY TO �"����"DATA STATEMENTS ENTER�":�"���������������������"����"INCLUSIVE DECIMAL":�"MEMORY LOCATIONS":�:�"FROM";A����:�"TO";C:�:�"BYTES PER LINE";B��C�C�256:�251,(C��(C))�256:�252,C+�
**�MV�MV�1:�DO$B2$"MOVE"B1$;MV;4�� D �1030,1050,1060,1080UML�49661:R�5:VU�0:COL�COL�HUg�1090:� *LEFT�ML�49735:R�5:VU�0:�1090:� *RT�$ML�49416:R�4:HU�0:ROW�ROW�VU�.�1090:� *UP�8ML�49483:R�4:HU�0:�1090:� *DN�BL�(COL�1)�5�8:T�(
* INVALID DIRECTION *>�C1$;T$;H�C2$;T$;#R�F�� *******  SET CURSOR  *******Y�� FL � CU$�BS$k��C1$;CU$;C2$;v�CU$�T$��R�(ROW�1)�4�2:C�(COL�1)�5�8���251,R:�252,C��� 49806���CU$;�� ROW�BR � COL�BC � FL�1:�3100�FL�0���� *******  RANDOM MIX  *******B�A��(�(0)):��(DO$,5);B2$;"MIXING"B1$;:�3040R�� MX�1 � 20\��4180|��A2�1�ROW�BR:COL�BC�A:�4060��ROW�BR:COL�BC�A��� COL�1 � COL�5 �4030���3010:�5010���K$:�K$��"" �4160���4180��A2�1�COL�B
,251,201,13,240,4,165,251;��� 40,96,173,124,193,240,247,169,13,32i��� 210,255,165,214,141,130,193,206,130,193���� 134,252,132,253,173,123,193,174,122,193���� 133,98,134,99,142,128,193,141,129,193���� 162,144,56,32,73,188,32,223,189,162
��� 0,
BS$�B2$:�X�1�5:BS$�BS$��(166):�X
BS$�BS$�L5$��(17):BT$�"":� X�1�4:BT$�BT$�BS$:�:BS$�BT$�B1$�
�CH$(24):� X�1�24:�CH$:CH$(X)�CH$:��"
� A,B,C,D,E�'
� F,G,H,I,J�,
� K,L,M,N,O�1
� P,Q,R,S,T�6
� U,V,W,X�@
� �(49475)��234 � �(49806)��24� �9010,30,192,189,84,2071>�208,3,76,31,196,173,6,207,61,175,207,240,69,173,6,207,41,1,240,41,173{@�80,207,240,36,32,65,192,240,31,169,.,157,41,207,168,189,23,207,208,5�B�169,1,153,82,207,169,.,157,11,207,169,1,157,8,207,141,88,207,208,21,173D�6,20,.,190,254,252,248,224,.,.,.,255)��255,255,255,255,255,255,255,-1)��****SPRITE DATA****g)��.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,16,127,224,25,255,248,27,255�)��24,31,255,24,31,255,248,27,255,248,25,255,248,16,127,224,.,.,.,.,.,.,.*��.,.48,141,2,4,238,1,4,136,208,235,172,45,207,240,34,169,.,141,45U"Z�207,152,24,109,53,207,141,53,207,238,38,4,173,38,4,201,58,208,8,169,48�"\�141,38,4,238,37,4,136,208,235,206,219,207,208,164,206,220,207,208,159�"^�206,221,207,208,154,96,189,17,207,20	57,29,207,157,35,207,189,35B*�207,240,18,222,20,207,222,38,207,208,33,169,5,157,29,207,157,32,207,208�,�23,32,38,196,32,164,196,208,11,192,218,208,11,169,.,157,11,207,240,4�.�192,235,240,245,32,30,192,76,85,195,189,8,207,240,89,169,32,157,119,20
247,253,255,255,255,253,253,223,223,127,223;&x�247,255,255,255,80,244,241,192,192,192,240,240,255,127,127,221,221,223�&z�223,223,127,223,255,255,255,127,223,255,240,241,84,124,221,255,247,255�&|�20,64,64,68,17,64,1,20,16,64,1,84,.,80,5,64,63,253,25,.,.,.,.,40,.,.,166,.,2,42,.,.,10,.,.,8,.,10,40,160,42,170;-��168,42,170,168,42,170,168,42,170,168,170,187,170,168,179,42,168,51,42�-��160,51,10,128,192,194,.,192,192,3,51,48,.,128,192,194,128,51,2,128,51�-��2,160,51,10,168,51,42,168,179,42,170,1877,41,2,240,14,173,81,207,240,9,32,85,192,240,4,169,1,208,206,222^F�122,207,208,13,169,10,157,122,207,189,125,207,73,1,157,125,207,188,125�H�207,189,11,207,208,5,189,8,207,240,5,185,178,207,208,13,189,26,207,208�J�5,185,180,207,208,3,185,182,207,
,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.K*��4,127,128,6,254,96,7,254,96,7,255,224,6,255,224,4,127,128,.,.,.,.,.,.�*��.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.�*��.,.,.,.,8,124,.,12,255,128,78,12,189,14,207,201,160,176,3,169%#`�.,44,169,1,96,141,130,207,173,30,208,141,6,207,96,-1<#b�****VARIABLES****�#d�252,253,254,253,1,2,254,253,24,64,.,1,251,247,239,4,8,16,250,251,250�#f�250,249,249,4,6,8,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,7$0�189,41,207,10,168,185,.,208,157,14,207,185,1,208,24,105,13,157,20,207n2�188,41,207,185,4,207,157,17,207,189,14,207,217,168,207,208,44,189,17�4�207,217,170,207,208,36,189,20,207,201,109,176,29,141,87,207,169,.,1536�82,207,157,84,207,173,20,255,255,253,63'~�15,239,255,119,239,111,239,255,255,255,223,175,235,250,95,255,255,112j'��212,252,252,252,252,240,192,.,.,.,3,15,63,255,255,15,63,255,255,255,240�'��192,.,.,192,192,192,.,.,.,.,63,253,250,255,255,253,63,15,247,255,238(��247,24�,170,42,170,168,42,170,168,42.��170,168,42,170,168,10,40,160,.,8,.,.,10,.7.��.,42,.,.,38,.,.,42,.,.,8,.,.,8,.,.,.,.,.,.,.,.,-1,170,170,170,170,170,170,170,187�,��170,40,179,40,40,51,40,.,51,.,.,192,192,.,192,192,3,51,48,.,.,.,.,.�,��.,.,.,.,.157,250,7,173,21,208,29,175,207,141,21B L�208,189,23,207,208,3,169,.,44,169,1,157,41,208,169,208,133,252,189,184� N�207,133,251,189,14,207,160,.,145,251,200,189,20,207,145,251,172,16,208� P�189,17,207,240,6,152,29,175,207,208,4,152,61,172,207,141,1,254,96,7,254,96,6,255,224,2,127,224,.,3,1282+��.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,40,.,.|+��166,.,130,42,2,160,10,10,160,8,10,170,40,170,170,170,170,170,170,170�+��170,170,170,42,170,168,42,187,168,40,179,40,.,51,.,.,518,32,30$h�27,23,18,12,5,6,13,19,24,28,31,33,112,142,6,-1($j�****PROGRAMABLE CHARACTERS****u$l�.,.,.,.,.,.,.,.,255,223,247,247,247,255,127,255,192,252,255,223,245,255�$n�255,255,.,.,.,.,.,64,192,192,247,253,255,253,245,247,247,253,255,247
%p�21,208,61,172,207,141,21,208,189,26,207,24,105P8�1,153,44,207,76,85,195,169,64,157,119,207,189,14,207,201,160,208,21,234�:�234,234,169,.,157,29,207,169,40,157,38,207,157,11,207,157,35,207,208�<�14,173,18,208,201,37,176,7,169,7,32,.,192,240,224,32
6,247,255,255,255,251,245,215,95,250,255,255,112,212,252,252,252L(��252,240,192,.,.,.,.,.,.,.,.,.,3,3,3,.,.,.,.,240,252,255,255,255,15,3,.�(��.,.,.,192,240,252,255,255,252,254,255,126,31,30,28,127,.,.,192,240�(��248,252,252,252,255,253,127,31,3,3,.


'�"�":� 53280,5:� 53281,13:� 646,0K�"           AUTO LINE NUMBERS"x�:�"F1=TOGGLES ON/OFF":�"F3=ADDS 'DATA'"��"F5=CHANGE INCREMENT":�"F7=CHANGE LINE #"�
�I�49152�49537:�A:�I,A:���49152:���� 173,36,3,201,188,240,19,141,189,192%	6,208,202,48$!R�3,76,45,194,96,254,20,207,188,20,207,96,157,91,7,169,19,141,174,7,96o!T�157,91,7,169,20,208,245,32,165,192,32,43,194,32,59,193,172,44,207,240�!V�34,169,.,141,44,207,152,24,109,52,207,141,52,207,238,2,4,173,2,4,201,58	"X�208,8,169,1,.,.,192,192,.,��192,192,3,51,48,.,.,.,.,.,.,.,.,.,.,.,.,.,.,40,.,.,166,.,2,42,.,.,10,.^,��.,8,.,10,40,160,42,170,168,42,170,168,170,170,170,170,170,170,170,187�,��170,40,179,40,40,51,40,.,51,.,.,192,192,.,192,192,3,51,48,.,.,.,.,.�,��.,.,.,.,.53,253,255,127,255,127,192,240,240,192,64,65,116,240,223,255,127,255W%r�223,247,253,253,255,223,213,127,223,223,215,247,240,240,252,252,223,247�%t�247,255,255,95,247,253,255,223,247,253,192,252,255,255,255,255,255,255�%v�.,.,.,.,64,208,192,192,247,
�56,48:�52,48:�)#��(16375)�8�700Y&�"�PREPARING MACHINE LANGUAGE..."�(�53265,27:�56334,�(56334)�254:�1,�(1)�251:�I�.�79�*�14720�I,�(53632�I):�:�1,�(1)�4:�56334,�(56334)�1�,�I�53104�53151:�I,1:��-I�.:Z�.�.�A:�A�0�48	/204,,,204,,,204,,,216,,,240,,0�$s� ACE7%x�,,,,,,,,,,3,240,,3,,,3,,,3,224,,3,,,3,,,3,240,,,,1,224,,3,48,,3,,,3^%}�,,3,,,3,48,,1,224,,,,,96,,,240,,0p%p� NOTE VALUES�%z�12,143,14,24,15,210,16,195,18,209,21,31,22,96,25,30,28,49,31,165,33,135&��3,38:�1252,39,��55483,1:�55484,1:�55523,1:�55524,1b��I�1384�1387:�I,I�1363:�:�I�1424�1426:�I,I�1399:����I�1420�1423:�I,I�1392:�:�I�1461�1463:�I,I�1428:����I�1864�1882:�I,40:�I�40,40:�I�80,40:����I�1984�2023:�I,40:�
��52992,140:�52993,140	07,208,17,173,47,207,56,253P��14,207,176,2,73,255,201,24,176,36,144,31,173,46,207,208,11,173,47,207���56,253,14,207,144,20,176,9,189,14,207,56,237,47,207,144,9,73,255,201���24,176,3,169,1,96,169,.,96,206,49,207,208,59,206,128,207,208,54,169.�
RUN"+���19)"BY":��15)"MIKE WACKER":�"HIGH SCORE= "HSX���12)"PRESS F1 TO PLAY"���53248,174:�53249,210:�53264,.:�53269,1:�53287,6:X(3)�253���53276,1:�53285,1:�53286,.:A�10:B�.:X(.)�254:X(1)�253:X(2)�252���Z$:� Z$�"" � 7188,207,169,1,208@�191,162,1,222,112,207,240,3,76,36,194,189,80,207,208,11,189,82,207,208�
�3,169,48,44,169,88,44,169,18,157,112,207,189,80,207,240,20,189,.,207��201,197,208,7,169,.,157,80,207,240,6,254,.,207,76,246,193,188,.,220�152,41,1,�49152�I,A:Z�Z�A:I�I�1:�46@	0�Z��160018��"ERROR IN CODE DATA":�L	1I�.:Z�.[	2�A:�A�0�52z	3�53152�I,A:Z�Z�A:I�I�1:�50�	4�Z��4625��"ERROR IN VARIABLE DATA":��	5I�.:Z�.�	6�A:�A�0�56�	7�14336�I,A:Z�Z�A:I�I�1:�54
8�Z��55366��"ERROR IN CHARAB7,162,42,62,44,193,50,60,56,99,63,75,67,15,75,69,84,125,89,131,,,248,,,,,120,,,204,,,192W$_�,,220,,,204,,,204,,,120,,,,,252,,,192,,,192,,0a$d� DFA�$i�,,204,,,252,,,204,,,204,,,204,,,,,252,,,192,,,192,,,248,,,192,,,192�$n�,,192,,,,,240,,,216,,,:�52994,96:�52995,240:�52996,.K
��52997,.:Z��(53278):�I�53072�53103:�I,.:�:�53036,.a
��53269,3:�53037,.�

�53211,255:�53212,255:�53213,12:�54296,79:�54294,55�

�54295,129:�54277,128:�54278,240:�54276,129:�54273,255
�54284,128:�54285,240:�5428�4,141,128,207,206,129,207,173,129,207,106,162,2,176,17,189,187,207,32y��45,196,189,190,207,157,131,7,189,193,207,208,15,189,196,207,32,54,196���189,199,207,157,131,7,189,202,207,157,171,7,202,16,216,206,130,207,240�1,96,169,160,32,182,196,1734�� Z$�"�" � 100�A�10:B�B�1:�B�4�B�..��2040,X(B):�714E��****CODE DATA****���133,169,134,140,132,141,166,169,202,16,2,166,169,198,139,208,247,173���18,208,133,139,138,72,166,140,164,141,104,96,254,14,207,208,3,254,17"��207,189,17,20208,10,189,.,207,201,69,240,3,222,.,207,152,41,2,208,10,189j�.,207,201,197,240,3,254,.,207,152,41,4,208,25,189,4,207,208,7,189,2,207��201,24,240,13,222,2,207,189,2,207,201,255,208,3,222,4,207,152,41,8,208�20,189,4,207,240,7,189,2,207,201,64,CTER DATA":�
9I�.:Z�.#
:�A:�A�0�60B
;�15936�I,A:Z�Z�A:I�I�1:�58j
<�Z��25190��"ERROR IN SPRITE DATA":�s
>�700�
d�*****SET-UP PLAYFIELD*****�
i�53265,11�
n�"�":�53280,5:�53281,3:�53269,.:�53270,�(53270)�16x�53272,30:�53275,.:�53276,3:�07,153,.1�208,189,.,207,153,1,208,172,16,208,189,4,207,240,6,152,29,164,207,208}�4,152,61,166,207,141,16,208,202,48,3,76,61,193,96,162,2,189,84,207,208� �56,206,7,207,240,3,76,31,196,206,118,207,208,248,169,13,141,118,207,157"�84,207,169,.3,17:�1025,48:�1026,48:�1061,48M"
�1062,48:�55297,6:�55298,6:�55333,.:�55334,.:�53044,.d,
�53045,.:�53265,27o�
�50237��
�"�":�53272,21:�I�54272�54296:�I,.:�:�53281,6�L��(53044):R��(53045):�53269,.��L�HS�HS�L�
�R�HS�HS�R
�L�R���08),87,207,240,16,169,.,141,87,207,141,51,207]�169,7,141,50,207,141,89,207,173,89,207,240,35,206,50,207,16,7,169,.,141��89,207,240,16,174,50,207,173,51,207,208,5,189,205,207,208,3,189,212,207��141,7,212,141,8,212,96,173,88,207,240,250,169,.,141,7,240,21,189,14,207,201,88,208,14,169,.,157,84,207,173m��21,208,61,172,207,141,21,208,96,173,4,207,141,46,207,173,.,208,141,47���207,173,1,208,141,48,207,208,18,173,5,207,141,46,207,173,2,208,141,47��207,173,3,208,141,48,207,173,46,207,221,17,2
240,8,254,2,207,208,3,254,4,207,152O�41,16,208,10,189,.,207,201,102,176,3,157,80,207,222,114,207,208,15,169��8,157,114,207,222,116,207,16,5,169,3,157,116,207,188,116,207,189,80,207��240,4,169,255,208,3,185,160,207,157,248,7,138,10,168,189,2,253282,1:�53283,.:�53285,13��53286,.:�53287,6:�53288,11n��I�56136�56295:�I,14:�:�I�55656�55659:�I,14:�I�40,14:����I�55692�55695:�I,8:�I�40,8:����1234,36:�1235,37:�1274,38:�1275,39:�55506,1:�55507,1��55546,1:�55547,1:�1211,36:�1212,37:�1251,157,8,207,157,11,207,157,14,207,157,17,207,169,218,157,20_$�207,169,5,32,.,192,157,23,207,169,1,32,.,192,157,26,207,222,119,207�&�208,200,234,234,234,234,234,234,189,11,207,240,75,169,64,157,119,207�(�189,29,207,240,13,222,32,207,208,54,169,.,1"THE LEFT (BLUE) PLAYER WON!":�535Y�L�R���08)"THE RIGHT (BLACK) PLAYER WON!":�535z��16)"IT'S A TIE!"���15)"LEFT SCORE="L:��14)"RIGHT SCORE="R��I�1�5000:����53280,5:�53281,3:�"�":��15)"�SALMON  THE"3�"    �TREBLE� CLEF�,�";G8�X�1�3:�V�21,129:�Y�1�500:�:�V�21,128:�Y�1�100:�Y,X{=�V�21,129:�X�1�200:�:�" AND THE �BASS� CLEF�.�B�X�1�3:�V�21,131:�Y�1�500:�:�V�21,129:�Y�1�100:�Y,X�G�V�21,131:�4300�L��7)"TOGETHER THEY ARE KNOWN54274,0:�V�21,�(V�21)�64'��54296,15:�54273,A(NI):�54272,B(NI):�54277,15:�54278,0O��54275,10:�54274,0:�V�21,�(V�21)�64{��54276,65:�X�1�750:�:�54276,64:�54296,0���V�21,�(V�21)�191:���� WRONG ANSWER��54296,15:�54277,45:�54278,165:�54276,6SIC ALPHABET"��214,20:�:��15)"G�B�D�F�A�C�E�G�B�D�F"1��V�8,210:�V�9,160b��2044,201:�V�43,0:�V�44,11:�V�45,0:�V�21,223v��4300:�V�21,255���"���GA�B�C�D�E�F�G�A�B� ��D�E�F�G�A�B�C�D�E�F"���"��      THE NAMES OF THE PIANO KEYS"
��"  	   3  NAME THE NOTE".��"     4  PIN THE NOTE ON THE STAFF"=�NP�50:L1�0b��"             PRESS CHOICE"u��A$:�A$�""�940��G��(A$)���G�1�G�4�940���G�960,965,970,975���"�              NOTE PRIMER":�:�:�V�21,128:�100��"�      
AFF, MIDDLE C IS ON A"!7�"   SPECIAL LINE CALLED A LEDGER� LINE�"8<�4300:�V�21,0:�900B��2000V�� READ JOYSTICK���T�1�80:�:JV��(56320):FR�JV�16:JV�15�(JV�15):����:� HELP�h� RANGE SELECTION�m�L1�0�N$�"�"�r�214,22:�:�N$��"�"�422,,,,,,,,,,,,,,,,,,,,,,,,,,,0�!� LETTER C'"
�120,,,204,,,192,,,192,,,192,,,204,,,120,,0W"�,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,0c"� CLOWN�"�,16,,,84,,1,85,,5,85,64,62,170,240,254,34,252,62,154,240,10,154,128�"(�9,169,128,8,84,128,9,1,1 AS"O��11)"THE �GRAND� �STAFF�."GQ�X�1�2:�V�21,128:�Y�1�100:�:�V�21,131:�Y�1�500:�Y,X|V�4300:�" EACH LINE AND SPACE ON THE GRAND STAFF"�[�"     REPRESENTS A KEY ON THE PIANO"�`�214,5:�:�"^";:�V�21,147�a�54296,15:�54275,0:�54274,25
5:�54273,1��54272,195:�54275,5:�54274,120,�X�1�300:�:�54276,32:�54273,0:�54272,0:�>�� TREBLE CLEF���,12,,,10,,,10,,,10,,,12,,,24,,,56,,,104,,,200,,1,136,,3,62,,6,75,0���12,137,128,12,200,192,12,8,192,6,8,192,3,137,128,,255,,,8,,,40,,,56,    MATCH THE NAMES ON THE STAFF"��43005��"    TO HELP LEARN THE NAMES OF THE"e��"      LINES AND SPACES, REMEMBER:":�4300����6)"TREBLE CLEF SPACES, THE WORD:"����16)"�FACE�"���4300���"    TREBLE CLEF LINES, THE SENTENCE:"�      KEYBOARD SEARCH":�:�:�V�21,128:�100N��"�             NAME THE NOTE":�:�:�V�21,128:�100���"�       PIN THE NOTE ON THE STAFF":�:�:�V�21,128:�100��� NOTE PRIMER���2042,195:�2043,200:�2044,196:�2046,202���V�23,131:�V�29,3:�V�28,00wL1�11:L2�11:�"  F1-�TREBLE�  F3-�BASS  F5-�GRAND �STAFF":�.|�N$��"�"�4230q�L1�11:L2�1:�"  F1-�TREBLE�  F3-�BASS�  F5-�GRAND �STAFF":���L1�21:L2�1:�"  F1-�TREBLE�  F3-�BASS  F5-�GRAND� �STAFF�":���� CLEAR AND POSITION CURSOR28,1,85,,63,171,240,63,207,240,63,19,240,,16,,,,#2�,,,,,,,,,,,0#7� MIDDLE Cg#<�255,240,,255,240,,255,240,,255,240,,255,240,,255,240,,255,240,,255,240n#A�0�#F�255,254,,255,254,,255,254,,255,254,,255,254,,255,254,,255,254,,255,254�#K�,,,,,,,,5:�54277,13:�54278,0 b�54273,A(1):�54272,B(1):�54276,65Ze�X�1�1100:�:�"� ^";:�V�9,214:�54273,A(2):�54272,B(2)rf�54276,64:�54276,65�j�Y�1�19:�X�1�1100:�:�"�  ^";:�V�9,�(V�9)�4�k�54273,A(Y�2):�54272,B(Y�2):�54276,64:�54276,65:��l�X�1�100��� BASS CLEF. ��31,,,96,195,,192,99,,240,48,,112,48,,,51,,,51,,,96,,,192,,1,128,,3,,,12V ��,,48,,,192,,,,,,,,,,,,,,,,,,,,,,,0` �� 4/4� ��,1,192,,3,192,,6,192,,12,192,,31,224,,,192,,1,224,,,,0� ��1,192,,3,192,,6,192,,12,192,,31,224,,,192,,1�"     �E�VERY G�OOD B�OY D�ESERVES F�UDGE"��4300E��"    BASS CLEF SPACES, THE SENTENCE:"m���11)"�A�LL C�OWS E�AT G�RASS"w�4300��"     BASS CLEF LINES, THE SENTENCE:"�
�"      �G�REAT B�IG D�OGS F�IGHT A�NIMALS"��V�4,170:�V�5,200:�V�6,186:�V�7,1809�V�8,170:�V�9,219:�V�12,227:�V�13,139]�V�41,0:�V�42,0:�V�43,7:�V�45,0g�4250�$�"�   MUSIC IS WRITTEN ON A SET OF LINES"�)�"      AND SPACES KNOWN AS A STAFF�."�.�4300:�"       THE BASIC STAFFS ARE
���214,6:�:�X�1�12:�"             ";:�.��214,22:�:��7)"                          "C��214,6:�:�"";:�^�� INSTRUCTION CONTINUE���214,22:�:��7)"�PRESS ANY KEY TO CONTINUE.�"���A$:�A$�""�4320���4250:���� CORRECT ANSWER���54275,10:�
,,,,,,,0�#P� EGB#$Z�,,,,,,,,248,,,204,,,204,,,248,,,204,,,204,,,248,,,,,120,,,204,,,192W$_�,,220,,,204,,,204,,,120,,,,,252,,,192,,,192,,0a$d� DFA�$i�,,204,,,252,,,204,,,204,,,204,,,,,252,,,192,,,192,,,248,,,192,,,192�$n�,,192,,,,,240,,,216,,,00:�:�54276,64o�4300:�V�21,131>t�"   THE MUSIC ALPHABET IS FROM A� TO G�.":�4300ly�"  AFTER G IT REPEATS, STARTING WITH A."�~��6)"(A B C D E F G A B C . . .)���4300���"� EVERY LINE AND SPACE HAS A LETTER NAME"����8)"FROM THE MU,224,,,,0� ��,,,,,,,,,,,,,0� �� ACE=!��,,,,,248,,,192,,,192,,,252,,,,,120,,,204,,,192,,,192,,,192,,,204,0u!��,120,,,,,48,,,120,,,204,,,252,,,204,,,204,,,204,,0�!�� NOTE BODY�!��,,120,,,252,,1,254,,1,254,,1,254,,,252,,,120,0�!�,,,,,,,,,,,,,�4300
�"    THE NOTE C IN THE MIDDLE OF THE"?�"   PIANO KEYBOARD IS CALLED MIDDLE� C�.l�214,20:�:��15)"�ÑÑÑÑÑ��ÑÑÑÑ�"z#�V�21,163�(�214,5:�:�"��� ݠݠݠݠݠݠݠݠݙ�ݠݠ� ݠݠݠݠݠݠݠ"�-�4300�2�"�  ON THE GRAND ST
"�53280,6:�53265,�(53265)�239L
�I�1�16:�A$:�:X�60:Y�57:CL�1:SC�53281k�I�12288�12799:�SP:�I,SP:���:L$�""�M�.:V�53248:�I�2040�2047:M�M�1:�I,191�M:��(�I�39�46:CL�CL�1:�V�I,CL:�
	2�I�0�6�2:X�X�20:�V�I,X:�:�I�0,112,0,0,112,254,0,231,255,192,207,255,224,31,131,240,31,1,240w�31,7,240,15,131,224,7,255,192,3,255,128,7,255,192,15,131,224,31,1,240,31� � 1,240,31,131,240,15,255,224,7,255,192,1,255,0,0,0,0,0,0,0,0*� 0,0,0,0,0,0,15,255,240,15,255,240,15,25590!�AN��(AN$):�:� CH�1 � AN:� PR$:� CHG��V�21,0:� "�":� 53280,0:� 53281,0k���(L$,15)�10)"�LOADING "PR$"�"��� "LOAD";�(34);PR$;�(34);",8"��� "RUN":� "���������"�
� 631,13:� 632,13:� 198,2:��,
�LI�7�17
6
��(L$,LI)"          	
�"� PLEASE WAIT":V�53248B
�A(21),B(21):�V�32,15:�V�33,11bKB$�"GABCDEFGABCDEFGABCDEF"��X�12288�12928�64:�Y�0�62:�A:�X�Y,A:�Y,X�(�X�1�21:�A,B:A(X)�A:B(X)�B:��2�2040,192:�2041,193:�2045,197:�2047,199	<�V�37,2:�V�38,1:�V�39,0:�V�40
128,7,255,224,15,227,240,15,193,248,15,192_�� 0,7,240,0,1,254,0,0,127,128,0,31,224,0,7,240,0,3,248,0,1,248,7��� 227,248,3,255,240,0,255,224,0,63,128,0,0,0,0,0,0,0��� 0,0,0,0,0,0,7,255,240,7,255,240,7,255,240,7,255,240,6,62,48,4,62%�� 16,0,62,�X�1�30:�"�";:�:�"�";:�"�":�>��"   �";:�X�1�30:�"�";:�:�"�";:�"�"L��G�1�1000x��2042,194:�2043,194:�2044,196:�2046,198���V�4,84:�V�5,143:�V�6,84:�V�7,191:�V�12,165:�V�13,108���V�28,64���V�41,0:�V�42,0:�V�43,7:�V�45,7
��4200:�V�29,79:�1�13�2:�V�I,Y:�.	<�V�8,185:�V�10,205:�V�12,240L	F�V�16,128:�V�14,5:�V�15,Yc	P�53265,�(53265)�16�	d�"�":� SC,1:�V�21,255:TA�10�	���(L$,5)�7)"� ** D I R E C T O R Y ** "�	�A�A�1:B�B�1:�PR$:�A�9�TA�9�	���(L$,B�8)�TA)""A"-"PR$�	��B�8�175
�,240,15,255,240,15,128,0I4� 15,128,0,15,128,0,15,255,128,15,255,224,15,255,240,0,1,248,0,0,248�>� 15,128,248,15,193,248,7,255,240,3,255,224,0,255,128,0,0,0,0,0,0,0,7,128,0,7,128,0,7,128�� 0,7,128,0,15,128,0,31,128,0,0,0,0,0,0,0,0)�112,0,                          ":�:�_
�
� MUSIC TUTOR J'85,MIDPRINT    J'85,FONTASIA    F'85,TELELINK    F'85�
�
� FUTUREWAR   F'85,SALMON RUN  M'85,AUTO LINE#  M'85,HOME BUDGET M'85�
� TILE TIME MAY'85,SCREEN DUMP A'85,AHOY DOCK   S'85,FILE LOCK   S'85,0:�V�44,1:�V�46,14	F�V,50:�V�1,138:�V�2,58:�V�3,190^	P�V�10,177:�V�11,98:�V�14,172:�V�15,74�	Z�V,50:�V�1,138:�V�2,58:�V�3,190:�V�23,128�	_�900�	d�X�1�2:�"�����  � �  �  � �  �  �  ݙ �  �  � �  �  �  ";�	i�"� �  �  � ":�3
n�0,0,62,0,0,62,0,0,62,0,0,62,0,0,62,0,0,62,0,0,62,0,0,62I�� 0,0,62,0,0,62,0,0,0,0,0,0,0,0��� 0,0,0,0,0,0,0,62,0,0,255,128,1,255,192,3,255,224,7,247,240,7,227��� 240,15,227,248,15,193,248,15,193,248,15,193,248,15,193,248,7�� 227,240,7,247,240,V�23,207:�V�21,151/�A��(�(1)�L1)�L2:�A�1�NI�1.5:�2108�NI�A[��G��3��"�"�NI�2�3)"^"r��G��3��V�9,222�4�A���V�8,169:�V�21,159��A$��(KB$,A,1)���N$:�G�3�N$�""�250�
�N$�"�"�N$�"�"�N$�"�"��4200�	
�N$�"�"��V�21,0:�900

�N$�"H��150
��A��16��:A�0O
���(L$,23)�7)"�(C) ION INTERNATIONAL INC.":�198,0:AN$�""}
���(L$,20)�8)" PRESS F1 OR CHOOSE NO.�";�
��TM$:�TM$��(13)�AN$�""� 210�
��TM$��(20)��"�    ":�190�
��TM$�"�"��300:TA�10:B�.:�150�
��TM$��(13)�AN$��" "� 225�NP�1�NP�41�NP�39:�250-&�JV�4�NP�NP�2:�NP��1�NP�0B0�NP��2�NP�0:�250Y:�""�PN)" "xD�"�"�NP)"^":PN�NP�N�250�XN��(NP�2�2):�NP�0�N�1�l�N�A��4500:�410�v�4600:�250���NP�50��V�9,178:NP�11���3000:�FR��16�770�=� LGHTNG LOAD N'85,DIR MANIP.  D'85,GAMELOADER  D'85,JEWEL QUEST D'85�X� 0,0,0,0,0,0,7,254,0,7,255,128,7,255,192,7,135,224,7,131,224,7,131�b� 224,7,135,192,7,255,0,7,255,0,7,135,192,7,131,224,7,129,240,7l� 129,240,7,131,240,7,255,224,7,255,X�1�2:�"��� ݠݠݠݠݠݠݠݠݙ�ݠݠ� ݠݠݠݠݠݠݠ":�@
s�:�:�""i
x�"�   �";:�X�1�30:�"�";:�:�"�";:�"�"�
}�Y�1�4:�"   �";:�X�1�30:�"�";:�:�"�";:�"�":��
��"   �";:�X�1�15:�" ";:��
��"���";:�X�1�12:�" ";:�:�"�";:�"�":�"�";��Y�1�4:�"   �";:
3,255,224,1,255,192,0,255,128,0,62,0,0,0,0,0,0,0,0d�� 0,0,0,0,0,0,31,255,240,15,255,248,7,255,248,7,255,240,7,128,0,7��� 128,0,7,128,0,7,128,0,7,252,0,7,254,0,7,252,0,7,128,0,7,128,0,7,128�� 0,7,128,0,15,128,0,31,128,0,0,0,0,0,0,0,0)�112,0,
"��4000:�250

�G�1�500,280,7002

��(N$)�65��(N$)�72�250H
"
�N$�A$��4500:�400W
,
�4600:�250r
�
�""�NI�2�3)" "�
�
�V�21,143:�200�
�
�NP�50�NP�19:�"�"�NP)"^":PN�NP�
�
�3000:�FR��16�600�
�JV��4�JV��8�250�
�JV�8�NP�NP�2:�NP�2�AN$�AN$�TM$:�AN$;"��_";L�T��(V�39):�V�39,�(V�40):�V�40,�(V�41):�V�41,�(V�42)z��V�42,�(V�43):�V�43,�(V�44):�V�44,�(V�45)���V�45,�(V�46):�V�46,T����(L$,20)�8)"� PRESS F1 OR CHOOSE NO.�";:�D�1�90:�:�200��AN��(AN$):�AN�1�AN�16��"�     ":�1�JV��1�JV��2�250'��JV�1�NP�NP�1:�NP�22�NP�21:�250I��JV�2�NP�NP�1:�NP�0�NP�1:�250`��V�9,222�4�NP:�710u�NP�A��4500:�400��4600:�250���"��             MUSIC TUTOR"���"     1  NOTE PRIMER"���"     2  KEYBOARD SEARCH"��"  192,7,255,0,0,0,0,0,0,0,0Sv� 0,0,0,0,0,0,7,255,224,7,255,240,7,255,240,7,255,224,7,128,0,7,128��� 0,7,128,0,7,248,0,7,252,0,7,248,0,7,128,0,7,128,0,7,128,0,7,255��� 224,7,255,240,7,255,240,7,255,224,0,0,0,0,0,0,0�� 0,0,0,0,0,0,0,254,0,3,255,
A������������������l�
��������
��
��
��
��
BEST OF '85�������LL�2A�����MENU C-64�������
�MUSIC TUTOR J'85�MIDPRINT    J'85�
FONTASIA    F'85
�TELELINK    F'85�
FUTUREWAR   F'85.�SALMON RUN  M'85'�AUTO LINE#  M'85K






























































































































































































































































K






























































































































































































































































�HOME BUDGET M'85�
TILE TIME MAY'85�
SCREEN DUMP A'85�AHOY DOCK   S'851�
FILE LOCK   S'85�
LGHTNG LOAD N'85�

DIR MANIP.  D'85�GAMELOADER  D'85K






























































































































































































































































K






























































































































































































































































��JEWEL QUEST D'85K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K






























































































































































































































































K































































































































































































































































d�53281,1:�"�" f�410[g��4)"�ENTER (ZZZ) WHEN COMPOSITION FINISHED"kh�C�1�3000:��i��(147);�8)"UPPER OR LOWER CASE? (U/L)"�k�C$:�C$�""�107�l�C$�"L"��53272,23:�115�m�C$�"U"��53272,21:�115	n�C$��"L"�C$��
(
� ***    PRINTER FORMAT PGR    ***O� ***   EPSON CARD/?+G FORMAT  ***v� ***   WRITTEN BY JOHN LAWS   ***�� ***      SEPT 16, 1984       ***�� ********************************�	�53280,0:�53281,7:�646,9	
�"�"�7)"PRINTER FORMAT P:�4:�"�CHANGE ANOTHER FUNCTION (Y/N)"8��K$:�K$�""�150S��K$��"Y" � K$��"N"�150b��K$�"Y"�10h�����4,�(27);�(77);"ELITE MODE":����4,�(27);�(20);"CONDENSED MODE":�:� CARD+G CHANGES TO 15�,
�4,�(27);�(52);"ITALICS MODE":�^
�4,�(27)	. (12/72) LINE":�4,"SPACING SET":�RD�4,�(27);�(48);"1/8 IN. (9/72) LINE":�4,"SPACING SET":��N�4,�(27);�(49);"7/72 IN. LINE":�4,"SPACING SET":��X�"�WHAT COLUMN DO YOU WANT LEFT MARGIN":��15);:� N�]�4:�4:�4,4,4:� TRANSPARENT MODE ON STAR IS 4,�LINES TO SKIP ON BOTTOM OF PAGE":� NE\�4,�(27);�(78);�(N);"SKIP-OVER PERFORATION SET�f�4,"WITH"N"LINES AT BOTTOM OF PAGE BEING LEFT BLANK":����9);"1� NUMBER OF LINES"����9);"2� BY INCH LENGTH"���K$:�K$�""�730��K��(K$):�K��1 � K��2 
	�53280,6:�53281,15:�646,0@
�45,0:�46,19:�56,21:�52,21:�|S�54272:�S�5,12:�S�6,0:�S�24,15:�S�1,25:�S,177:�808,239��6390�(�2,2,3,�(6)�2�251,�(6154):�252,�(6155)�d�54276,0:�"�":�"               MAIN MENU":�:��n�"1 TERMINAL":�	x"U"�107	s�A$(25):�"�""	x�N�1�23O	��"ENTER LINE #"N:�A$(N):�A$(N)�"ZZZ"�145V	��N_	��"�"o	�W�10��(N�2)�	��Z�1�W:�"";:�Z�	��X�1�23�	�T��(40��(A$(X)))�2�	��A$(X)�"ZZZ"�185�	���T)A$(X)�	��X
��"�  PRESS F1 TO PRINT SCREEN-F3 TO R
ROGRAM"       ")	��9)"1� ELITE PRINT"H	��9)"2� CONDENSED PRINT"e	(��9)"3� ITALICS PRINT"�	2��9)"4� EMPHASIZED PRINT"�	<��9)"5� ENLARGED PRINT"�	F��9)"6� DOUBLE STRIKE PRINT"�	P��9)"7� SET LINE SPACING"
Z��9)"8� SET LEFT;�(69);"EMPHASIZED MODE":�<�
�4,�(27);�(87);�(1);"ENLARGED MODE":�f�
�4,�(27);�(71);"DOUBLE STRIKE MODE":���
�"�"�9)"YOUR CHOICES ARE: ":��9)"1� 7/72 IN SPACING"��
��9)"2� 1/8 IN SPACING (9/72)":��9)"3� 1/6 IN SPACING (12/72)"	
�
��9)"44,6#b�4,�(27);�(108);�(N);"LEFT MARGIN IS";N:�R��4,�(27);�(56);"IGNORE PAPER-END SIGNAL":����"�DO YOU WISH TO SET THE FORM LENGTH BY"����9);"1� NUMBER OF LINES"����9);"2� BY INCH LENGTH"���K$:�K$�""�730��K��(K$):�K��1 � K��2 AA$�"2"))�
�1:�6�
�"�":�:�"              LOAD MENU":�:�a�
�"1 LOAD":�:�"2 ABORT THIS FUNCTION":�t�"KEY DIGIT":���A$:�A$�"2"����A$��"1"�530�&�590:�1,A,0,F$�0�6151,A:�6291:�1:��NF$�"":�"FILENAME";F$�O�F$�""��:�590P�:�"TAP�"2 SEARCH TEXT":�!	��"3 SAVE":�1	��"4 LOAD":�L	��"5 SAVE TO PRINTER":�^	��"6 BUFFER":�o	��"KEY DIGIT"�	��A$:�A$�"0"�A$�"6"�170�	���(A$)�300,800,400,500,600,700�	��100�	,
�"�":�53272,23:�6528�	6
�"�":�53272,21:�"HAVE YOU LOGGED OFF?"ENEW  "
��F$:�F$�""�190&
��F$�"�"�3004
��F$�"�"��I
,
��(53272)�23�M�7_
1
�1,4,M:�AN��1�310q
3
�F�1�37:�1:�F}
6
�X�1�24�
@
�A$(X)�"ZZZ"��1:�360�
J
L��(A$(X)):S��(L�2):T�20�S�
O
�AN�1��1,�(15)�T�40)A$(X):�350�
T
�1,�(14)�T)A$(X)�
^
�X%h
� MARGIN"%
d��9)"9� IGNORE PAPER END"E
i��9)"10� SET FORM LENGTH"o
k��9)"11� SET SKIP-OVER PERFORATION"�
n��10);:�"YOUR CHOICE";K$:�K$�""�110�
xK��(K$):�K �1 � K �11 � 110�
��4,4,0:� K �200,250,300,350,400,450,500,600,650,700,850%��4� N/72 IN SPACING"
�
�K$:�K$�""�503;
�
K��(K$):�K �1 � K �4 � 503U
�
� K � 590,580,570,510^
�
�503�
�
�"WHAT VALUE DO YOU WANT TO GIVE N";N�
� N�0 �510�
�4,�(27);�(65);�(N);N;"/72 IN. LINE":�4,"SPACING SET"�
�:�4,�(27)�(50);"1/6 IN� 730�� K�2 � 800/��""�9);:�"HOW MANY LINES PER PAGE";Nk�4,�(27);�(67);�(N);"FORM LENGTH IS"N"LINES PER PAGE":�� �""�9);:�"HOW MANY INCHES PER PAGE";N�*�4,�(27);�(67);�(0);�(N);"FORM LENGTH IS"N"INCHES PER PAGE"�4�R�"�HOW MANY E OR DISK?")R�A$:A�1:�A$�"D"�A�8:F$�"@0:"�F$:�:T�A$��"T"�594@V�lX�"�":�:�"             PRINTER MENU":�:��b�"1 PRINT ALL TEXT":�:�"2 PRINT SELECTED TEXT":��g�"3 ABORT THIS FUNCTION":�:�"KEY DIGIT":��l�A$:�A$�"1"�A$�"3"�620
v�"OK":�

@
�A�1�3000:�:�6
�
�"�":�:�"              SAVE MENU":�:�i
�
�"1 SAVE SELECTED TEXT":�:�"2 SAVE ALL TEXT":��
�
�"3 ABORT THIS FUNCTION":��
�
�"KEY DIGIT":��
�
�AA$:�AA$�"1"�AA$�"3"�430�
�
�AA$�"3"���
�
�590:�1,A,1,F$�
��(6240�(AA$�"1"))�(5824�(�"�     F1 TO REPRINT-F3 TO RERUN        "8r
�R$:�R$�""�370H|
�R$�"�"�300V�
�R$�"�"��_�
�370��
�"DO YOU WANT ANNOUNCEMENT PRINT FORMAT?":��15)"(Y/N)"��
�AN$:�AN$�""�420��
�AN$�"Y"�AN�1:���
�AN$�"N"�AN�0:���
�420EN-F3 TO R
9V�53280:W�54272:SM�1024:CM�55296:�V,11:�V�1,0:�"�"g�"";�9);"*****� FUTUREWAR! *****"���13);"BY B.W.BEHLING"���11);"(C) COPYRIGHT 1984"�
� 12:� 22:� 56�� ** VARIABLES **��PN$(2,6),P(2,6),SE(9,4,6),D%(12):TR�36,	4,4:��(A$)�650,660,690/
��A�6656��(251)��(252)�256:�680^
��A��(6152)��(6153)�256��(6154)��(6155)�256w
��4,�(�(A)�127);:�:�4�
��4:��
��"�":�:�"             BUFFER MENU":�:��
��"0 RESET BUFFER":�:�"1 BUFFER ON":�:�"2 BUFFER OFF"��:�"3 ABORT	�54273,I20�J�1�5:�:�:�W�1,10:�W�8,1:�W�5,112:�W�6,252I2�W�4,129:�W�11,129Y4�I�1�200:�Ir6�W�4,128:�W�11,128:��8�"� NUMBER OF PLAYERS";:�NP�:�NP�7� 62�<�" SORRY, NO MORE THAN SIX CAN PLAY!":� 22:� 56�>�NP�1� 56�@�NP�3�NP�5� 6
PUTER 3":P(2,3)�17d�" ";PN$(0,3);",YOUR COLOR IS ";PN$(1,3);"."FfNP�3:� 120kh�" PLAYER # 3 NAME? COMPUTER 3"�jPN$(0,3)�"COMPUTER 3":P(2,3)�1�l�" ";PN$(0,3);",YOUR COLOR IS ";PN$(1,3);"."�nNP�3:� 120�p�CP��1� 120rNP�NP�1:�" PL��    Σ��    �"1���1)" ͤ��    ͤ��    ͤ��    ͤ��    ͤ��":�IZ���5)"�    �  �    �  �    �  �    �"����6)"ͤ��    ͤ��    ͤ��    ͤ��"��MSG$�"         NOW WE CHOOSE SECTORS �":� 26:� 30��R1��(9��(0))�1:R2�4:R3��(9��(0))�1:R4�1�� *
�I�1�6:�CL$:PN$(1,I)�CL$:�CL$:PN$(2,I)�CL$:�I`	�I�1�9:�A%(I):�:�I�2�9:�B%(I):�:�I�0�9:�C%(I):�f	�}	� ** DELAY LOOP **�	�DL�0�2000:�DL:��	� ** PRINT MESSAGE **�	�"";MSG$:� 22:��	� ** ERASE MESSAGE **
 �ER�182 THIS FUNCTION":�:�"KEY DIGIT":�/��A$:�A$�"0"�A$�"3"�730?��A$�"0"�780l��A$�"1"��6150,0:�"BUFFER ON":�A�1�2000:����A$�"2"��6150,1:�"BUFFER OFF":�A�1�2000:�����251,1:�252,26:�6152,1:�6153,26:�6154,1:�6155,26��"BUFFER RESET":�A�1�2008"B�" CAN I PLAY WITH YOU";:�CP$:� 700DCP�0:� 74LF��(CP$,1)�"N"�CP�0:� 74UHCP�1aJ�I�1�NP�L�" PLAYER #";I;:�"NAME";PN$(0,I)�N��(PN$(0,I))�11� 84�P�"� THAT NAME IS TOO LARGE!"�R�" NO MORE THAN 10 LETTERS PLEASE.":� 76$
T�"AYER #";NP;"NAME? COMPUTER";NP/tPN$(0,NP)�"COMPUTER"��(NP)mv�" ";PN$(0,NP);",YOUR COLOR IS ";PN$(1,NP);".":P(2,NP)�1{x� 22:� 22�zAR�32�((NP�3)�5):PT��(NP��(0))�1�|�I�1�6:P(1,I)�AR:�I�~� ** DRAW SCREEN **���"�":�I�0�40:�S:�SM�I,S�128* PICKING SECTORS ** �MSG$�" PICK A SECTOR.":� 344��P(2,PT)�1� 180`��"ENTER #";:�PI$:��(PI$)��2�� 30:� 154����(�(PI$,1))�49 � �(�(PI$,1))�57�� 30:� 154����(�(PI$,1))�49 � �(�(PI$,1))�52�� 30:� 154��A��(�(PI$,1)):B��(�(PI$,1))"��SE(A4�2023:�ER,32:�ER:�'
"� ** PLAYER INFO **[
$�"";PN$(0,PT);",";MSG$:�r
&� ** BOMB SOUND **�
(�I�0�22:�W�I,0:�I:�W�24,10:�W�5,80:�W�12,160�
*�W�6,255:�W�13,252:�W�4,17:�W�4,16�
,�I�255�200��1:�54273,I:�I.�I�255�75��1:0:�:� �"�":�"DISPLAY BUFFER":�*�5377$4� ";PN$(0,I);",YOUR COLOR IS ";PN$(1,I);".":�I5
V�NP� 90, 104?
X� 112d
Z�" PLAYER # 2 NAME? COMPUTER 2"�
\PN$(0,2)�"COMPUTER 2":P(2,2)�1�
^�" ";PN$(0,2);",YOUR COLOR IS ";PN$(1,2);".":I�3�
`�" PLAYER # 3 NAME? COMPUTER 3"bPN$(0,3)�"COM:�CM�I,7:�I��I�79�759�40:�SM�I,160:�CM�I,7;��SM�I�1,160:�CM�I�1,7:�Id��I�761�799:�S:�SM�I,S�128:�CM�I,7:�I���I�1�4:��1)" Σ��    Σ��    Σ��    Σ��    Σ��"����1)"�    ͤ��    ͤ��    ͤ��    ͤ��    �"����1)"�    Σ��    Σ��    Σ,B,0)�0�SE(A,B,PT)�1:SE(A,B,0)�1:P(1,PT)�P(1,PT)�1:� 172L�MSG$�"             ALREADY PICKED �"`�� 26:� 30:� 154��� 246:TR�TR�1:PT�PT�1:�PT�NPT�PT�1���TR�0� 154��MSG$�"          ALL SECTORS OCCUPIED �":� 26:� 30�MSG$�"         NOW YOROUTINE **(
AM�0:EA%�0:EA�0:�X�1�9:�Y�1�4:�SE(X,Y,PT)�1�AM�AM�.75:EA�EA�2@
�Y:�EA�8�EA%�EA%�EAW
EA�0:�X:�AM�0� 286o
PT�PT�1:�PT�NP�PT�1y
� 274�
�AM�3�AM�3� 
P(1,PT)��(AM):AB��(0)�.5:P(1,PT)��(P(1,PT)�(AB�P(1,PT)))�EA%"
MSG$�"":� 34�1:�PT�NPT�PT�1��P(1,PT)�0� 210B�MSG$�"          PREPARE FOR BATTLE!! �":� 26:� 30:� 274c�� ** COMPUTER REINFORCING **x��"REINFORCE #?";��RA��(9��(0))�1:RB��(4��(0))�1���PC�RB�4:�SE(RA,PC,PT)��1��PC:� 238��A�RA:B�PC:PC�RA�10�PC�� NOT CONNECT �"� |
� 26:� 30:� 320!~
�SE(AA,BA,0)�1�1�AS%�1:� 388R!�
MSG$�"":� 30:� 34:�"ATTACKING STRENGTH [1 -";SE(AA,BA,0)�1;n!�
�"�]";:�AS%:�AS%�1� 382�!�
�AS%�SE(AA,BA,0)�1� 382�!�
AL�0:DL�0:�AT�1�AS%:A1��(6��(0))�1:D1��(6��(0))�1�!�
AL�AL�1	U MUST REINFORCE �":� 26:� 30:� 208(�� ** COMP. TERR. PICK **:��"ENTER #?";I��PT�2� 196a��SE(R3,R4,0)�0� 194��R4�R4�1:�R4�4�R4�1:R3�R3�1���R3�9�R3�1��� 186��A�R3:B�R4:Z�R3�10�R4:� 206���SE(R1,R2,0)�0� 204��R2�R2�1:�R2�1�R2�
,1))�49 � �(�(DS$,1))�57�� 30:� 320'N
��(�(DS$,1))�49 � �(�(DS$,1))�52�� 30:� 320IP
AD��(�(DS$,1)):BD��(�(DS$,1))bR
�SE(AD,BD,PT)�0� 344�T
MSG$�"      THAT'S ONE OF YOUR SECTORS! �"�V
� 26:� 30:� 320�X
�"FROM";AS$�Z
��(AS$)��2�� 30:� 320�24,0:� 26:� 30�#�
�S�1�6:SE(A,B,S)�0:�S:SE(A,B,PT)�1&$�
�X�1�9:�Y�1�4:�SE(X,Y,PT)�1�TT�TT�1=$�
�Y:�X:�TT��36�TT�0b$�
�AS%�SE(AA,BA,0)�1�OA%�AS%:� 442�$�
MSG$�"":� 34:�"YOU MUST MOVE IN";AS%;"ARMIES MINIMUM"�$�
�P(2,PT)�1� 584�$�
�"HOW MANY";OA$:�:�"YOU HAVE";P(1,PT);"ARMIES TO STATION"$
�P(2,PT)�1� 590E&
�"WHAT SECTOR #";RI$:��(RI$)��2�� 30:� 290u(
��(�(RI$,1))�49 � �(�(RI$,1))�57�� 30:� 290�*
��(�(RI$,1))�49 � �(�(RI$,1))�52�� 30:� 290�,
A��(�(RI$,1)):B��(�(RI$,1))�.
�SE(A,B,PT)�1�
PI$��(PC):�PI$:� 22:� 222�� ** UPDATE SECTORS **1�TA��2:�I�1�A:TA�TA�4:�IK��"":�A�2��(A�2)� 262f��B� 254, 256, 258, 260����TA);"";PN$(2,PT):� 272�
��TA);"";PN$(2,PT):� 272�
��TA);"";PN$(2,PT):� 272�
��TA);":�A1�D1�AL�AL�1:DL�DL�1�!�
�SE(AD,BD,0)�DL�1� 400"�
�SE(AA,BA,0)�AL�2� 402'"�
�AT:� 402W"�
�AS%��SE(AA,BA,0)�AL�AS%�SE(AA,BA,0)�(AL�1)�"�
A�AA:B�BA:� 30:� 38:SE(A,B,0)�SE(A,B,0)�AL:� 246�"�
A�AD:B�BD:SE(A,B,0)�SE(A,B,0)�DL:TP�PT�"�
�S�1�6:�SE(A,B4:R1�R1�1���R1�1�R1�9�� 196!�A�R1:B�R2:Z�R1�10�R2>�PI$��(Z):�PI$:� 22:� 166_�� ** INITIAL REINFORCEING **��MSG$�"":� 34:�"YOU HAVE";P(1,PT);"ARMIES LEFT"���P(2,PT)�1� 234���"REINFORCE #";FO$:��(FO$)��2�� 30:� 210���(�(FO$,1))\
��(�(AS$,1))�49 � �(�(AS$,1))�57�� 30:� 3200^
��(�(AS$,1))�49 � �(�(AS$,1))�52�� 30:� 320R`
AA��(�(AS$,1)):BA��(�(AS$,1))kb
�SE(AA,BA,PT)�1� 360�d
MSG$�"    THAT'S NOT ONE OF YOUR SECTORS! �"�f
� 26:� 30:� 320�h
�SE(AA,BA,0)�1� 366�j
MSC�1��(OA$):C$��(OA$,C,1)�$�
��(C$)�49��(C$)�57� 432%�
�C:OA%��(OA$)2%�
�OA%�AS% � OA%�SE(AA,BA,0)�1� 432r%�
SE(A,B,0)�OA%:� 246:A�AA:B�BA:SE(A,B,0)�SE(A,B,0)�OA%:� 246�%�
�TT�36� 650�%�
� 320�%�
MSG$�" MOVE TROOPS? [Y/N]":� 30:� 34�%�
�P(2,PT)�1 3080
MSG$�"            NOT YOUR SECTOR! �"2
� 26:� 30:� 290I4
�"�                    ":�"�HOW MANY";ST%�6
�ST%��P(1,PT)�SE(A,B,0)�SE(A,B,0)�ST%:P(1,PT)�P(1,PT)�ST%:� 316�8
MSG$�"        YOU DON'T HAVE THAT MANY! �"�:
� 26:� 30:� 290�<
";PN$(2,PT):� 272
�B� 264, 266, 268, 2701
��TA);"";PN$(2,PT):� 272U

��TA);"";PN$(2,PT):� 272}
��TA);"";PN$(2,PT):� 272�
��TA);"";PN$(2,PT)�
��TA);"    �":��TA);SE(A,B,0):� 30:��
� ** MAIN ,S)�1�PT�S:� 246�"�
�S:PT�TP:�SE(A,B,0)�1� 422#�
�SE(AA,BA,0)�2��W�24,0:� 320Q#�
MSG$�" SAME ATTACK AGAIN? [Y/N]":�W�24,0:� 30:� 34e#�
�P(2,PT)�1� 580y#�
�K$:�K$�""� 416�#�
�K$�"Y"�� 30:� 382�#�
� 320�#�
MSG$�"            SECTOR CONQUERED �":�W
�49 � �(�(FO$,1))�57�� 30:� 2103���(�(FO$,1))�49 � �(�(FO$,1))�52�� 30:� 210S�A��(�(FO$,1)):B��(�(FO$,1))���SE(A,B,PT)�1�SE(A,B,0)�SE(A,B,0)�1:P(1,PT)�P(1,PT)�1:� 228��MSG$�"            NOT YOUR SECTOR! �"��� 26:� 30:� 210��� 246:PT�PTG$�"   NOT ENOUGH ARMIES FOR THIS ATTACK �" l
� 26:� 30:� 320< n
�AA�AD � BA�BD�1 � AA�AD � BA�BD�1� 382Z p
�AA��AD�1 � AA��AD�1� 378q r
�AD�2��(AD�2)� 376� t
�BA�BD � BA�BD�1� 382� v
� 378� x
�BA�BD � BA�BD�1� 382� z
MSG$�"         SECTORS DO�K$�"N":��31);"�N":� 22:� 456�%�
�K$:�K$�""� 454&�
�K$�"N"�� 30:� 506!&�
�"MOVE FROM";MF$5&�
��(MF$)��2� 450_&�
��(�(MF$,1))�49 � �(�(MF$,1))�57� 450�&�
��(�(MF$,1))�49 � �(�(MF$,1))�52� 450�&�
AF��(�(MF$,1)):BF��(�(MF$,1))�&�
�SE(AF,BF,PT)�1� 4� 246:�P(1,PT)��0� 290$>
MSG$�"         ALL TROOPS ON STATION! �":� 26:� 30V@
MSG$�"DO YOU WANT TO ATTACK? [Y/N]":� 30:� 34jB
�P(2,PT)�1� 510~D
�K$:�K$�""� 324�F
�K$�"N"� 450�H
�"ATTACK WHAT SECTOR";DS$�J
��(DS$)��2�� 30:� 320�L
��(�(DS$ 514�,4�"ATTACK WHAT SECTOR?";�,6AS�AA�10�BA:AS$��(AS)-8�DS$:� 22:�"FROM?";AS$:� 222-:AS%��(�(0)�(SE(AA,BA,0)�1))�1L-<�SE(AA,BA,0)�1�1� 390�->�SE(AA,BA,0)�1�SE(AD,BD,0)�AS%��(SE(AD,BD,0)�1.5)� 570�-@MSG$�"":� 30:� 34:�"ATTACKING STRENGTH [�RA%�1:�RA%�9�RA%�1�)�RB�1�4:�SE(RA%,RB,PT)�1��RB:�RA:� 514!*
AD�RA%:BD�RB:DS�AD�10�BD:DS$��(DS)0*�BD�1� 530g*AA�AD:BA�BD�1:�SE(AA,BA,PT)�1 � SE(AA,BA,0)�2� 562v*�BD�4� 532�*AA�AD:BA�BD�1:�SE(AA,BA,PT)�1 � SE(AA,BA,0)�2� 562�*�AD�1� 53�","�YELLOW�"�3��"�PL#4�","�PURPLE�","�PL#5�","GREEN�","PL#6�"44��1,2,3,4,5,6,7,8,9,15,13,4,14,6,7,8,9,10,11,12,13,4,14,6,7,8,9~4��32,32,32,49,49,32,32,50,49,32,32,51,49,32,32,52,49,32,32,53,49,32,32�4��54,49,32,32,55,49,32,32,56,49,32,3	74�&�
MSG$�"    THAT'S NOT ONE OF YOUR SECTORS! �"'�
� 26:� 450'�
�"MOVE TO";MT$,'�
��(MT$)��2� 450V'�
��(�(MT$,1))�49 � �(�(MT$,1))�57� 450�'�
��(�(MT$,1))�49 � �(�(MT$,1))�52� 450�'�
AT��(�(MT$,1)):BT��(�(MT$,1))�'�
�SE(AT,BT,PT)��1� 470�'�
38�0|� 594�0~A�AA:B�BA:Z�AA�10�BA�0�RI$��(Z):�RI$:� 221��"�                    ":�"�HOW MANY?";=1�ST%��(�(0)�P(1,PT))�1:�ST%�10� 648n1��ST%�P(1,PT)�5�ST%��(P(1,PT)�5):�ST%�1�ST%�1�1��ST%:� 22:� 310�1�� ** GAME OVER **�1��P(2,PT)�1� 670

�*********************7�*                   *R�*    HOME BUDGET    *m(�*        BY         *�2�*    BRIAN DOBBS    *�<�*                   *�F�*  TIMMINS,ONTARIO  *�P�*                   *�Z�*********************	d�53281 -";SE(AA,BA,0)�1;�-B�"�]?";AS%:� 22:� 390.D�SE(AA,BA,0)�SE(AD,BD,0)�2� 570.F� 320+.HOA%��(�(0)�SE(AA,BA,0))=.J�OA%�AS%� 584].L�"HOW MANY?";OA%:� 22:� 442|.N� *** COMPUTER STATION ***�.P�"WHAT SECTOR #?";�.RRA��(9��(0))�1:RB��(4��(0)
38�*AA�AD�1:BA�BD:�SE(AA,BA,PT)�1 � SE(AA,BA,0)�2� 562+�AD�9� 5409+AA�AD�1:BA�BD:�SE(AA,BA,PT)�1 � SE(AA,BA,0)�2� 562Q+�AD�2���(AD�2)� 550`+�BD�4� 560�+ AA�AD�1:BA�BD�1:�SE(AA,BA,PT)�1 � SE(AA,BA,0)�2� 562�+"AA�AD�1:�SE(AA,BA,PT)�1 � �2,57,49,32,32,32,325��32,32,49,52,32,32,50,52,32,32,51,52,32,32,52,52,32,32,53,52,32,3285��54,52,32,32,55,52,32,32,56,52,32,32,57,52,32,32,32�"R3�� 30:� 26:�j3�� ** DATA STARTS **�3��"WHITE�","PL#1�","RED�","PL#2�","�BLUE�","�PL#
�AF�AT � BF�BT�1 � BF�BT�1� 498�'�
�AF��AT�1 � AF��AT�1� 496(�
�AT�2��(AT�2)� 494/(�
�BF�BT � BF�BT�1� 498I(�
�BF�BT � BF�BT�1� 498�(�
MSG$�"         SECTORS DO NOT CONNECT �":� 26:� 450�(�
MSG$�"":� 30:� 34:�"HOW MANY";TM%�(�
�TM%�SE(AF,BF,0)��1�MSG$�"     ********** YOU WON! **********�"�1�� 30:� 26)2��V,14:�V�1,6:�"�* * * * * *               �"Y2��I�1�3:��7);" * * * * *                �"�2���7);"* * * * * *               �":�I�2��I�1�3:��7);"                0,12:�53281,0:�A$(13,13):�180%	n�1230E	x�14,8,14,"0:"�NM$�",S,":X�1M	�Y�2n	��14, A$(X,Y):Y�Y�1:�Y�13�160w	��140�	�X�X�1:�X�13��14:�180�	��130�	��"��"�14)"BUDGET MENU"�	���10)"1-W�RITE MONTHLY BILLS":�""
���10)"2-V�IEW MONTHLY B)�1�.T�SE(RA,RB,PT)�1� 594�.VAD�RA:BD�RB�.X�BD�1� 606/ZAA�AD:BA�BD�1:�SE(AA,BA,PT)�1� 638#/\�BD�4� 608J/^AA�AD:BA�BD�1:�SE(AA,BA,PT)�1� 638Y/`�AD�1� 614�/bAA�AD�1:BA�BD:�SE(AA,BA,PT)�1� 638�/d�AD�9� 616�/fAA�AD�1:BA�BD:�SE(AA,BA,PT)�SE(AA,BA,0)�2� 562�+$�RB:�RA:� 514�+&�BD�1� 560�+(�AD�1� 5583,*AA�AD�1:BA�BD�1:�SE(AA,BA,PT)�1 � SE(AA,BA,0)�2� 562B,,�AD�9� 560{,.AA�AD�1:BA�BD�1:�SE(AA,BA,PT)�1 � SE(AA,BA,0)�2� 562�,0�RB:�RA:� 514�,2�SE(AA,BA,0)�SE(AD,BD,0)�2��RB:�RA:�$�""�270'
�X�1�7:�AN$��("WVBPSLC",X,1)�Y�XQ"
�:�Y�410,300,500,730,960,110,990:�180�,
�"�":�"  ENTER MONTH TO VIEW";AN$:�1020�6
�"�":��15)AN$:�"":Y�2�@
�A$(1,Y):Y�Y�1:�Y�13�340�J
�320�T
�"�������������":Y�2�^
��15)A$(X,Y):Y�Y�1:�Y�1
1� 498)�
SE(AF,BF,0)�SE(AF,BF,0)�TM%:SE(AT,BT,0)�SE(AT,BT,0)�TM%$)�
A�AF:B�BF:� 246:A�AT:B�BT:� 246<)�
PT�PT�1:�PT�NP�PT�1F)�
� 274h)�
� ** COMPUTER MAIN ROUTINE **�)Z%��(�(0)�100)�1:�Z%�90� 516�)� 22:� 450�)RA%��(9��(0))�1�)�RA�1�9:RA%          �"�2���7);"                          �":�I3�MSG$�" YOU ARE A TRUE CHAMPION!!":� 34:�B3�MSG$�"     YOU HUMANS ARE SO EASY TO BEAT! �"R3�� 30:� 26:�j3�� ** DATA STARTS **�3��"WHITE�","PL#1�","RED�","PL#2�","�BLUE�","�PL#ILLS":�""0
���10)"3-B�ARCHART TREND OF BILLS":�""Z
���10)"4-P�RINTER TREND OF BILLS":�""
���10)"5-S�AVE DATA TO DISK":�""�
���10)"6-L�OAD DATA FROM DISK":�""�
���10)"7-CREATE INITIAL FILE":�""�

��12)"SELECT CHOICE ?":Y�0
�AN$:�AN1� 638�/h�AD�2���(AD�2)� 626�/j�BD�4� 6360lAA�AD�1:BA�BD�1:�SE(AA,BA,PT)�1� 638'0nAA�AD�1:�SE(AA,BA,PT)�1� 63810p� 594@0r�BD�1� 636O0t�AD�1� 634x0vAA�AD�1:BA�BD�1:�SE(AA,BA,PT)�1� 638�0x�AD�9� 636�0zAA�AD�1:BA�BD�1:�SE(AA,BA,PT)�1� 63�370h
�350r
�13002|
�"MONTHLY TOTAL"�14)Q�AA�BBE�
�A$:�A$�""�390N�
�180�
�"�":�"  WHAT MONTH TO WRITE BILLS";AN$��
�1020��
Y�2:�"�":��15)AN$:�""��
�A$(1,Y):Y�Y�1:�Y�13�460��
�440��
�"�������������":Y�2��
��15):�A$(X,Y
h��"�":�53280,9:�53281,7+r��A�1�5:�:�K|���10)"�SCREEN DUMP UTILITY"r����19)"BY":��12)"ALFRED J. BRUEY"�����12)"�FOR AHOY MAGAZINE"�����7)"(C) ION INTERNATIONAL INC."�����5)"�PRESS 'F1' TO DUMP THIS SCREEN"
	���A$:�A$��"�"�49�Y�13�1120�V�1090`X�X�1:�X�13�1140j�1080't�1230D~�14,8,14,"0:"�NM$�",S,W"k�X�1:�"  CREATING INITIAL FILE�"s�Y�2���14,A$(X,Y):Y�Y�1:�Y�13�1200���1180��X�X�1:�X�13�1220���1170���14:�180���"�  FILENAME�";NM$	���224 � V1�V�64:� 501606�Ë V��192 � V��223 � V1�V:� 50160C��V1�V�128s�Ë �(PR$)�0 � PR$��(18)��(V1)��(146):� 50190��Ë�(PR$,1)���(146)�PR$�PR$��(18)��(V1)��(146):�50190��PR$��(PR$,�(PR$)�1)��(V1)��(146)�ĂJ�Ę4,PR$�"ĂI:�4�,Ď� *
ILL               ";D��4,"JANUARY   FEBUARY   MARCH     APRIL     MAY       JUNE"M��850YL�2:M�7b�890�L�8:M�13:�4," BILL               ";� �4,"JULY      AUGUST    SEPTEMBER OCTOBER   NOVEMBER  DECEMBER"�*�850�4L�8:M�13�>�890

�"�"U
�SU$(500),TA$(500),AN$(500),MN$(500),ID$(500),CM$(500):P$�",":�15,8,15^�100�
�"�":��12);"ONE MOMENT READING":�:��20��(Z$)�2);Z$��5,8,5,"0:"�Z$�",S,R":�15,AX,BX$,CX,DX$:�AX��0��9000:���I�1�500:C�I	�5,SU$(I),TA$(I),AN$(I),)
�
Y�Y�1:�Y�13�180
�
�4709
�
�"�  ENTER NAME OF BILL";AN$E
�
�P�2�13Z
�AN$�A$(1,P)�Y�P`
��
�"  WHAT IS MAXIMUM SCALE FOR "A$(1,Y):�"  ";B�
&�"�":��20�(�(A$(1,Y))�2))A$(1,Y)�
0�""B:Z�0�
:Z�Z�(B�20):�Z�B�590�
D��(B�Z):�570
070
	��� 500304	¿�"�":�53280,0:�53281,6:�A�1�8:�:�z	̿�"  IF YOU WISH TO USE THIS UTILITY AS A  SUBROUTINE IN YOUR OWN"�	ֿ��24)"�PROGRAM, REMOVE LINES 49000 TO 50030 AND THEN ADD THE"�	࿙"REMAINING LINES TO YOUR OWN PROGRAM."�	꿀�	P�:
ZÏ *��"  PRESS 'F1�' TO CONTINUE"��A$:�A$�""�1250.��A$��(133)��8��1260�� JANUARY,FEBRUARY,MARCH,APRIL,MAY,JUNE,JULY,AUGUST,SEPTEMBER,OCTOBER�
� NOVEMBER,DECEMBER�Q�(�(A$(X,2)))�(�(A$(X,3)))�(�(A$(X,4)))�(�(A$(X,5)))AA�(�(A$(X,6)����������������������î� ";Yx� "��";:�"�� ’================================’ ��";���"�� ’===== ***AHOY DOCK FILE*** �=====’ ��";���"�� ’=====                      �=====’ ��";
��"�� ’=====   ADD    -/- RECORD�H�4:�:�180R�Y�1�13:Z�20��(A$(1,Y))*\�4,A$(1,Y)�Z);^f�I�L�M:�4,(A$(I,Y))�10��(A$(I,Y)));:�I:�4,�(10)jp�Y:�4:��z�4,"MONTHLY TOTAL"�6)���X�L�M���1300��C�Q�AA�BB:C$��(C)���4,Q�AA�BB�9��(C$));:�X���4,�(10)������1230�MN$(I),ID$(I),CM$(I)/	�SU$(I)�"EOF"��5:C�C�1:�5	(�g	2�:�"40 CHARACTERS MAXIMUM":�I�1�4000:�:�"�":��	<�:�"80 CHARACTER MAXIMUM":�I�1�4000:�:�"�":��	P�5,8,5,"@0:"�Z$�",S,W":�I�1�C�	R�5,SU$(I):�5,TA$(I):�5,AN$(I):�5,MN$(I):�5,ID$(I)
S�5,CM$(NR�1992:X�2:T�56264:U�2BX�E�R�R�(40�((�(A$(X,Y))�(B�20))))��40:�E,224:�sb�F�T�T�(40�((�(A$(X,Y))�(B�20))))��40:�F,U:��lR�R�2:X�X�1:T�T�2:U�U�1�v�U�3�U�1���X�14�660���600��R�1992:T�56264:�R,138:�T,1:�R�2,134:�T�2,1:�R�4,141 ��T* SCREEN DUMP SUBROUTINE **
d�:&
nß4,4>
xÁI�1023 � 2006 � 40I
��PR$�""\
�Á J�I�1 � I�40g
��V��(J){
�Ë V�127 � 50130�
�ËV��31 � V��96 � V1�V�64:�50120�
�Ë V��32 � V��63 � V1�V:� 50120�
��V1�V�128�
��PR$�PR$��(V1):� 50190�Ë V��159 � Vr))�(�(A$(X,7)))�(�(A$(X,8)))�(�(A$(X,9)))N(BB�(�(A$(X,10)))�(�(A$(X,11)))�(�(A$(X,12)))�(�(A$(X,13)))T2�G INITIAL FILE�"s�Y�2���14,A$(X,Y):Y�Y�1:�Y�13�1200���1180��X�X�1:�X�13�1220���1170���14:�180���"�  FILENAME�";NM$	
  �=====’ ��";E��"�� ’=====   SEARCH -/- RECORD  �=====’ ��";���"�� ’=====   DELETE -/- RECORD  �=====’ ��";���"�� ’=====   MODIFY -/- RECORD  �=====’ ��";���"�� ’=====   SORT   -/- RECORD  �=====’ ��";�14,8,14,"@0:"�NM$�",S,W"�X�1:�1170O��"�  A TOTAL OF 12 BILLS WILL BE ENTERED.":X�1:Y�2|��"NAME OF BILL";A$(X,Y):Y�Y�1:�Y�13�1070���1000���W�1�12��D$��AN$�D$�X�W�1���$�:��.�"�":X�2�8Y�2�BA$(X,Y)�"0"�LY�Y�1:	I):�:I�C�1R
TSU$(I)�"EOF":TA$(I)�"TITLE":AN$(I)�"AUTHOR":MN$(I)�"MAG":ID$(I)�"ISSUE"�
VCM$(I)�"COMMENT":�5,SU$(I):�5,TA$(I):�5,AN$(I):�5,MN$(I)�
W�5,ID$(I):�5,CM$(I)�
X�5:��
d�"�":�53280,6:�53281,0:�I�1�40:�"��";:�:�"��";n�" �����������4,1:�R�6,129:�T�6,1:�R�8,141:�T�8,1:�R�10,138Z��T�10,1:�R�12,138:�T�12,1:�R�14,129:�T�14,1:�R�16,147���T�16,1:�R�18,143:�T�18,1:�R�20,142:�T�20,1:�R�22,132���T�22,1���A$:�A$�""�710���180���4,4:�4,�38)"BUDGET 1984":�4:L�2:M�7��4," B� ��";:�"�� ��������������������������������ý�";LT
�" ��";:�I�1�40:�"�";:�"�";:�a^
�RE$:�RE$�""�350uh
�RE$��(140)�680��
�I�133�140:�RE$��(I)�520��
���
�"�":�53281,0:�53280,0:�"":��12);"INVALID RESPONSE"�
�:��7);"PLEASE PRESS FUN1
��"�� ’=====   LIST   -/- RECORD  �=====’ ��";l
��"�� ’=====   PRINT  -/- RECORD  �=====’ ��";�
��"�� ’=====                      �=====’ ��";�
��"�� ’================================’ ��";��"�� �������LE :�":�"";:�TA$(C)�TA$(C)�"/"�1020)��(TA$(C))�39��50:�:�1040b$�"�":��8);": AUTHOR'S        NAME :�":�"";:�AN$(C)w)�AN$(C)�"/"�1040�.��(AN$(C))�39��SUSB50:�:�1060�8�"�":��8);":�NAME     OF MAGAZINE :�":�"";:�MN$(C)�=�MN$(C)�"	WRITING TO":�:��20��(Z$)�2);Z$��80:�#��====DELETE ROUTINE=======2��"�":�:�:�d��"  DELETE [E]�NTIRE FILE OR [O]�NE RECORD"z��DE$:�DE$�""�2010���DE$�"/"�����DE$��"E"�DE$��"O"�2000���DE$�"E"��9200:���FL�1:�7000:FL�.:����====
EDUCATIONAL":�SE$�"4"�Z$�"FUN & GAMES"-D�SE$�"5"�Z$�"GRAPHICS"HN�SE$�"6"�Z$�"HARDWARE"cX�SE$�"7"�Z$�"HOME USE"�b�SE$�"8"�Z$�"LANGUAGES-MLX"�l�SE$�"9"�Z$�"MISCELLANEOUS"�v�SE$�"10"�Z$�"MUSICAL"���SE$�"11"�Z$�"SIMULATIONS"���SE$�4200��3,4:XX$�"�=================�":�3,Z$;" RECORD NUMBER";I:�3B��3:�3,XX$:�3,�3);"S U B J E C T":�3p��3,SU$(I):�3:�3,XX$:�3,�5);"T I T L E":�3���3,TA$(I):�3:�3,XX$:�3,�4);"A U T H O R":�3��3,AN$(I):�3:�3,XX$:�3,�2);"M A G A Z I N E"�CTION KEY":RE$�"":�I�1�4000:��
�100a�
�+++++++++++++++++++++++,+...SELECTION MENU....+,+                     +��
� + 1--BUSINESS         +,+ 2--DISK OPERATION   +,+ 3--EDUCATIONAL      +��
� + 4--FUN AND GAMES    +,+ 5--GRAPHICS         +,+ 6--H
�������������������������ó� ��";K��"�� ’";:��(159);:�" F1...ADD    ";:��(5);��"======";:��(159);:�" F2...SEARCH ";:��(31);:�
�"’ ��";:�"�� ’";:��(159);:�" F3...DELETE ";�
��(5);:�"======";:��(159);:�" F4...MODIFY ";
�/"�1060B��(MN$(C))�39��50:�:�1080>L�"�":��8);":ISSUE # / PAGE / DATE :�":�"";:�ID$(C)SQ�ID$(C)�"/"�1080uV��(ID$(C))�39��SUSB50:�:�1100�`�"�":��8);": COMMENTS  OR   NOTES :�":�"";:�CM$(C)�j��(CM$(C))�79 ��60:�:�1120�o�CM$(C)�"/"�=SORT PART1======��10:�"�":�I�1�5:�:�:��15);"SORT BY":�/�F1�1:�5010:�DE$�"/"��M��DE$�"S"�K1�1:�9300:�3070k��DE$�"T"�K1�2:�9300:�3070���DE$�"A"�K1�3:�9300:�3070���DE$�"M"�K1�4:�9300:�3070���DE$�"I"�K1�5:�9300:�3070��K1�.:�"�":��8)�"12"�Z$�"SOFTWARE"��SE$�"13"�Z$�"TUTORIAL"2��SE$�"14"�Z$�"UTILITIES"r�RE��(RE$):�(RE�132)�1000,2000,3000,4000,5000,6000,7000,8000��Z$�"XX":DE$�"":DE�.:K1�.:�100���**********************************���* WRITTEN BY GLENN LUMPKINS���*�3:�3,MN$(I):�3:�3,XX$:�3,�5);"I S S U E"1�3:�3,ID$(I):�3:�3,XX$:�3,�3);"C O M M E N T"G"�3:�3,CM$(I):�3:�jg�=====PRINT ENTIRE RECORD=====�h�"�":��14);"NOW PRINTING":�:��20��(Z$)�2);Z$�rXX$�"�=================�":�3,4:�:�"RECORD NUMBER"ARDWARE         +K�
� + 7--HOME USE         +,+ 8--LANGUAGES-MLX    +,+ 9--MISCELLANEOUS    +��
� + 10-MUSICAL          +,+ 11-SIMULATIONS      +,+ 12-SOFTWARE         +��
� + 13-TUTORIAL         +,+ 14-UTILITIES        +,+                     +�(31);:�"’ ��";:�"�� ’";:��(159);F"
�" F5...SORT   ";:��(5);:�"======";:},
��(159);:�" F6...LIST   ";:��(31);:�"’ ��";�6
�"�� ’";:��(159);:�" F7...PRINT  ";:��(5);:�@
�"======";:��(159);:�" F8...END    ";:��(31);:&J
�"�1100t�"�":��5);"->PRESS ANY KEY TO CONTINUE<-"&~�DE$:�DE$�""�1150B��"�":��20��(Z$)�2);Z$:�o���5);"[C]�ONTINUE OR [W]�RITE TO DISK"���DE$:�DE$�""�1180���DE$�"/"�����DE$��"C"�DE$��"W"�1180���DE$�"C"��"�":C�C�1:�1020���:��15);";"ONE MOMENT WRITING SORTED":���20��(Z$)�2);Z$�80:�6��=====PRINT RECORD/FILE=====c��"�":��8);"[E]�NTIRE OR [O]�NE RECORD"y��DE$:�DE$�""�4010���DE$�"/"�����DE$��"E"�DE$��"O"�4010���DE$�"O"�K2�1:�7000:�K2�.�����DE$�"E"��10: FEB. 1985��**********************************1��=====ADD ROUTINE=====I��"�":�10:�"�":C�C�1X��K�1�K�0:�����8);": SUBJECT  OF  ARTICLE :�":�"";:�SU$(C)�
�SU$(C)�"/"�����(SU$(C))�79��60:�: �1020��"�":��8);": TITLE    OF  ARTIC���3,Z$;" FILE":�3��I�1�C:�I:�3:�3,"==>RECORD NUMBER";I;" <==":�3K��3,XX$:�3,�3);"S U B J E C T":�3:�3,SU$(I):�3y��3,XX$:�3,�5);"T I T L E":�3:�3,TA$(I):�3���3,XX$:�3,�4);"A U T H O R":�3:�3,AN$(I):�3���3,XX$:�3,�2);"M A G A Z I N E":�3�
�+....PLEASE SELECT....+,+++++++++++++++++++++++J�"�":�:�53280,7:�53281,1:�"�":�I�1�20:�M$u��9);M$:�:�:�"";SE$:SE��(SE$)��SE$�"/"�440��SE�1�SE�14�520��SE$�"1"�Z$�"BUSINESS"�&�SE$�"2"�Z$�"DISK OPERATION"�0�SE$�"3"�Z$�"+��DE�6��"�":��5);": COMMENTS OR NOTES :":�:�"";,��DE�6��CM$(I):�:�"ENTER NEW VALUE":�:�CM$(I):,���(CM$(I))�70��60:�,�6280L,��CM$(I)�"/"��[,��"�":�6010�,W�====LIST + DELETE ROUTINE =======�,X�"�":�10:�"�":�I�1�C:�:��,b��9);"[:SUBJECT O7��80:��(��DE�1��"�":��5);": SUBJECT OF ARTICLE :�":�:�"";-)��DE�1��SU$(I):�:�"ENTER NEW VALUE":�:�SU$(I)K)��(SU$(I))�79��60:�:�6130])�SU$(I)�"/"���)�DE�2��"�":��5);": TITLE OF ARTICLE :�":�:�"";�)�DE�2��TA$(I):�:�"ENTER NEW VALUE":�:RD NOT FOUND":��%@��10)"[A]�BORT OR [R]�ETRY
&J�DE$:�DE$�""�5450!&T�DE$�"/"�DE$�"A"��;&^�DE$�"R"�DE$�"":�5000W&h�DE$��"A"�DE$��"R"�5450�&|�:��13);"SELECT RECORD":�"";:�RN:�RN�C�5500�&��"�":�"�":I�RN:FA�1:�7010�&o�====MODIFY RECORD=====	OR]":�"�"�"�A$:�10:�5300#�"�":��12);"ENTER ";:�"";:�"[MAGAZINE]":�"�")#(�M$:�10:�5300X#2�"�":��13);"ENTER ";:�"";:�"[ISSUE]":�"�"j#<�I$:�10:�5300�#��"�":�" #";�10);"ONE MOMENT SEARCHING":��20��(Z$)�2);Z$�#��I�1�C�#��DE$�"S"��(S$,�(S$
:�3,MN$(I) ��3:�3,XX$:�3,�5);"I S S U E":�3:�3,ID$(I): ��3:�3,XX$:�3,�3);"C O M M E N T":�3:�3,CM$(I)H ��3:�:�3:�f ��=====SEARCH ROUTINE=====� ��"�":�I�1�5:�:�:��15);"SEARCH BY":�� ��:��15);"[S]�UBJECT":�:��15);"[T]�ITLE":�� ���15);"[A]�"�":�I:��.��F4�1��"�";�5);"MODIFY THIS RECORD [Y]� OR [N]�":�7140&/��"�";�7);"CONTINUE PAGING [Y]� OR [N]�"</��DE$:�DE$�""�7140K/��DE$�"/"��g/��DE$��"Y"�DE$��"N"�7140�/��F4�1�DE$�"N"��"�":�:��/��DE$�"N"���/��F4�1�DE$�"Y"�F4�.:�"�":�F ARTICLE:]�":�"";SU$(I):�-l��9);"�[:TITLE OF ARTICLE  :]�":�"";TA$(I):�7-v��9);"�[:AUTHOR'S NAME     :]�":�"";AN$(I):�j-���9);"�[:NAME OF MAGAZINE  :]�":�"";MN$(I):��-���9);"�[:ISSUE #/PAGE/DATE :]�":�"";ID$(I):��-���9);"�[:COMMENT 
�TA$(I)�)$��(TA$(I))�39��50:�:�6160�))�TA$(I)�"/"��%*.�DE�3��"�":��5);": AUTHOR'S NAME :�":�:�"";V*8�DE�3��AN$(I):�:�"ENTER NEW VALUE":�:�AN$(I)t*B��(AN$(I))�39��50:�:�6190�*G�AN$(I)�"/"���*L�DE�4��"�":��5);": NAME OF MAGAZIZNE :�":�:�"=�&pF4�1:�7000
'z��7);"�";"[1. SUBJECT OF ARTICLE ]�":�"";SU$(I):�B'���7);"�";"[2. TITLE OF ARTICLE   ]�":�"";TA$(I):�z'���7);"�";"[3. AUTHOR'S NAME      ]�":�"";AN$(I):��'���7);"�";"[4. NAME OF MAGAZINE   ]�":�"";MN$(I):��'���7);"�";))��(SU$(I),�(S$))��I;SU$(I):K�K�1#$��DE$�"T"��(T$,�(T$))��(TA$(I),�(T$))��I;TA$(I):K�K�1\$��DE$�"I"��(I$,�(I$))��(ID$(I),�(I$))��I;ID$(I):K�K�1�$��DE$�"M"��(M$,�(M$))��(MN$(I),�(M$))��I;MN$(I):K�K�1�$��DE$�"A"��(A$,�(A$))��(AN$(I),�(A$))��I;AN$(�UTHOR":�:��15);"[M]�AGAZINE":�!���15);"[I]�SSUE!��DE$:�DE$�""�5040(!��DE$�"/"��_!��DE$��"S"�DE$��"T"�DE$��"A"�DE$��"M"�DE$��"I"�5000p!��F1�1�F1�.:��!��DE$�"S"��"�":�I�1�4:�:�:�5090�!��DE$�"T"��"�":�I�1�4:�:�:�5110�!��DE$�"A"��"�":�I��/�"�":�:K2�.:��/SU$(I)�"DELETE":�5,8,5,"@0:"�Z$�",S,W":�"�""0��4);"ONE MOMENT DELETING RECORD #";I:�I�1�C?0 �SU$(I)�"DELETE"�C�C�1:�u0*�5,SU$(I)P$TA$(I)P$AN$(I)P$MN$(I)P$ID$(I)P$CM$(I)�04�:I�C�1:SU$(I)�"EOF":TA$(I)�"TITLE":AN$(I)�"AUTHOR":OR NOTES  :]�":�"";CM$(I):�
.��FA�1��:�"�";�8);"PRESS ANY KEY TO CONTINUE".��FA�1��DE$:�DE$�""�7070,.��DE$�"/"��=.��FA�1�FA�.:�t.��FL�1��"�";�5);"DELETE THIS RECORD [Y]� OR [N]�"�.��FL�1��DE$:�DE$�""�7100�.��FL�1�DE$�"Y"�7180�.��FL�1�";�*V�DE�4��MN$(I):�:�"ENTER NEW VALUE":�:�MN$(I)+`��(MN$(I))�39��50:�:�6220+e�MN$(I)�"/"��U+j�DE�5��"�":��5);": ISSUE / PAGE / DATE :�":�:�"";�+t�DE�5��ID$(I):�:�"ENTER NEW VALUE":�:�ID$(I)�+~��(ID$(I))�39��50:�:�6250�+��ID$(I)�"/"���
"[5. ISSUE #/PAGE/DATE  ]�":�"";ID$(I):�"(���7);"�";"[6. COMMENT OR NOTE    ]�":�"";CM$(I):�N(���7);"�";"[7. WRITE TO DISK      ]�":�r(���7);"===>CHANGE WHICH LINE<=="�(��DE$:�DE$�""�6090�(�DE��(DE$):�DE$�"/"���(��DE�1�DE�7�6090�(��DE�I):K�K�1
%��K�15�K�0:�:��4);"CORRECT RECORD FOUND [Y]� OR [N]�":Y�1(%�Y�1��RE$:�RE$�""�53807%	�RE$�"/"��W%�Y�1�RE$��"N"�RE$��"Y"�5380|%�RE$�"N"��"�":Y�.:RE$�"":�:�5440�%"�RE$�"Y"�Y�.:�5500�%'�C�I�K��1�K�15:�5370�%,�:��%6��11);"RECO1�4:�:�:�5130�!��DE$�"M"��"�":�I�1�4:�:�:�5150"��DE$�"I"��"�":�I�1�4:�:�:�5170P"��"�":��13);"ENTER ";:�"";:�"[SUBJECT]":�"�"b"��S$:�10:�5300�"��"�":��13);"ENTER ";:�"";:�"[TITLE]":�"�"�"�T$:�10:�5300�"
�"�":��13);"ENTER ";:�"";:�"[AUTHMN$(I)�"MAG"�0>ID$(I)�"ISSUE":CM$(I)�"COMMENT"1H�5,SU$(I)P$TA$(I)P$AN$(I)P$MN$(I)P$ID$(I)P$CM$(I):�5:FL�.:�.1?�====END===_1@�"�":�X�1�12:�:�:��9);"IT'S BEEN A PLEASURE"�1J�I�1�15:�53281,I�1:� X�1�200:�X:�I:�53281,6�1T�"�":�"":��1'#�====== 
 
� ************************?� *      GAMELOADER      *^� *     BY TIM BROWN     *}� ************************��53281,12:�53280,12:�"��"�
�"BASIC LOADER CONSTRUCTION"��"ENTER PROGRAM NAME";NA$��"ENTER ADDRESS TO SYS";AD$l240<#�54275,1:�54274,06F#�54273,33:�54272,135:�54276,65OP#�T�1�500:�:�54276,64\Z#�54296,0b�#��"N"�70�	P�A$�"N"��9000:�50�	d�"�NOW CONSTRUCTING LOADER"�	n�1,8,15:�1,"R0:"�NX$�"="�NA$�	s�1,E,E$:�E�0��"�ERROR !":�1:�10
u�1:()�I1$:CM$(J)�CM$(J�1):CM$(J�1)�C1$:�00�5�$��5�$F�.:�J�1�C�1�5�$�AN$(J)��AN$(J�1)�9480
6�$�100006%�:�F�1�9450 6%�16%F�.:�J�1�C�1L6&%�MN$(J)��MN$(J�1)�9540[60%�SUSB10000k6:%�:�F�1�9500q6D%��6N%F�.:�I�1�C�1�6X%�ID$(J)��ID$(J�1)�9580