0 'ROMCOM.100       (c)1990 Wilson Van Alst
1 'v1.0           All rights reserved
2 'Loader for ROMCOM.CO, program that
3 ' saves ROM: images to the COM: port
5 'Distributed by EME Systems under license from the author.
10 CS=0:FOR AD=64704TO64747 
15 READ D%:POKE AD,D%:CS=CS+D%
20 NEXT AD
25 IF CS<> 5596 THEN BEEP:PRINT"Typo in data!!?":END
30 SAVEM"ROMCOM",64704,64747,64704
50 DATA 33,230,252,55,205,230,23,33,0,0
51 DATA 17,0,128,243,62,1,211,232,78,151
52 DATA 211,232,251,149,204,164,82,121,205,50
53 DATA 110,216,35,223,194,205,252,201
54 DATA 56,56,78,49,68,0
55 REM line 54 sets stats: 88N1D