image of READY prompt

Wang2200.org

Listing of file='2281W' on disk='vmedia/mvp-diag-2.6.2.wvd.zip'

# Sector 3431, program filename = '2281W'
0010 COM L,M,S,N,E,P,C,T,A,T$30,T2$70,F1$1,L1$1,V8$12,Q$1
0020 L=6
   : S=35
   : P=10
   : N=132
   : E=0
   : C=86
0030 T$=HEX(01020412100607080A0C0D0E1516171819111C)
0040 T2$=" 1,2,4,6,7,8,10,12,13,14,16,17,18,20,21,22,23,24,25,26,27,28"
0050 F1$=HEX(1E)
   : L1$=HEX(7A)
0060 PRINT HEX(030D0A),"FOR ADJUSTMENTS, REFER TO MAINTENANCE MANUAL"
0070 PRINT HEX(0A),"III.C.6-M.1  SECTION 5."
0080 PRINT HEX(0A0A0A)
0090 INPUT "SELECT THE PITCH ( 10 OR 12 ) ",P
   : PRINT HEX(0A)
0100 IF P=10THEN GOTO 120
0110 IF P<>12THEN GOTO 60
0120 INPUT "SELECT THE LINES PER INCH ( 6 OR 8 ) "L
0130 IF L=6THEN GOTO 150
0140 IF L<>8THEN GOTO 120
0150 IF P=12THEN N=157
   : PRINT HEX(0A)
0155 INPUT "USING WIDE PAPER ? KEY Y OR N ",Q$
0165 IF Q$="N"THEN N=80
0175 V8$=HEX(020307090B)
0185 IF N<132THEN T$=HEX(0102041216130708100A0C0D0E11151718191C)
0195 LOAD DC T"GPE-1"195