1 REM loads INTELO.CO for M100/102
2 REM (c) 1989 Tracy Allen  76670,326
3 REM & Wilson Van Alst 76576,2735
4 REM Translates binary data in ROM
5 REM or extRAM into Intel Hex file,
6 REM sent out COM:88N1E.
7 REM Use null modem; other computer
8 REM ready to receive; run intelo.co.
9 REM 1.5 to 7 minutes for 32kbyte copy.
10 CS=0:FOR AD=64704TO64857 
15 READ D%:POKE AD,D%:CS=CS+D%
20 NEXT AD
25 IF CS<>17704 THEN BEEP :PRINT"Typo in data!!?":END
30 SAVEM"INTELO",64704,64857,64704
50 DATA 33,84,253,55,205,230,23,33,0,0
51 DATA 17,0,128,62,58,205,50,110,6,0
52 DATA 14,32,205,61,253,76,205,61,253,77
53 DATA 205,61,253,14,0,205,61,253,205,164
54 DATA 82,205,36,253,120,47,60,79,205,61
55 DATA 253,200,62,13,205,50,110,62,10,205
56 DATA 50,110,223,194,205,252,62,58,205,50
57 DATA 110,22,5,14,0,205,61,253,21,194
58 DATA 11,253,62,13,205,50,110,62,10,205
59 DATA 50,110,62,26,205,50,110,195,203,110
60 DATA 205,50,253,205,61,253,35,125,230,31
61 DATA 200,195,36,253,243,62,1,211,232,78
62 DATA 175,211,232,251,201,121,128,71,121,15
63 DATA 15,15,15,205,73,253,121,230,15,198
64 DATA 144,39,206,64,39,195,50,110
65 DATA 56,56,78,49,69,0
66 REM line 65 is com:88N1E