Listing of file='START' on disk='vmedia/701-2356A.wvd.zip'
# Sector 168, program filename = 'START' 0010 REM ***** START - RELEASE #1.9 09/14/81 ***** 0012 SELECT DISK 310, #1 310, #6 01C 0015 DIM W$(128,4)16, B2$2,A$64 0020 REM 0025 $GIO#6(4580,A$) 0030 REM OPEN 2228B MICROCODE FILE 0040 DATA LOAD DC OPEN T#1, "M-3270" 0050 REM READ 8K OF MICROCODE INTO W$() 0060 DATA LOAD DC #1, W$() 0110 REM WRITE 8K OF MICROCODE INTO W$() 0120 $GIO WRITE#6(4400 4010 4080 A200 440C, A$)W$()<129,(8*1024)-128> 0130 IF STR(A$,8,1)<>HEX(00) THEN 160 0140 FOR A=1 TO 100 : NEXT A : REM /DELAY 0145 PRINT HEX(030A0A0A0A0A0A0A),,"LOADING 3275 EMULATOR" 0146 PRINT ,HEX(08);"(Release #1.9 9/14/81)" 0150 LOAD DC T"EM3270" 0160 STOP "LOAD ERROR--WRITE"