109527)4:"EY ROGRAM START":1,5,06,"ROGRAM  ICRO ASK ":1,5,08,"() 1986  INGSOFT ":1,5,10,"RITTEN BY  UERGEN UCK ":I116:2::1A$:A$""2:5'""ES$"B";:"";:307279,120:::AA307280:ADAA:AM30712440:BL$"":BL$BL$BL$:W$"˒ASS ĒISK":N18:N,(N132)::IM21:T$(IM),L$(IM),AT(IM):AD307280:AAAD:I1:F1:6A4:"ɒNPUT ƒORWARD ’ACK ͒ASK ŒRASE F2ASS":FL$"IFBME":131:J6122^J12,16,25,10,8:JAJ:6iF0 T$(I)"":L$(I)""::108:101:J2::108:IE1:105:J2: F0 108:IE1:105:J2: F0F0:I0 84:AT(I)0AT(I)AD:ATAD2ADAT(I):LE80:V$T$(I):30:T$(I)V$:T$(I)""FL1:86:ADAD1:V$L$(I):30:L$(I)V$:FL0:101::AD1,32:ADAT(I):59:ATAD:ALAD:::F0T$(I)""101:J2:IAI:II1:IIMII1:AT(I)0220AT(I)((AD3072)401)403072:AT(I)AMAT(I)AT(I1)(T$(I1)L$(I1))SAT(I)AMAT(I)0:II1:101:ATAT(I):ADAT(I):FI:IE1:FI:105:FI:AD,160:24101::F0IAI:T$(I)""AD,32II1:I0I0F0T$(F)""FF1101:5::FL$(20)(13)":;,":N(V$):N132_N1(V$):A$(V$,N,1):95:ADAD1:x ADAD1:80:AD1,94!LL(V$)"LLLEADAM1AD1,32#132:N(FL$,A$):N041$LLLEADAM134%ADAD1:80:(AD)32(AD)9433+&95:AD1,94:FL1AD,100:V$V$"":408'V$V$A$@(33L)N635Y*N44,46r+N260,60,60,60:35,LL133-V$(V$,LL1):AD,94:AD1,32:ADAD1:80:33./LA(V$):LA0 0N1LA:A$(V$,N,1):95:ADAD1:::LA(V$)1:LALE1"1NLALE:"";::32::DD0127C3T$(0)""4LE15:G$" AVE AME OF MASK : ":AD3072(G$)3:G$;ES$"Q";:V$NA$:30:NA$V$:NA$""5:107:DD11,1,2,NA$:576120:A6256*7"RROR!ASK EXISTS. EPLACE Y/N";:132:A$"Y"1,8,15,"S:"NA$:1:Չ50@81,8,2,NA$",S,W"91,F:I0F:1,AT(I):1,T$(I):1,(L$(I)):1,""::I03:1," "::I02:1,0::1:I0:104::"":205,YK1:196,YK1::XK);:;:<AD1,32:ADAT(I):PA(AD):AAAD:AA,102:85:62=132*>N("",A$):N165=?N72,74,76,78E@61UAFL167,69]B71{CTT$V$L$(I):99:F1161D96:ETT$T$(I)V$:99:F1161F98:GH::ADAD40:AD307280ADAD40I79J::ADAD40:ADAMADAD40K79#L::ADAD1:ADAMADAD1+M79MN::ADAD1:AD307280ADAD1sOAA,PA:PA(AD):AAAD:AD,102:61P::YK((AD3072)40):XK(AD3072)YK40::AD3072YK40XK::FL$"EVZDLM":131:J1Q(AD1)94AD1,32#R" ";:J83,87:)S:ST4:" ODE : EXTINPUT ";ES$"Q";:|U" ODE : URSOR ";ES$"Q";:V" ODE : ENGTH ";ES$"Q";:W::" ODE : DVANCE ";ES$"Q";::LA(V$)1:LALE1X::DD0127 YLE15:G$" OAD AME OF MASK : "[ZAD3072(G$)3:G$;ES$"Q":V$NA$:30:NA$V$:NA$""{[:107:DD11,1,0,NA$:94\120:A6290]1,8,2,NA$",S,R"^1,F:I0F:1,AT(I):1,T$(I):1,L:L$(I)(BL$,L):1,A$::1:I0:IE1:JA0:101:JA2:_82,(A$):208:AD,(82):-`AA$A$:84aATAD:ADAT(I):A$" ":N1(V$L$(I)):95:ADAD1::ADAT:AT(I)AT:47:AD,94:ADAD1:A$AA$:b86:VA$V$:L$(I)"":V$T$(I)V$:97:V$VA$:c::F10:AD(TT$)AMF11de::IFf(JA2JA3)(J2J3)121g108$hIEIwi""ES$"T";:N0F:ADAT(N):80:58:NIE""T$(N)""L$(N);:ՙT$(N)L$(N);jN:ATAT(I)k"";ES$"B";:l::FEF:F0mN0F:T$(N)""AT(N)AM1nN:N1F:F10:MFN1:AT(M)AT(M1)112ooAAT(M):AT(M)AT(M1):AT(M1)A:V$T$(M):T$(M)T$(M1):T$(M1)V$:V$L$(M):L$(M)L$(M1):L$(M1)V$:F11pM:F10114qNrF11:N0FE:AT(N)AMF1N:AT(N)0:L$(N)""s:F10FEF11tFFE:IFIFuvDD1 w""ES$"T";:::"";:E x::1,8,2,NA$",S,R":2,8,15:2,A,B$,C,D:2:1: y::ADAT(IA):80:,XK,YK,T$(IA):ADAT(I):80:,XK,YK,""T$(I)"": z: {4:"̒OAD ӒAVE "W$" ÒATALOG F1DITOR";:FL$"LSKDC":131:A$"":10:ADAA:6!|J88,50,125,126,118:123,!}W$"ASS ĒISK":DD1:J!~W$"˒ASS ISK":DD8:n!4:"˒ASSETTE ĒISK"ES$"Q";!132:A$"K"125!A$"D"126!128!::132:J(FL$,A$):!::A$:A$""132!!҅-!.&'LR0 `))?R`) @R`0&"J11151:131O"J32,70,67,74,87,111,134,35,38:130"::HE$"F4"B$(0)" F5"B$(1)" F6"B$(2)" F7"B$(3)" ͒ENU""ME$" EXTBAUSTEINE ":153"FL$"M":7:J5151:136"J6"J1135K#HE$"":152:LE15:""J3"F:";:AD3076:V$B$(J1):JAJ:12:B$(JA1)V$:134e#::B$(J5)""LLLE#DL(B$(J5)):LLDLLEDLLELL#V$V$(B$(J5),DL):LLLLDL:N1DL:A$(B$(J5),N,1):30:ADAD1::LLLEAD,94##::DD0146$149 $""ES$"Q˒ASSETTE ĒISK"9$FL$"KD":7:J0147C$JJ2$J3DD1:DD$"ASS ĒISK":DD8:DD$"˒ASS ISK"$$::P1P11:P12P10:153$191:160:""HE$;:$::P11152$191:""ES$"Q"ES$"Q";:160:""ME$;:156:E%::158:FR$(FF):FR$(" "FR$,5):1,30,0,"EM:"FR$"":192:`%::RE$(K):K0RE$""%RE$(" "RE$,3):1,22,0,"EC:"RE$"":155%FF(0):FF100194%&::""ES$"Q"ES$"Q":"";:3151,120:&::DD8:&HE$" ATALOG "::152:155:::&::V$(RA):V$(V$,(V$)1):HE$"":151:"ECORD SPACING : ":AD3092:12:RA(V$):V$(FA):V$(V$,(V$)1):151:"IELD SPACING : ":AD3092:12:FA(V$):'::T01T02:TT$T2$:T01:TT$T1$':DR12,4,7:2:'I0F:FE$(I,K):I:2:2:H'::KE0W'KKEKKEs'PP0:BI02,4,7:՟2,3'ATAT(0):182:LAL:I0F:(239)0173'(198)36"TOP PRINTING":PP1:179'239,0'ATAT(I):182:F$(I)""LAL:178 (LLA176(N0FA:2:6(T012,T$(I)" : ";O(LAL:2,FE$(I,K)" ";c(I:N0RA:2:j(2~(A$:A$""180((::L((AT3072)40):(::191::KE099("ELECTION OF FIELD TO BE PRINTED ";:192:DR2:101:DR1:)K0KE:PP0167:65535)K:N)::BI1HE$HE$"IDEO":HE$HE$"֒IDEO"f)HE$HE$" ͒ENU":})::A$"V"BIBI1))::""ES$"B";:)::""ES$"T";:)192::" O RECORD AVAILABLE ":)ME1)K0 *I0F:FE$(I,K)"":S*ME1:" UT OF MEMORY! ECURITY FILE SAVING ";:53:NA$""197Y*EMRFFRjFAR0 `))?R`) @R`X'L RUN: :::ES$(2'*L!