     ORG $E000
E000: DB   $00, $00, $00, $00, $00, $00, $00
E007: DB   $00
E008: DB   $00, $FF
E00A: DB   $01, $4B, $45, $59, $20, $30
    DB   $9D, $BA, $62, $58, $D6, $92, $4D, $2B, $A5, $FF, $02, $4B, $45, $59, $20, $31
    DB   $46, $EB, $CE, $11, $54, $FE, $70, $2C, $A5, $FF, $03, $4B, $45, $59, $20, $32
    DB   $DF, $08, $BC, $58, $27, $AC, $BE, $87, $EA, $FF, $04, $4B, $45, $59, $20, $33
    DB   $6F, $D9, $3E, $20, $70, $1C, $B3, $88, $EA, $FF, $FF, $4B, $45, $59, $20, $34
    DB   $07, $E6, $EE, $B6, $D5, $A5, $AE, $73, $BA, $FF, $FF, $4B, $45, $59, $20, $35
    DB   $00, $00, $00, $00, $00, $00, $00, $00, $00, $FF, $FF, $4B, $45, $59, $20, $36
    DB   $00, $00, $00, $00, $00, $00, $00, $00, $00, $FF, $FF, $4B, $45, $59, $20, $37
    DB   $00, $00, $00, $00, $00, $00, $00, $00, $00, $FF, $FF, $4B, $45, $59, $20, $38

;    Trap 1
C090: MOV %$09, B
C092: LDA *R$35 
    STA *R$4A 
    INC R$35
    INC R$4A
    DJNZ B, C092
    RETS
;    TRAP 0
C0A0: LDA @E007
    STA @$611A
    STA @$617D
    STA @$6246
    LDA @E008
    STA @$6119
    STA @$617C
    STA @$6247
    MOVD %E000, R$35
    MOVD %$6604, R$4A
    TRAP 1 
    MOV %$10, R$35
    MOV %$0D, R$4A
    TRAP 1 
    MOV %$20, R$35
    MOV %$16, R$4A
    TRAP 1 
    MOV %$30, R$35
    MOV %$1F, R$4A
    TRAP 1 
    MOV %$40, R$35
    MOV %$28, R$4A
    TRAP 1 
    MOV %$50, R$35
    MOV %$31, R$4A
    TRAP 1 
    MOV %$60, R$35
    MOV %$3A, R$4A
    TRAP 1 
    MOV %$70, R$35
    MOV %$43, R$4A
    TRAP 1 
    MOV %$80, R$35
    MOV %$4C, R$4A
    TRAP 1 
    LDA @E00A
    STA @$6603
    NOP
    LDA @$6237
    MOV A, B
    LDA @$6238
    XOR B, A
    STA @$6656
    MOV %$FF, A
    STA @$6268
    STA @$61FA
    MOV %$07, A
    STA @$6253
    STA @$61FD
    IDLE

   org $fffc

 DW   C090
 DW   C0A0

   end
ÿ
                                                                                                                                                                          