OpenCores
URL https://opencores.org/ocsvn/blue/blue/trunk

Subversion Repositories blue

[/] [blue/] [trunk/] [blue8/] [intel.asm] - Blame information for rev 2

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 2 wd5gnr
#define BLUEMON 1
2
#include "blue.inc"
3
 
4
     ORG 0x100
5
        call print_msgcr
6
        ds "Use Escape to exit\xff"
7
toploop:
8
        call crlf
9
        lda #'?'
10
        call printchar
11
        lda #' '
12
        call printchar
13
        call waitcharecho
14
        cmp escape
15
        snz
16
        jmp bluemon
17
        push
18
        call crlf
19
        pop
20
        push
21
        call printchar
22
        lda #'='
23
        call printchar
24
        pop
25
        call hexout2
26
        jmp toploop
27
 
28
        END
29
 

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.