WUCopy KT 139 U@UC 10020^D2APC256:60:PC$B$:APC256A:60:PC$PC$B$:A((PC$,1)):A48PC$(16A7(A41))(PC$,3)::D<B$(48A167(A159))(4lU8(A15)7((A15)9)):D$'50::16452,128:"B - beolvas}s":"L - list}z}s":"S - save":"D - directory"4E.'A$:A$"B"11000:A$"L"12000:A$"S"15000:A$"D"18000:10030]E*:"MAGNOROL vagy DISKR\L ? (M/D)E*A$:A$"M"11010:A$"D"~U17000:11005RF+17160,205,171,60,119,35,201,221,203,20,166,221,54,26,131,205,152,4,33,0,86,205,117,60,119,35,22,0,254,185,40,67,254,177,40,50,254,181,40,46,254,241,40,13,254,245,40,9,254,249,40,5,24,0,43,24,220F +17216,205,8,67,95,205,8,67,205,8,67,20HU5,8,67,71,205,8,67,16,251,213,205,171,60,209,205,39,60,24,191F+17245,205,8,67,95,213,205,171,60,209,205,39,60,201#G +17258,205,8,67,95,205,8,67,205,8,67,24,235KGz+::(2)"Indtsd el a magn[t"(18)fG+I(17166)::::::uG+I02E3:G,I22U016:17160,33,0,86,235,55,63,229,237,82,68,77,225,84,93,197,6,7,19,16,253,193,3,237,184,2018H,T(I):T185ʎ:T177T181I(17160,I465536(I432767)):22016,249,0,162,64,2,0,0:H-T24911530:II4:II65536(I32767):D(I):IID256(D0)1:KUII65536(I32767):115105I -D(I465536(I432767)):C(I265536(I232767))256(I365536(I332767)):DD256(D0):IID5:II65536(I32767):C16547CD16547ʎ:11510I.:A,K,T,S,D:I22016:"K - LIST]Z]S BEF.":"U - UGR]S UJ REKORDRA": U"M]S BILL. - LIST]Z]S FOLYT."I.T(I):T24012050fJ.S(I165536(I132767)):S(S240)1.6(S15):C(I265536(I232767))256(I365536(I332767)):D(I465536(I432767)):DD256(D0)::I" T:"T" S:"S" C:"C" DB:"DJ.A$:A$""12025:U A$"K"ʎ:A$"U"II5D:II65536(I32767):12010J.JI5:JJ65536(J32767)*K.K(J):PCC:TX$"":50:"###### % % ### %%";C;PC$;K;(32(K32)(K29)):CC1wK/A$:A$""12035:A$"K"ʎ:A$"U"II5D:II65536(I32767):12010K/JUJ1:JJ65536(J32767):J(I5D65536(I5D32767))12031:II5D:II65536(I32767):12010K/T18512080FL/:I" T:"(I)" S:"((I165536(I132767))240)1.6((I165536(I132767))15)ZL&/"K"ʎ:12070L0/:I" T:"(I)" S:"((I1655366U(I132767))240)1.6((I165536(I132767))15)" C:"(I265536(I232767))256(I365536(I332767)):120701M2:T,D:A$" ":I22016:"PROGRAM N@V :";A$::4,A$",P,W"SM2QQ1:Q;:T(I):T24013030M2TT32:D(I465536(I432767)):DLDU :DH(D0):DD256(D0):XI665536(I632767):(A$),D1,X256(X256),X256256(X0)gN2#4,(T)((I265536(I232767)))((I365536(I332767)))(DL)(DH)((I565536(I532767)))A$;:II5D:II65536(I32767):13010N2T18513040:#4U ,(201):13050N2#4,(195)((I265536(I232767)))((I365536(I332767)))N24:I02E3::O::"MAGNORA vagy DISKRE ? (M/D)"7O:"M"15005:"D"13000:15001O::"N@V :";A$:(A$)1615005:::(2)"Indtsd el a magn[t !"(1vU 8):17160,(A$),11,67:I1(A$):17162I,((A$,I,1)):sP:17180,35,126,205,240,58,201,33,8,67,221,54,26,131,205,146,0,33,0,86,205,221,58,126,254,185,40,38,254,181,40,53,254,177,40,49,14,0,205,244,58,205,28,67,205,28,67,205,28,67,205,28,67,70Q:17233U ,205,28,67,16,251,121,205,244,58,35,24,210,14,0,205,244,58,205,28,67,205,28,67,205,28,67,121,205,244,58,201,14,0,205,244,58,24,241Q:I(17186):I02E3::NQhB:I22016:"PROGRAM N@V ";A$::4,A$",P,R"^QrB(4)11500Q|B#4,A$:T(A$):T208TT4U 32:17100QBI,T:II1:II65536(I32767):#4,A$:CL(A$):#4,A$:CH(A$):#4,A$:DL(A$):#4,A$:DH(A$)RBDL0SS1:S;:I,16(S10)S10(S10),CL,CH,DL:II4:II65536(I32767):A1DL:#4,A$:I,(A$):II1:II65536(I32767)::II1:IUI65536(I32768)RBCLCLDL:CL255CLCL256:CHCH1RBDH017010dSBB1DH:SS1:S;:I,T,16(S10)S10(S10),CL,CH,0:II5:II65536(I32767):A1256:#4,A$:I,(A$):II1:II65536(I32767)::CHCH1::17010SBSS1:T201ʱI,177,1U6(S10)S10(S10):4:11500TBT195ʱI,185,16(S10)S10(S10):#4,A$:I265536(I232767):(A$):#4,A$:I365536(I332767),(A$):4:11500QTB"ISMERETLEN TIPUSU BLOKK: "T:4:I06E3::hTPF::$:I01E3:{TZF""18010: