                org $A000-16
                .list on

pcheader        .dw     pcheader+16, init
                .dw     0,0,0,0,0,0

mosextrom       .db     $BE
                jmp     init
                jmp     initmsg
                .db     0,0,0                   ; geen oscli uitbreiding
                .db     $2A,<osbyte,>osbyte     ; osbyte uitbreidingen
                .db     0,0,0                   ; geen osword uitbreiding

init            rts                             ; hoeft nieks te doen

initmsg         jsr     $1006                   ; print string
                .db     "MOSROM extension rom #1",$0D,$0A,$EA
                rts

osbyte          .db     2                       ; aantal calls
                .dw     tabel1                  ; adres jmp tabel
                .db     $50,$51                 ; osbyte call nummers

tabel1          .dw     osbyte50,osbyte51

osbyte50        jsr     $1006
                .db     "Test osbyte &50",$A,$D,$EA
                rts

osbyte51        jsr     $1006
                .db     "Test osbyte &51",$A,$D,$EA
                rts


osword          .db     2                       ; aantal calls
                .dw     tabel2                  ; adres jmp tabel
                .db     $50,$51                 ; osword call nummers

tabel2          .dw     osword50,osword51

osword50        jsr     $1006
                .db     "Test osword &50",$A,$D,$EA
                rts

osword51        jsr     $1006
                .db     "Test osword &51",$A,$D,$EA
                rts


