Listing of file='2228LOAD' on disk='vmedia/702-0079.wvd.zip'
# Sector 502, program filename = '2228LOAD' 0010 REM 2228LOAD LOAD 2228 WITH ASYNC RAM CODE 2227B R5 EQUIV 0020 DIM W$(4,64)16 : INIT(00)W$ : PRINT "RESET CONTROLLER" : $GIO#1(4580,W1$) : $GIOINITIALIZECCV#1(4402A000440C,W1$)W$ : $GIO#1(0101020012124405A000440C,W1$)W$()<1,1> : IF STR(W1$,8,1)<>HEX(10)THEN 150 : $GIO#1(4580,W1$) : W$="T27D010D" : PRINT HEX(03);"LOADING 2228 MICROCODE WITH FILE =";W$ 0090 DATA LOAD DC OPEN TW$ : PRINT "LOAD MICRO CODE INTO CPU" : DATA LOAD DC W$() : FOR W=1TO 100 : NEXT W : W1$=HEX(1000) : PRINT "WRITE MICRO CODE TO CONTROLLER" : $GIOWRITE#1(6C0042104220A2004404,W1$)W$()<1,4000> : PRINT "MICROCODE LOADED" 0150 PRINT "LOAD PROGRAM ";Z$ : Z9=1 : LOAD DC TZ$