NB 1600C:ASCII KIIRAS2C Y32Y128AS$AS$(Y):AS$AS$"."8C(TC2:DISASS SOR KIIRATASAcC<H$M$:120lCF370CP@1023," ";:L$;6)O$;16)W$;35)AS$;CZ PP1 CHR(9)W$CdCn:4-JEGYU HEXA-DEC KONVERZIOCxZ(H$)1:X0CKZ01D K1116-D(H$,K1,1)(A$,K1,1)K2K11:K1163DCDXXK2K(K)IDTDXXSHgD:X IGAZITASA~DX32767XX65536DX32768XX65536DD:DECIMALISBOL 4-JEGYU HEXADDDSH:D0DD65536DH4(D4096)EH3((D4096H4)256)"EH2((D4096H4256H3)16)@E"H1D4096H4256H316H2{E,H$(A$,H41,1)(A$,H31,1)(A$,H21,1)(A$,H11,1)E6E@:DECIMALISBOL 2-JEGYU HEXAEJH2(D16)ETH1D16H2E^H$(A$,H21,1)(A$,H11,1)EhEr:DISASSEMBLALASF|Y(X)FY64Y1286203FY128Y192720VFC(Y128):I1(A$(C,Y192C))FW$(A$(C,Y192C),(A$(C,Y192C))1)FI11460,460,460,460,1330,1480,1100FF:STANDARD OPKODOKFI13F0:F1FI13I11FDX:250GL$H$:O$"":AS$""GJ0I1%GY(X)2GDY:330?GO$O$H$GG30VG&XX1:210\G0G:F12240:H$(O$,5,2)(O$,3,2)GDN$H$GN2170GXGb:LD UTASITASOKGlDX:250GqL$H$:O$"":AS$""GvN$H$:AS$(Y)GDY:330GO$H$HP(Y8):P1Y8P5HW$"LD "R$(P8)","R$(P1)JHY118W$"HALT"YHXX1:210_HuH:NORMAL CSOPORTHDX:250HL$H$:AS$"."HDY:330HO$H$HP(Y8):P1Y8PHW$E$(P16)R$(P1)H XX1:210HH :"DDCB" I*AS$AS$"."I4O$O$"CB")I>XX1:2104IHY(X)AIRDY:330TI\V$H$:O$O$V$\If30kIpXX1:210|IzY(X):XX1I30IDY:330IO$O$H$II030IH$(D$(I),2)W$(D$(I),(D$(I))2)"(I"Z$"+$"V$")":I30II1300 J:"36"JO$H$:AS$AS$"6".JXX1:210>JD(X):330QJO$O$H$:U$H$YJ30hJXX1:210xJD(X):330J30:XX1J$O$O$H$:V$H$J.W$"LD (I?+$"U$"),$"V$J81270JB:DD-FD KODOKJLAS$"."JVDY:330J`F$H$KjF$"DD"Z$"X":1150%KtF$"FD"Z$"Y"2K~DX:250BKL$H$:O$""QKXX1:210\KY(X)iKDY:330zKH$"36"970KH$"CB"810KI038KH$(C$(I),2)W$(C$(I),(C$(I))2):I38KKI1(W$):W$(W$,(W$)1):F0K500LI1(W$)7L(W$,I,1)"?"W$(W$,I1)Z$(W$,(W$)I)=L JLO$F$O$PL`L(:CB KODOKmL2DX:250~L<L$H$:AS$""LFXX1:210LPY(X)LZDY:330LdO$"CB"H$Ln30LxP(Y8):P1Y8PLP8W$R1$(P)" "R$(P1):1450&MP8P16W$"BIT"(P8)","R$(P1):1450XMP16P24W$"RES"(P16)","R$(P1):1450MP24P32W$"SET"(P24)","R$(P1)MXX1:210MM:ED KODOKMDX:250ML$H$:O$"":AS$"."MXX1:210MY(X)MDY:330NI0530NH$(B$(I),2)W$(B$(I),(B$(I))2):I536NXNI1(W$):W$(W$,(W$)1):F0aN"500pN,O$"ED"O$vN6|N@NJ@276,"HT1080Z DISASSEMBLER"::Nh:FOPROGRAMNr16553,255N|3000:A$"0123456789ABCDEF"+OD2$"(MEM-CIM) NEWLINE(TOVABB) S(ZUBRUTIN) R(ETURN) J(UMP)"aOD3$"P(RINT) M(EMORIA DUMP) X(UJRAINDIT)"OM2$"(MEM-CIM) NEWLINE(TOVABB) P(RINT) I(DISASSEMBLALAS)"OM3$"X(UJRAINDIT)"OL4$(64,"-")PA$(1,63),B$(53),C$(38),D$(30),E$(7),R$(7),R1$(7),Z(10),K(3)OPK(0)4096:K(1)256:K(2)16:K(3)1:CT$" (BARMELY BILL.)"cPI07:R$(I):xPI07:R1$(I):PI063:A$(0,I):PI07:E$(I):PI063:A$(1,I):PI053:B$(I):PI038:C$(I):PI030:D$(I):Q:X0:H$"":"HA A DISASSEMBLALANDO PROGRAM A MEMORIABAN EREDETI HELYEN VAN, AKKOR NYOMD MEG A NEWLINE-T, HA NEM, AKKOR 4-JEGYU HEXA SZAMKENTADD MEG A BELEPESI PONTOT";H$Q&H$""SH0:1850Q0(H$)4120:SHX:1820 R:"MEMORIA-CIM ELTOLAS";SH;"(DECIMALIS)"::RDS0:W$""LRNPP$"":"KERSZ EGYIDEJU NYOMTATAST (I/N)";PP$nRX (PP$,1)"I" PP1 : 1910Rb"KAPCSOLD BE A MAGNOT. HA KESZ,AKKOR USS LE EGY BILLENTYUT!""RlST$: ST$"" 1900 : 1920RvPP0RR:DISASSEMBLER KIIRATAS6S@0,"DISASSEMBLER:"(50," "):D2$:D3$:@192,L4$;\S@32,"PARANCS";:T$:M$T$:T$"":pSM$""70:1930S(M$,1)"J"ʏ(W$,1)"J"(W$,4)"DJNZ"M$N$:60:1930:2820:1930S(M$,1)"S"ʑ2300:1930T(M$,1)"R"ʏS0SS1:XZ(S):70:1930:2820:1930-T(M$,1)"P"2450:1930UT(M$,1)"H"1930::TERVEZETT HELPkT(M$,1)"M"2060T(M$,1)"X"1820T (M$)82051T(M$)460:2820T1930TH$(M$,4)T 120TVXX:H$(M$,4): 120T XVX ʑ 70:2054 U1930U :MEMORIA DUMPUU@0,"MEMORIA DUMP :"(50," "):M2$:M3$:@192,L4$;{U @32,"PARANCS";:T$:M$T$:T$"":U*M$""2370:80:2060U4(M$,1)"P"2540:2060U>(M$,1)"I"1930UH(M$,1)"X"1820VR(M$,1)"H"2060::TERVEZETT HELP#V\(M$)42350:800:2820-Vf2060MVp:ASSEMBLER LISTA KIIRATAS\VzI1(W$)tV(W$,I,1)"-"2210zVVVW$(W$,I1)"$"N$(W$,(W$)I)VV:RELATIV UGRAS CIMEVUXVY127XXY256:XXYV210WDX:250WXUW!W:SZUBRUTINOKLW (W$,4)"CALL"M$N$:Z(S)X:SS1:60W (W$,3)"RST"Z(S)X:SS1:X16((W$,5,1))((W$,6,1)):70W 2820W$ :DUMP RUTINW. H$M$W8 120WB Y(X)WL DX:250WV L$H$W` DY:330Xj O$H$:W$" ":AS$"" Xt 30X~ XX1:210"X 3X :NYOMTATAS>X 2790HX 2630kX (H$,1)"I"ʲ@0,(64," ");:tX 370X @960,L$;6)O$;16)W$;35)AS$: #1,W$X X0X165536X:X1XX X14L265532X X1L2ʒ:2490X :MEMORIADUMP NYOMTATASY 2790Y 26305Y (H$,1)"Y"ʲ@0,(64," ");:?Y 2370UY L$;6)O$;11)AS$oY( X0X165536X:X1XY2 X14L265532Y< X1L2ʒ:2580YF :KIIRATO RUTINYP @0,"SOR KIIRAS:";(51," ")YZ "KEZDOCIM (HEXA)";L1$Yd (L1$)42630Zn "VEGCIM (HEXA) ";L2$#Zx @192,L4$;IZ (L2$)4ʲ@128,(64," ");:2630^Z H$L2$:120:L2XnZ H$L1$:120Z DX:250:L1$H$Z DL2:250:L2$H$Z L20L265536L2Z @128,(50," ");[ @0,"MEMORIA KIIRAS ";L1$;" KEZDOCIMTOL ";L2$;" VEGCIMIG""[ H$"":"RENDBEN VAN (I/N)";H$([ @[ :NYOMTATO STATUSZ[ @0,"KAPCSOLD BE A MAGNOT. HA KESZ, NYOMJ MEG BARMELY BILLENTYUT.":[ ST$: ST$"" 2810 : [ :HIBAKEZELES[ @0,"HIBA!!!";(57," ")::[ I11000:[" \, B,C,D,E,H,L,(HL),A.\6 RLC,RRC,RL,RR,SLA,SRA,ERROR,SRLv\@ 0NOP,"2LD BC,-","0LD (BC),A",0INC BC,0INC B,0DEC B,"1LD B,-",0RLCA\J "0EX AF,AF'","0ADD HL,BC","0LD A,(BC)",0DEC BC,0INC C,0DEC C,"1LD C,-",0RRCA]T 3DJNZ -,"2LD DE,-","0LD (DE),A",0INC DE,0INC D,0DEC D,"1LD D,-",0RLA\]^ 3JR -,"0ADD HL,DE","0LD A,(DE)",0DEC DE,0INC E,0DEC E,"1LD E,-",0RRA]h "3JR NZ,-","2LD HL,-","2LD (-),HL",0INC HL,0INC H,0DEC H,"1LD H,-",0DAA]r "3JR Z,-","0ADD HL,HL","2LD HL,(-)",0DEC HL,0INC L,0DEC L,"1LD L,-",0CPLL^| "3JR NC,-","2LD SP,-","2LD (-),A",0INC SP,0INC (HL),0DEC (HL),"1LD (HL),-",0SCF^ "3JR C,-","0ADD HL,SP","2LD A,(-)",0DEC SP,0INC A,0DEC A,"1LD A,-",0CCF^ "ADD A,","ADC A,","SUB ","SBC A,","AND ","XOR ","OR ","CP "._ 0RET NZ,0POP BC,"2JP NZ,-","2JP -","2CALL NZ,-",0PUSH BC,"1ADD A,-",0RST 0 s_ 0RET Z,0RET,"2JP Z,-",4X,"2CALL Z,-",2CALL -,"1ADC A,-",0RST 8_ 0RET NC,0POP DE,"2JP NC,-","1OUT (-),A","2CALL NC,-",0PUSH DE,1SUB -,0RST $10` 0RET C,0EXX,"2JP C,-","1IN A,(-)","2CALL C,-",6X,"1SUB A,-",0RST $18e` 0RET PO,0POP HL,"2JP PO,-","OEX (SP),HL","2CALL PO,-",0PUSH HL,1AND -,0RST $20` 0RET PE,0JP (HL),"2JP PE,-","0EX DE,HL","2CALL PE,-",5X,1XOR -,0RST $28` 0RET P,0POP AF,"2JP P,-",0DI,"2CALL P,-",0PUSH AF,1OR -,0RST $30=a 0RET M,"0LD SP,HL","2JP M,-",0EI,"2CALL M,-",6X,1CP -,0RST $38a "400IN B,(C)","410OUT (C),B","420SBC HL,BC","432LD (-),BC",440NEG,450RETN,460IM 0,"470LD I,A"a "480IN C,(C)","490OUT (C),C","4AADC HL,BC","4B2LD BC,(-)",4D0RETI