------------------------------------------------------------ *** FILE ".t9.0" ptr=#2 hlp=#4 move=$9051 break=$9012 pipout=$902d ; connector - xlink ; org $c800 ; version @1#0 @1#1 ; pages @1#07 nop ; stackmax @1#63 ; zp-start @1#251 ; zp-len @1#0 nop ; start-vektor @1$2c @2$0040 ; restl.vektoren use45;vektoren ; prg-descr text "term9600" use1;flag;sh.in;sh.out use8;username @1#0 strt: lda #$c8 move start: jmp 64738 #add t9lab flag sh.in sh.out username ptr hlp break #next t9.1 ------------------------------------------------------------ *** FILE ".t9.1" #include t9lab #rm rsout enable disable rsin ; experimantal rs232 ; using cia-serial-ports ; start is variable ! ; (for LUnix-terminal server) lunix.irq=$9121 revtab=$cd80 recbuf=$ce00 sndbuf=$cf00 ; uhh change it later ! pjp ovlocal use1;outstat;flags use1;outbyte use1;wr.sptr;rd.sptr use1;wr.rptr;rd.rptr ovlocal: nmi-startbit: pha lda #$13 bit $dd0d bpl restore sta $dd0f sta $dd0d ; adapt this by hand !! lda #$c2 sta nmilo pla rti restore: ; just ignore restore pla rti nmi-bytrdy: pha lda #$92 bit $dd0d bpl restore sta $dd0f sta $dd0d lda # to reconnect." @1#13 @1#0 ovtext: @1$2c shptr: @2