8-Bit Software Online Conversion
:0.$.Tmp2To2 - Listing
10REM >Tmp2To2
20REM
30REM Thursday 8th July 1993
40:
50MODE 0
60VDU 23;8202;0;0;0;
70INPUT "Output file:"file$
80MODE 2
90VDU 23;8202;0;0;0;
100chan%=OPENIN("Temp")
110FOR y%=0 TO 255
120FOR x%=0 TO 159
130GCOL 0,BGET #chan%
140PLOT 69,x%*8,y%*4
150NEXT
160NEXT
170CLOSE #chan%
180OSCLI "Save "+file$+" FFFF3000 FFFF
8000"