ER҂"*High-SpeedSIO-Routine,wird!*andieZieladresseangepa~t *undzumComputergesendet.;USIOALDA$0301;DUNIT BNESIO2 $LDX#$08 .DLWTBLLSTALWTBL-1,X;$F6148DEXBBNEDLWTBLLLRTS VSIO2TAX`REL01LDALWTBL-1,X;$F614 jBNESIO3 tLDA#$28~REL02STALWTBL-1,X;$F614 LDY#$07SIOCLLDA$0302,Y;DCOMNDPHAREL03LDAC3F,Y;$F60DSTA$0302,Y;DCOMNDDEYBPLSIOCLREL04JSRSIO3;$F450LDX$0301;DUNITLDY$0303;DSTATSBMISIO21 LDA$01REL05STALWTBL-1,X;$F614 SIO21LDY#$00SIO21CLPLASTA$0302,Y;DCOMND(INY 2CPY#$08<BCCSIO21CL FSIO3SEIPTXA ZORA#$30dSTA$023A;CDEVICnLDA$0302;DCOMNDxSTA$023B;CCOMNDLDA$030A;DAUX1STA$023C;CAUX1LDA$030B;DAUX2STA$023D;CAUX2REL06LDALWTBL-1,X;$F614STA$D204;AUDF3TSXSTX$3F;FEOF LDA#$02STA$37;DRETRYIO11LDA#$07STA$36;CRETRYIO12LDA#$34STA$D303 LDA#$00STA$30;STATUS"STA$3E;FTYPE,STA$35;BUFEND+16STA$D206;AUDF4 @LDA#$3AJSTA$32;BUFADR TLDA#$02^STA$33;BUFADR+1hASLrSTA$34;BUFEND|REL07JSRSEND1;$F4DCLDA$0304;DBUFLOSTA$32;BUFADRLDA$0305;DBUFHISTA$33;BUFADR+1LDA$0308;DBYTLOSTA$34;BUFENDLDA$0309;DBYTHISTA$35;BUFEND+1LDA$0303;DSTATS BPLIO2REL08JSRSEND1;$F4DCIO2DEC$3E;FTYPEREL09JSRSETTI1;$F544BIT$0303;DSTATS BVCIO3REL10JSRGETA1;$F521&IO3LDA#$A00STA$D207;AUDC4 :LDA$10DSTA$D20E;IRQENNREL11JSRCLRTI1;$F576XLDA$30;STATUS bBEQIO4lDEC$37;DRETRY vBNEIO11 IO4TAY BNEIO5INYIO5STY$0303;DSTATSCLIRTSSEND1LDY#$00 SE1INY BNESE1 LDA#$23REL12JSRPOKEY;$F5F7LDA($32),Y;BUFADRSTA$31;CHKSUMSTA$D20D;SEROUT INY BNESE3 SE2LDA($32),Y;BUFADR*REL13JSRPUTBYTE;$F5D44INY >BNESE3HINC$33;BUFADR+1RDEC$35;BUFEND+1 \LDX#$E0 fSEWLINX pBNESEWLzSE3CPY$34;BUFEND BNESE2LDA$35;BUFEND+1 BNESE2LDA$31;CHKSUMREL14JSRPUTBYTE;$F5D4SEO1LDA$D20E;IRQST AND#$08 BNESEO1 LDY#$03REL15JSRSTOUTX0;$F578 LDA#$C0STA$D20E;IRQENBNERDQUIT GETA1LDY#$00 STY$31;CHKSUM GE1JSRGETBYTE;$F5B1$ STA($32),Y;BUFADR. REL16JSRADDSUM;$F5EF8 INY B BNEGE2L INC$33;BUFADR+1V DEC$35;BUFEND+1` GE2CPY$34;BUFEND j BNEGE1t LDA$35;BUFEND+1 ~ BNEGE1 REL17JSRGETBYTE;$F5B1 CMP$31;CHKSUM BNEERR8F RTS SETTI1LDA$0306;DTIMLO ROR ROR TAY AND#$3F TAX TYA ROR AND#$C0 TAY REL18JSRSTOUT;$F57A RDQUITLDA#$3C( STA$D303 2 LDA#$13< REL19JSRPOKEY;$F5F7F REL20JSRGETBYTE;$F5B1 P CMP#$41Z BEQCLRTI1 d CMP#$43n BEQCLRTI1 x CMP#$45 BEQERR90 LDA#$8B BNEERR ERR90LDA#$90 STA$30;STATUS CLRTI1LDY#$00 STOUTX0LDX#$00 STOUTLDAERRABS;$F STA$0226;CDTMA1 STOU2LDAERRABS+1;$F STA$0227;CDTMA1+1 LDA#$01 JMP$E45C;SetzeCDTMV1 ERRABS.DAERR8A;$F IOER80LDX$3F;FEOF TXS " LDA#$80, STA$30;STATUS6 BNEEABS3@ ERR8FLDA#$8F J .HX2CT ERR8ALDA#$8A;Timeout^ ERRSTA$30;STATUSh LDX$3F;FEOFr TXS| LDA$3E;FTYPE BMIERRA DEC$36;CRETRY BEQERRA REL21JMPIO12;$F47A ERRALDA#$28 STA$D204;AUDF3 EABS3JMPIO3;$F4C1 GETBYTELDA$D20E;IRQST BPLIOER80 AND#$20 BNEGETBYTE LDA#$DF STA$D20E;IRQEN  LDA#$E0 STA$D20E;IRQEN LDA$D20F;SKSTAT& STA$D20A;SKRES0 BPLERR8A : AND#$20D BEQERR8AN LDA$D20D;SERINX RTSb PUTBYTETAXl PUTA1LDA$D20E;IRQST v AND#$10 BNEPUTA1 LDA#$EF STA$D20E;IRQEN LDA#$D0 STA$D20E;IRQEN TXA STA$D20D;SEROUT LDX$D20E;IRQST BPLIOER80 ADDSUMCLC ADC$31;CHKSUM ADC#$00 STA$31;CHKSUM RTS POKEYSTA$D20F;SKCTL STA$D20A;SKRES LDA#$28* STA$D208;AUDCTL 4 LDA#$A8> STA$D207;AUDC4 H LDA#$F8R STA$D20E;IRQEN\ RTSf C3F.HX3F40p .DA$0001z .DA$0001 .DA$0001 LWTBL.BL8,0 USIOEH ABSTBL.DADLWTBLL+1,REL01+1,REL02+1,REL03+1,REL04+1,REL05+1,REL06+1@ .DAREL07+1,REL08+1,REL09+1,REL10+1,REL11+1,REL12+1,REL13+1> .DAREL14+1,REL15+1,GE1+1,REL16+1,REL17+1,REL18+1,REL19+17 .DAREL20+1,STOUT+1,STOU2+1,ERRABS,REL21+1,EABS3+1