MTU C13R Especificações descarregar pdf (Página 13)

done

margin

where

getit

norm

jsr closef_

end if

clr busy

endif

ldy #$130

loop

clr ,y+

cmpy #$158

until eq

rts

fcb 1 1 ,13,0

rmb 2

loop

jsr kyputb_

cmpb #0

until ne

stb type

cmpb #$7b

if pi

jmp getit

endif

rts

Ida #79

leax $7fff,x

loop

ldb a,x

cmpb # 1

quif ne

deca

until mi

cmpb #'

if ne

loop

ldb ,x+

cmpb #$a0

bio norm

subb #$80

pshs d ,x

ldd outpt

jsr fputchar

puls d,x

deca

until mi

endif

;ldb #'d

;cmpb type

;if ne

;ldd outpt

;jsr fputnl_

export kyptr1_

export kyptr2_

export usirq_

= $012c

= $012e

= $02ff (File continued below)

Start of keyboard buffer.

Characters w/out CR 'leak' to screen...and enter

false monitor commands, so clear buffer to the

end, at $157, on each pass.

export printer_

$b129

export serial

$b144

export write_

$b191

export append_

$b19e

export

kyputb =

$dd82

export

file

$ f 451

(continued file)

(end, usrlib.exp)

The .cmd file for UDUMP without an extra linefeed:

"udump"

org $7e70

include "disk/1.usrlib.exp"

include "disk/1.watlib.exp"

"udump.b09"

Exactly two bytes are free below $8000 after UDUMP is

loaded into $7e70. If you add to the code, best move

it down. We also note that the chunk of code incorpo

rating the GUESS...ENDGUESS is near block maximum, so

any attempts to add much to it will fail unless you

go to a subroutine.

If you add the extra linefeed for printers which need

it (below), set origin to $7e60!

Don't try to load this one in the monitor— it RTS's

to menu. If you want to, take out the CLR $32 in MAIN

and substitute SWI for RTS in MAIN. You should also

remove INSTR (the prompt) and the two lines in MAIN

which load and print the prompt. Yes, it loads in the

monitor that way and runs— but the stack is utterly

mad, the registers are equally insane, and we firmly

expect SuperPET to implode. Proceed at your own risk.

; OPTIONAL printer code for linefeed with each CR:

; Remove semicolons and use the next 6 lines.

; Is this a dump to disk?

If you use this, set

; No, not a disk dump. origin to $7e60!

; So, add a linefeed for printer.

SuperpPET Gazette, Vol.I No.11

-168-

December 1983/January 1984

1 2 ... 8 9 10 11 12 13 14 15 16 17 18 ... 24 25

Comentários a estes Manuais

Sem comentários

MTU C13R Especificações Página 13

Comentários a estes Manuais

Manuais e produtos relacionados com Motor MTU C13R