1 'PRINT.BA/CO by Jim Irwin, loader by Robert Benson 9/26/88
10 CLS:CLEAR50,59900:X=99:AA=59900
11 DEFINTI-N:H$="0123456789ABCDEF"
12 PRINT@59,"Data line"
13 PRINT@99,"File address"
14 READA$:X=X+1:PRINT@72,X
15 B$=MID$(A$,1,2):GOSUB25:N=K
16 IFK=0THENSAVEM"PRINT",60503,60503,60503:END
17 B$=MID$(A$,3,2):GOSUB25:L=K
18 B$=MID$(A$,5,2):GOSUB25:L=K*256+L:L1=0
19 FORI=1TON
20 J=I*2+5:B$=MID$(A$,J,2):GOSUB25
21 POKEAA,K:PRINT@112,AA:AA=AA+1:L1=L1+K
22 NEXTI
23 IFL<>L1THENBEEP:PRINT@165,"Checksum error":END
24 GOTO14
25 B1$=LEFT$(B$,1):K1=INSTR(1,H$,B1$):IF K1=0GOTO28
26 B1$=RIGHT$(B$,1):K2=INSTR(1,H$,B1$):IF K2=0GOTO28
27 K=(K1-1)*16+K2-1:RETURN
28 BEEP:PRINT@165,"Non HEX Character in DATA":END
100 DATA 38FE0201FFFFFF00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
101 DATA 38BB090000000001FFFF000000000000000000000000000000000000000000000000000000000000000000000000003AD0F5B7C0CDCB12FE1BC0C3
102 DATA 3842211AEDF57E233CC26FEA7E233CC275EA7E3CCA82EAF1C9F1F12AADF1C366F1F132B3F532C5F52AC8F52B237EFE0DC2A4EA237EFE0ACA95EA2B
103 DATA 387E1F22C8F5C9CDD439CD2242C9D5AF5F47041C1AFE20CAB3EAD1053AD2F5B8F07832D2F5C9231C1AB7C2C7EA1D2BAF12C33EF5CDB8F43AFFEF3D
104 DATA 388E1F32D9F52115EBCD585A3AD9F53C32D9F56FAF67CDA8EA1E3F1631D5CDE1F21DF2F7EAD121F5EF7E2386238682003C57CDE1F21DF20BEBC39A
105 DATA 38F11DF20C506167652000CACAF2C3DFEACD4272C00000DBBBE606FE02CA3AEB21A8EBCD585AC322EB2167EBCD585A3AFDEF2138EABECA58EB4623
106 DATA 38CE1704C24AEB4604CA04F1C346EBF5237E3CCAB3F13DCDBAF1C359EB001B59262B5072696E74696E67202D205573652045534320746F2041626F
107 DATA 387D1D7274008257C3A9F2DBBBE606FE02C2BBF1F1CD7A4BF53AFEEFFE59C2A5EB32ACFAF1C9001B59262B5072696E746572204E6F742052656164
108 DATA 38871979003AD0F5B73AC5F5CA40F2E10021D8EBCD585AC93E0BE7C317EC001B592229496E76616C696420537461727420506167652E00CD5AF2CD
109 DATA 385621D5EAC311ECCD5AF2CDF8F2C311ECCD5DF2CD28EBC3D1EBCD5AF2CDAFF3CD00EDCD31422ACCF522C8F5C377EE0000362F23362F2B34D664D2
110 DATA 38D01D28ECC6642334D60AD231ECC63A23772B2B7EFE30C03620237EFE30C03620C93AF7EF32D8F5C3D9EFCD31422135EDCD585ACDDDF121E2F5CD
111 DATA 383323585ACD494221E6F5CD00EDFE0DCAD7ECE5F52123EDCD585AF1E1FE21DA8FECE7777DFEEFC28EECAF772B23CD00EDFE0DCAB6ECFE08C2AEEC
112 DATA 38871D4F3A3AF6FE0A79DA8FECE72B3E20E73E08E7FE20DA8FECC383ECAF7721E6F506067EFE2ECACCECB7CACCEC2305C2BDEC362E23364423364F
113 DATA 382A2023360011E6F53E0ACDAB5AC2FAEC216BEDCD585A21E6F5CD585A21D65CCD585A21E6F5C374ECCDE35AC371EEE5D5CD4272D1E1CA00EDDA15
114 DATA 386F11EDCDE90FFE03C03E07FE073E00C0E1CD8372C9C90000001B5927282020202020202020201B592728001B5921271B70204D6F64656C203130
115 DATA 38D9103020546578742050726F636573736F72201B711B59272053656C6563743A1B5927434D656E75001B5921291B6C46696C6520004C65667420
116 DATA 3884104D617267696E202020202030005269676874204D617267696E20202020300043686172205072696E7465642020203830004A757374696679
117 DATA 3813102052696768742020204E00546F70204D617267696E2020202020203000426F74746F6D204D617267696E202020300050616765204C656E67
118 DATA 38BC0E746820202020363600446F75626C65205370616365202020204E00466F6E7420436F6465202020202020203100416464204C696E65204665
119 DATA 381D1265642020204E0053746172742040205061676520202020310057616974204274776E20506167657320590001FF0C2177ED3E5BE77EE73E5D
120 DATA 38AE1CE723CD585A230CC26CEE3E20E7E70D0D05C255EEC922C8F5CD3142CD4FEE3E0AE7CD694221E6F5CD585ACD6E422192EECD585AC3B4EE1B59
121 DATA 383217272A46696C652047727068205061676520456E64732050726E74204D656E7500210701CD7C42215BED0607CD64F2CD4272CAC2EED2EAEEFE
122 DATA 38DB2202CA54ECFE03CAF0EBFE04CA0BECFE05CAF9EBFE06CA02ECFE07C2C2EEC9CDE90FFE58D2C2EE11F5EF0112002177EDE521E8EFBECA45EFF6
123 DATA 38862280BECA1AEFE67FF57EB7CADFEFF1E309E31323C3FFEEE1FEC6CA31EF1AFE59CA2CEF3E5912C39BEF3E4EC328EF1AFE30CA3FEFFE32CA3EEF
124 DATA 38B9183E2D3C3C3CC32EEF00210701CD7C42E1060ECDE01B21E4EF0603CD00EDFE08C272EF78FE03CA56EF042B3E08E73E20E73E08E7C356EFFE0D
125 DATA 38611DCA8EEFFE30DA56EFFE3BD256EF4F78B7CA56EF79C353F2000000360021E4EFD5CDEB08EBD17D123E1BE73E6CE711E8EF0112002185EDE521
126 DATA 38C925F5EF1AB7C2B7EFE1C34BECFE80DACAEF7E23E3E5232377E109E313C3AEEF7E23E3E5C5CD22ECC1E1C3C4EFADFF3E0BE7C377EEE1E1C3C2EE
127 DATA 381E0E383000004C5243CA544250C446C153D7000000504E0000424E014E01590D0A004946494E53545228227959222C412429474F544F3130454C
128 DATA 38FA0B53454D454E550D0A0052494E5422202243485224285045454B284929290D0A00450D0A00676F6573207468650D0A006874730D0A00000065
129 DATA 381013206C656E677468206973207A65726F206F72206C6573732E202049207468696E6B20676172626167652077696C6C20726573756C742E0D0A
130 DATA 388F0B002020202020202057656C636F6D6520746F2055504C6F6164696E672066756E210D0A000000000000000000000020202020202020205765
131 DATA 3837086C636F6D6520746F2055504C6F6164696E672066756E210D0A00000000000000000000000000000000000000000000000000000000000000
132 DATA 38A71E00000000C3DFF3CDCDB8F43AF9EF473E0ACD5EF1CDC1F3473AF5EF80473AE0F580473E20CD5EF1CD66F13AFCEFFE59C235F106013E0ACD5E
133 DATA 38AA21F13AD0F5B7CA40F1CD53F1C93AC5F53D32C5F5C210F1CD53F1CD03F4C307F13E0CCDBAF1C3D1F100000005F8CDBAF1C35EF17E23FE0ACA7D
134 DATA 386923F1FE0DCA77F1FE20DA85F1CDBAF1C366F1CDBAF1AF32D1F5C9462322ADF12138EABEC46EEAC28DF178FE2BCAA0F1237E3CC29AF1237E3CCA
135 DATA 381E2084EA3DCDBAF1C3A0F174000DC31DF5F1C304F1000000F5CDEEF2CA8CEBFE1BC4CB12FE1BC28CEBF1C3C8F200003A00F0FE4EC8C360EA0000
136 DATA 38361D00210401CD7C4221AFF9010B00097E3CC8C31DF200573AE0F58257AF32D1F5C394F23AFCEFFE59C207F21C3AC5F5C3CEF23AFCEFFE59C21C
137 DATA 380821F13E01CD89F1C31CF1FEC1C2E9F1E52323233E20E7C36DF200CD03F43AFFEF3DCA03F4324FF5CDC1F3C3BEEB3D32C5F5C23AF2CD03F43A4F
138 DATA 383B1CF5C333F200000077E72305C356EFCD31422AC8F522CCF5C9CDE01BCD5D42C900001E067EE7231DC26FF23E20E7E1C3E9F100D53AD2F55F1C
139 DATA 381A261AFE20C28EF2D1C35AF5B7C283F2D1C93AF5EFC387EB3AF9EF5FD5CDC1F3D1163282C3F1F17EFE0DCABFF2FE20CABAF2DA8FF3CDE1F21423
140 DATA 38BD24C3A9F21C3AD0F5B7CAFEF1C9E1E1E1C314EC3D32C5F5C29EF2CD03F4CDCB12FE1BC31CEB00D5E5CD4C74E1D1C93AD7F53CC9E5D5CD4272D1
141 DATA 383C26E1C90000CDB8F40000003AD0F5B7C0CDC1F3F53AB3F5473AC5F5B8C21FF3F1CDDCF3CDA4F4CDF1F3C3FEF2FE01CA28F3F1C316F3F1CDDCF3
142 DATA 38351BC316F300000000000000000006283EF1E705C23CF3C9FE10C20CF53E0132C5F5C9CD60F33AFCEFFE59C25BF33E0AE7AF32D1F5C93AE0F547
143 DATA 389D1A3E2005FA70F3E7C366F300237E23B7C8FE0DC281F3E7C370F300000000FE0ACA79F3FE20DA6FF3E7C370F32323C3A9F20000000000000000
144 DATA 38621600000000000000000000000000000000000000CDB8F4CDC1F3CDDCF3CDA4F4CDF1F3C3B2F3CDECF422C8F53E0D121C3E0A121CAF122101F0
145 DATA 38F1223AD1F5B7C8791FC9473E2005FAE7F3E7C3DFF3CD4DF33AD0F5B7C8F1C9CD4272C8FE1BCAC9F2CDCB12FE1BCAC9F2C921F9EF7E2346238047
146 DATA 387D207E90473AFCEFFE5978C28BEA1FC38BEA007E32E0F5C3FAF4FE0DC236F400233AD5F532D2F5AF120000C9FE1AC23FF432D0F5C9FE03C24BF4
147 DATA 38DD1E32D1F500C30CF5FE09C25FF40006083E20121C0D05C255F4C30CF5FE17C271F4AF32D6F532D5F532D2F5C347F4FE18C281F4AF32D6F5CDE9
148 DATA 381E21F291C368F4FE19C292F4CDE9F2914779984F78C365F4FE10C29DF43E0132C5F5C9121C0CC30CF5003AC5F53D32C5F5C0CD03F4CD38F3C3FA
149 DATA 38671BF3000000AF21C5F577237723773E09856F0607AF772305C2C8F4C32DF21C1AFE20C267F5C3D1F4041AFE20C27BF51DC3DCF4C5462C70C1C9
150 DATA 38CD1821D5F53AD2F5B7CA1DF4AFC31EF42346804723237E902B774F0C2AC8F51101F07E23FE20DA24F4121C0DC20CF5AF120C0C1D3AD2F5BB0000
151 DATA 387A1DCAC8EA2B1AFE20DAAFF1C21CF50D0C1D1AFE20CA32F50D1CAF122B237EFE20CA3FF5CDB4F5AF32D2F5C9000132D2F51AB7C81CC353F5CDAF
152 DATA 38A423EA473AD3F5B7C278F5581C1AB7CA65F5FE20C266F5CD8EF51CC3D1F443581D3AD2F5BBCA79F51AFE20C27AF5CD8EF5C3DBF4E5D5E12C7EB7
153 DATA 38721EC291F57BCDE6F42DBDCAA4F52DC398F5E10DC0F13AD3F52F32D3F5AFC350F5420DC83AF8EFFE59C0C37EF2000000000000330000F0D82020
154 DATA 240307F0D835381A0000000000005050040C420606594E00001B59272857524954452E444F0000
155 DATA 000000