>N;*************************;*** SUPER DEBUG V 3.1 ***;*************************;; Disassembled by Constantin Olbrich; 5.7.82;STMON#000DL0011#0011L0019#0019L001F#001FVRAML#0400VRAM#0800VL1#080AVL7#098AERRM6BHMRET5BHCRLF6AHRLIN7^=N9HBLINK7BHINLIN63HNNOM77HNOM71HNUM64HB2HEX68HTBCD366HSPACE69HARGS60HRCAL10HSCAL18HROUT30HPRS28HARGC#0C0AARG2#0C0EARG3#0C10NUMV#0C21BRKADR#0C23BRKVAL#0C25CONFLG#0C26CURSOR#0C29ARGX#0C2BRBC#0C61RDE#0C63RHL#0C53N#0AʌʌʌʌLC1CASCAL ; SPACESPACEި#08ق,LC1E2#0Cٓ,LC1E2ޟ(CRT2ND)ިو,LC1E2ޟLF800LC1E2ިҌSCAL ; B2HEXB2HEXSCAL ; SPACESPACELC1E2ROUT;PRTREGLC2E4(CURSOR),PRS'SP'#A0,#00 ; .ޝ(RSP)SCAL ; TBC2ND3TBCD3ށ,#0CLC2DFށ,#06#10#C5 ;EPRS#0D ;.'IX'#00 ;.#10#B0 ;0PRS' IFF''2 '#00 ;.ިި#30ؕ,LC21FҀLC21FROUTPRS#0D ;.'IY'#00 ;.#10#95 ;.PRS' I '#00 ;.ި#10#73 ;sPRS'HL':1N#00 ;.ޝ(RHL)LC1BFPRS'HL'#00 ;.#10#5A ;Zި#DEޝ(RDE)LC1BDި#DE#10#4C ;Lި#BCޝ(RBC)LC1BDި#BC#10#40 ;@PRS'AF'#A0,#00 ; .ޝ(RAF)SCAL ; TBCD3TBCD3ROUTިޝLC3C1ށ,#0CLC271Ҍިق,LC27Aި#20LC27AROU0NTLC271PRS'^'#00 ;.ށ,#12#10#5A ;Zϛϛި#AF#10#14 ;.ޟLC2BD#10#1F ;.ޝ(RPC)ށ,ނ,ރ,ބ,REVASSCAL ; B2HEXB2HEXި#27ROUTϤިSCAL ; B2HEXB2HEXިSCAL ; B2HEXB2HEXLC2ADSCAL ; CRLFCRL/NFLC2B0ޝ(DPATCH)ޥ#C3ҌޥҌޥҌޥ#01LC2BDPRS'PC'#A0,#00 ; .LC2C2ށ,#12LC2C4ިҌROUTLC2C4ҌҌҌLC2CCިROUTҌ#0Dْ,LC2CCޟLC2D8LC2B0LC2D8PRS' '#A0 ;' '#00 ;.LC2C2LC2DFSCAL ; SPACESPACELC2DFLC2E4r .N(CURSOR)ި#C0#0Aކ,;DISASMޟLC2D8#10#BC ;<LC2F4LC2F5#10#9D ;.LC2F8SCAL ; BLINKBLINK#0Dو,LC306ROUT#1Bْ,LC2F8LC2ADLC306#10#DC ;\ϟSCAL ; NUMNUMق,LC34Cިو,LC2F4SCAL ; CRLFCRLFޝ(NUMV)!-NLC2F5;FINDʌSCAL ; SPACESPACESCAL ; INLININLINޝARG3ޞ0LC325SCAL ; NUMNUMިو,LC33AҌިLC32FޥҌLC331ҁ3,ْ,LC354LC325LC33Aި#2Cْ,LC345ҎިҎLC32FLC345#2Dو,LC34Fو,LC354LC34CERRORLC0",N34F0,ҎLC331LC354ިҀو,LC34Cި#06LC35Bȁق,LC363LC35EҁLC35BLC363ށ,LC366ޟ(ARG2)ҌޟARG3LC375ٓ,LC37DҌʁLC375LC37DިȖҌْ,LC389ҎLC375#10#04 ;.LC389LC366LC38Dި#A0#+NROUTSCAL ; TBCD3TBCD3ރ,ބ,ށ,#08LC1CAROUTށ,#08LC39CިҀ#7F#21ިٓ,LC3A7ި#2ELC3A7ROUTҎLC39CSCAL ; CRLFCRLFCHNOUT(QDEBUS),OPTCRT(CRT2ND),LC3B6ބ,ރ,#00ބ,Ҍރ,SCAL ; ARGSARGSLC3C1"S$*N""Z"" ""H"" ""P""N""C"LC3CA"B"LC155"D"LC155"H"LC155"A"LC1A3"P"LC17F"S"LC19E"I"LC1870ALTCRT ; :A CommandERRORCHNOUT ; :C CommandDISASM ; :D CommandERRORFIND ; :F CommandERRORERRORERRORERROR%)NERRORERRORERRORERROROPTCRT ; :O CommandPRTREG ; :P Command;LF800#F800LFFC0#FFC0;*********************;*** N A S - D I S ***;*********************;0CH#000CCR0DHNUMARG#0C0BPATCH#0E00RSTFLG#0E03ADDR#0E04MADDR#0E06EADDR#0E08&(NOPCADR#0E0AHXYFLG#0E0CLINEA#0E0ELABELA#0E10LABELP#0E12BUFFER#0E14FLAG#0E44STEP#0E45START#0E46FIRST#0E48LAST#0E4APOINT#0E4CSYMST#0E4ESYMEND#0E50PSYM#0E52OFFSET#0E54ZEAPP#0E56SEQU#0E58LC#0E7CGAP#0E7DLINES#0E7ELINENOb''N#0E80ZLABEL#0E82HEAD#0E84PAGE0E8CHTITLE#0E92L55D6#55D6DASMި#C3(PATCH),(RSTFLG),ޝPRINT(PATCH+1),ި(NUMARG)#02؂,REVASC#18#60 ;`ْ,MAIN1ނ,#01MAIN1ށ,(ARG3),ށ,ނ,ޝ-1REVASPRINTި#30ҌCRْ,PRINTޝARG3ʖ(&NҌިʌޥ#08#1B#18#5B ;[REVAS(ADDR),(MADDR),(EADDR),NEXTLޝ(EADDR)ޟ(MADDR)INITBBYTEDECODEޝHXYFLGިҌȖ,NOTVALޝBUFFERPATCHNEXTLINITBޟBUFFERޝ0(LABELP),(HXYFLG),ޝ(ADDR)(LINEA),))%NHEX4ϟҌ(OPCADR),ʌށ,#2BINITB1ޥ#20ҌINITB1ޙ+#2A),#3BޥCRޟBUFFER+25HEX4ިHEX2ިHEX2HEX1HEX1#0F#90#40ާҎBYTEҐޝ(ADDR)Ҍ(ADDR),ޝ(MADDR)ިҌ(MADDR),ޝ(OPCADR)ҌϟHEX2ϟ*$N(OPCADR),Ҁ#7F#21ʀٓ,BYTE1ި"."BYTE1ޙ+#2A),WREXϟޥ#45Ҍޥ#58WRLD0WRLDϟޥ#4CҌޥ#44WRLD0ޟBUFFER+30COMMAϟޥ#2CҌϟPOUNDϟޥ#23ҌϟCOPY6COPY5COPY4COPY3COPY2FTADRކ,҅DECODE+#N#C0#40؈,LOAD8#80؈,ARITH8#8FޝTABLEFTADRިҌޅ,ކ,ؖINCޝINCMDEC1DECޝDECMDEC1COPY3S2,و,REGPRSREGLD16WRLDREGPRCOMMALD16ABYTEނ,BYTEޅ,ކ,LD16B(LABELP),(LABELA),POUNDHEX4ADDHY,"NLޝARTABADDHL1COPY3Sި#20REGPRCOMMAREGPRށ,#02ނ,#06ޝRPRTABْ,NOTSPʌ7,؈,COPY2ʌʌNOTSPȂْ,RP2ި(HXYFLG)(HXYFLG+1),RP2FTADRCOPY2LOAD8#76و,HALTWRLDSREGCOMMAL8B6,و,IMNSREGҀ#-!N07#07و,MENޝRPRTAB+1FTADRMENި#28ާҎޝHXYTABި(HXYFLG)(HXYFLG+1),RP2و,NOTIXYBYTEނ,#2Bو,NOTIXY؉,PLUSނ,#2DPLUSށ,ިާҎިPHEX2NOTIXYި#29ާҎIMNBYTEPHEX2POUNDHEX2HALTޝHALTMCOPY4ARIT/. NH8#40#0Eށ,ޝARTAB,FTADRިCOPY3SޝACOMMA#06,COPY2#03,COPY2L8BPOPޝPOPMPUSH1PUSHޝPUSHMPUSH1COPY4ҎREGPR-1CALETC#ED؈,EXTND#CDو,CJR+1#F9ٓ,CAL1ި#02CAL1(HXYFLG),BYTEށ,#0FCRިv/NDECODECJR#06ޝCJRTAB,FTADRCOPY4Ҏ#C90,ْ,UNCNDCCODES#07COMMAUNCNDLD16ACCODES#0EޝCCTABRP2ROTMIS#1CޝRMTAB,FTADRCOPY4RSTޝRSTMCOPY3S#38PHEX2ޝRSTFLG0,#10#20ق,F0NLUSH#28BORMFLUSHށ,#03ق,UNPRNҁޝBUFFER+28ޥ#4DҌҌޥ#2FҌϟMS1MOREMSPRTABLق,DONEMBYTEMS1ާҎMOREMSDONEMϟޥ#2FBORMUN0BYTEUNPRN؈,NOTVALPRTABLٓ,UN1UN0UN1NOTVALBORMFLUSHޝBUFFERPATCHINITBBYTEN*1NOTVALPRTB1PRTABLޝ(MADDR)ިPRTB1#20#2F#7FNOPETC#10و,DJNZق,NOPJRϟޥ#4AҌޥ#52ޟBUFFER+30#18و,UCD#18CCODESCOMMAUCDBYTEނ,ށ,ޝ(ADDR)LD16BNOPޝNOPMCOPY3SCOPY3ҎҎDJNZޝDJNZMCOPY42NҎUCDEXAETC#08ْ,JRWREXޝEXAFMCOPY6JPETC#D3؂,CJR+1؈,OUT#F3و,DIWREXޝBSPBMCOPY5ި#20REGPRDIި#44EI1EIި#45EI1ϟޥҌޥ#49CBETC#DB؈,IN؂,CB#FBو,EIWREXޝRPRTAB+4COPY2COMMACOPY2RETETC#D9O3N,CJR+1و,EXX#F9و,LDSPޝCJRTAB+4COPY2ޝBUFFER+30LD12LDSPWRLDޝSPMCOPY3ި#20REGPREXXWREXҌޥ#58STINDWRLD#22و,ST16ILD1COMMAST1ި#41ާҎLDINDWRLD#2Aو,LD16IST1COMMALD1#22LD11ϟLD12ޥ#284NҌϟ,REGPR,LD16ANOTIXYST16ILD1COMMAREGPR-1LD16ILD16I1REGPRCOMMALD11CBި(HXYFLG)و,NOTXYޟBUFFER+32ި#06SREGޟBUFFER+25NOTXYBYTE#40ق,ROTATEޝSPM#03ށ,FTADRCOPY3S#07#30ާ95NҎCOMMATESTXYި؈,SREG#07#06NOTVALROTATE#02#0E#0E؈,NTVLށ,ޝROTTABFTADRCOPY3STESTXYAUTO2,ؒ,NOTVAL#03ޝOPTABRP2Ҁ#13ْ,AUTO1ʎCOPY2AUTO1ޝOPTAB+10#06RP2ADCSBCޝARTAB+~6N9ި3,و,ADC1ޝARTAB+3ADC1ADDHL1INި#FFINRC#0E؈,NOTVALޝINMCOPY3SSREGCOMMAPORTϟޥ#28ҌҀو,INAޥ#43ҌϟPORT1NOTIXYINAϟIMNPORT1EXTNDBYTE#C0ؓ,NOTVAL#40؂,NOTVAL#A0ٓ,AUTO#80ؓ,NOTVALނ,#077N,ިو,INRCNOTOUT21HOUTި#FF#2E؈,NOTVALޝOUTMCOPY3SPORTCOMMASREGNOTOUTʁو,ADCSBCNOTLD#0E#0C؈,NOTVALWRLD3,ިؒ,LD16I1ST16INOTLDިޞ0CHޝREMEXTْ,NOTVALި#08ق,LDRIޝEXTMNE-16#1Cق8N,INTMODFTADRCOPY4LDRIWRLDޝIRTABFTADRCOPY3INTMODRP2ޟBUFFER+30NTVLNOTVALޝDEFBޟBUFFER+25COPY4ҎޝBUFFER+6ނ,#15ި#20NVLPPOUNDCOPY2ҌȖو,DNVCOMMANVLPDNVޝ0(LABELP),ިCRާTABLENOPETCCJRLD16P9NOPSTINDCJRINCJPETCINCCJRDECPUSHLOAD8ARITH8ROTMISRSTEXAETCCJRADDHLRETETCLDINDCJRDECCBETCINCCJRDECCALETCLOAD8ARITH8ROTMISRSTINCM'INC'DECM'DEC''AFS'RPRTAB'PABCDE'HXYTAB'HLIXIY'HALTM'HALT'ART#:NAB'ADDADCSUBSBC''ANDXOROR CP 'PUSHM'PUSH'POPM'POP 'CJRTAB'RET JP CALL'CCTAB'NZ ZNC CPOPE P M'RMTAB'RLCARRCARLA RRA ''DAA CPL SCF CCF 'RSTM'RST'NOPM'NOP'DJNZM'DJNZ'EXAFM"AF,AF'"BSPBM'(SP),'INM'IN 'OUTM'OUT'SPM'SP,'BRSTAB'BI;NTRESSET'ROTTAB'SRLRLCRRCRL RR SLASRA'OPTAB'LDCPINOTUTI D IRDR'REMEXT44H,45H,4DH,67H6FH,46H56H,5EH,57H,4FH5FH,47HEXTMNE'IM2 IM1 IM0 RLD ''RRD RETIRETNNEG 'IRTAB'I,A,R,A,I'ACOMMAIRTAB+2DEFB'DEFB'REVASCޟLINENOޝRAMLDޞMOVLNGOPTIONe<N#28CR ;.'Opti''ons?'' (ST'OTAB$-2'ZXLP''DRU)''-'#00 ;.ޟ0ި#01ޞL55D6FOUND$-2ْ,FOUND1(RSTFLG),FOUND1ިރ,#08#30ބ,#00ޝOTABLUOPو,FOUNDٓ,LUOPCRْ,OPTIONި2,و,LUOP1#11LUOP1(FLAG),#1Cو =N,NLABSGETSTA2,و,ST#28'ZEAP'' fi'#00 ;.ST0ST#28'Symb''ol t''ab'#00 ;.ST0#28'le a''rea?'CR,#00 ;..GETTWOق,GETSTA(SYMST),(SYMEND),ި#FFާNLABS5,و,NOTITLASKT#28'Titl''e?'CR,#00 ;..#18#63 ;@>Ncޝ53CHި#3Dْ,SETLPPҎ#18#64 ;dق,ASKTޝ(NUMV)SETLPP(LINES),ޝ#101(LC),ϟޟTITLESETLP1Ȗْ,SETLP1ϟި#20SETLP2ʌȖو,SETLP2ҌޥCRNOTITL#28'What'' on?'CR,#00 ;..#18#63 ;c#18#79 ;yق,NOTITLި(NUMARG))?N#02ق,NOTITL#18#60 ;`Ҏ(BUFFER),ރ,ބ,ʌ(START),Ҍو,NOTIT1ޅ,ކ,NOTIT1(OFFSET),ޞ0ޟ-1ޝFLAG7,و,DA7,RNGRQ#28'List''ing ''rang''e?'CR,#00 ;..GETTWOق,RNGRQDA(FIRST),(LAST),DAREEA#28'DATA'.@N' are''as?'CR,#00 ;..DAREAADAREA0GETTWOق,DAREA1ޅ,ކ,ޞ(OFFSET)ϤϟϟҌٓ,DAREA2ޝ(BUFFER)ق,DAREA2ҀDAREAADAREA1و,DAREA3#2Dْ,DAREA2و,DAREEAʀ#28A N#13,#1B,#13 ;...#1B,#00 ;..DAREA0DAREA2#18#6B ;k#28#13,#13,#17 ;...#00 ;.DAREA0DAREA3ޝ(BUFFER)ޝ-1#28'Go?'#00 ;.#18#7B ;{(STEP),#18#6A ;jި(FLAG)#18ޝPASS1,PASSޝFLAG7,2,و,ALLIN0ޝ(SYMEND)(0 B NF02H),ޝ(SYMST)(0F00H),ޟ(PSYM)(SYMST),ޟ(ZLABEL)ҌҌޥҌޥҌޥ#00(ZEAPP),ALLIN0ޝPASS2PASSޝFLAG7,4,,LABEL3,ْ,PRXREFEXIT#18#5B ;[PRXREFިޝGAPʖʌ5,,EJECTҖޝ-1(LAST),ޡ(SYMEND)XREFSC N1ި)Ҁو,EXITʑނ,ށ,#09ޟBUFFERXREF2ކ,)ʑޅ,)ʑHEX4ި#20ާҎʂو,XREF3XREF2XREF3ϟޥCRޝBUFFEROUTPUTިو,XREF1ޝBUFFERށ,#05XREF4ޥ#20ҌXREF4ϟށ,#08XREF2GETTWO#18#63 ;cި#1B#30#18#79 ;yD Nިި(NUMARG)#02#18#60 ;`ށ,ނ,ʌNEXTADޝ(POINT)ʌރ,ʌބ,(POINT),ޅ,ކ,ޞ(OFFSET)ށ,ނ,ޅ,-#01)ކ,-#02)PASS(PATCH+1),ޝ(SYMEND)(PSYM),ޝ(START)(POINT),PASSLNEXTADҍҎʌE NREVASNEXTADިҀި(FLAG)#80و,PASSLޟ(MADDR)ق,PASSLҌDATA1INITBށ,#03DATA2BYTEʌިو,DATA3DATA2DATA3NOTVALޝBUFFERPASS2ْ,DATA1PASSLPASS1ޝ(LABELP)ިޝ(SYMEND)SRCHLިҀو,PASFNTށ,ʌބ,ʌރ,ʌޝ(LABELA)SRCHL2SRCHL1ʌʌSRCHL2SRCHL1ި(FLAG)ق,PASTْ,SRCHL3,ނ,#02MVUPFNDޟ(LINEA)ޥʌޥҚ)PASTޝ(ZLABEL)ҌҌ(ZLABEL),ި(FLAG)ނ,#053,ْ,PAST1ނ,#03PAST1MVUPޥ#00ޟGN(LABELA)ʌޥʌޥʌ3,FNDMVUPޟ(PSYM)Ҍށ,#00ϟށ,ނ,ϟޝ(SYMST)ʌٓ,OVRFLWޝ(PSYM)(PSYM),ʌOVRFLW#28'Over''flow'CR,#00 ;..ޝBUFFEROUTLIN#18#5B ;[PASS2ޞ13HޡSEQUި(FLAG)0,OHN,PASS21PASS214,و,OUTPUTLABELޝ(LABELP)ިو,PASS22ޥ#4CPASS22OUTPUTށ,ނ,ޝ(LAST)ޟ(LINEA)ޝ(FIRST)ϟި(FLAG)5,,DPAGEٓ,ALLLINϟޝ9ިϟޟSEQUޞ203BH#42ْ,SQSH11INނ,SQSH1ިCRو,SQSH3Ȃو,SQSH3ާҎҌ#2Fْ,SQSH2ިށ,ިނ,SQSH2ȁْ,SQSH1Ȗْ,SQSH1ҌSQSH2SQSH3ϟʌި#20و,SQSH4ҌSQSH4ޥCRޝSEQUALLLINOUTLIN2,ޟ(LINENO)ޝ(ZEAPP)ҌޥҌޥҌϟި#01ކ,JNި#00ޅ,(LINENO),ޝSEQUިCRZ1Ȗْ,Z1ϟ(ZEAPP),ޥ#00Ҍޥ#FFҌޟ(0F00H)ϟޥҌޥޝ(SYMST)OVRFLWOUTLINށ,CHROUTҌCRْ,OUTLINLABELޝ(PSYM)ިҀށ,ʌބ,ʌރ,ʌLABEL2LABEL1ʌʌLuKNABEL2LABEL1ށ,ނ,ޝ(LINEA)ި(FLAG)ق,LABEL3LABEL3(PSYM),و,ALABށ,ނ,ށ,#13ޝSEQULABEL4ޥ#20ҌLABEL4ALAB1ޝEQUޞ6ϟٓ,ABSOLިْ,ABSOLި#05ٓ,ABSOLޥ#24Ҍޥ#2DҌ#30ޥҌPEQULNABSOLޥ#23ҌϟHEX4ϟPEQUޥCROUTPUTLABELALABALAB1ޥ#4CҌϟHEX4DPAGEޝLCʖEJECTި(GAP)ރ,ށ,CREJECT2EJECT1CHROUTEJECT2ʃْ,EJECT1ޝ(LINES)(LC),ޝPAGE+1Җި#3Aْ,NOINCޥ#30ʌҖNOINCޝHEADOUTLINMNށ,CRCHROUTި#30ޝFLAGPUNCHCRْ,EXCHRި#0APUNCHި(STEP)#20و,WAIT#18#62 ;bٓ,WAIT2 ; ORIGINAL WAIT1 !!WAIT#08(STEP),WAIT1#1B؈,EXITWAIT2ި6,و,EXCHRށ,#80DLOOP#38DLOOPިEXCHRPUNCH1,#18#6F 6N;oRAMLD10H0' PAGE 00 'MOVLNG$-RAMLDEQU' EQU 'REVASDPATCHDASM+3LC40EDASM+#0E; #C40ELC418DASM+#18; #C418