Compucolor.org – Virtual Media

Listing of file='MENU.BAS;01' on disk='vmedia/formatter-sector.ccvf'

100 A= PEEK (36860):B= PEEK (36861)
110 IF A= BAND A= 255THEN 200
115 POKE 36860,255:POKE 36861,255
120 PLOT 6,2,12,15:PRINT "LOADING FORMATTER."
130 PLOT 27,4:PRINT "LOA FORMAT.PRG":PLOT 27,27
140 PRINT :PRINT "FLASH--------------REMOVE THE FORMATTER DISK---------------FLASH"
150 PLOT 27,9
200 POKE 36860,0:POKE 36861,1
210 PRINT "FORMATTING FINISHED."