Subversion Repositories pentevo

Rev

Rev 543 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
713 lvd 1
        ORG     #8000
2
        DISP    0
3
 
4
        JP      INIT
5
 
6
        DS      #0038-$
7
 
8
INT     EI 
9
        RET 
10
 
11
        DS      #0066-$
12
 
13
NMI
14
        NOP 
15
        JR      $
16
 
17
 
18
 
19
INIT    XOR     A
20
        LD      BC,#7FFD
21
        OUT     (C),A
22
 
23
        LD      A,#3F-#1F ; ROM page #1F
24
        LD      BC,#3FF7
25
        OUT     (C),A
26
 
27
        LD      BC,#FD77
28
        LD      A,#FB ;6912 mode, 14MHz turbo, enable memmanager
29
        OUT     (C),A ;shadow on
30
 
31
        XOR     A        ;RAM page FF to C000-FFFF
32
        LD      BC,#FFF7
33
        OUT     (C),A
34
        LD      B,#F7
35
        OUT     (C),A
36
 
37
        LD      SP,#FFFF ;stack
38
 
39
 
40
        ;test INT
41
        IM      1
42
        EI 
43
        HALT 
44
        DI 
45
 
46
 
47
        LD      HL,NMICODE
48
        LD      DE,#C066
49
        LD      BC,ENMICODE-NMICODE
50
        LDIR 
51
 
52
 
53
        LD      A,#08    ;gen NMI
54
        OUT     (#BF),A
55
        XOR     A
56
        OUT     (#BF),A
57
 
58
 
59
        OR      A    ;wait NMI
60
        JP      Z,$-1
61
 
62
 
63
 
64
        JP      #C066+NMIGENRAM-NMICODE
65
 
66
NMICODE
67
        NOP 
68
        INC     A
69
        OUT     (#BE),A
70
        RETN 
71
 
72
NMIGENRAM
73
        LD      A,#08    ;gen NMI
74
        OUT     (#BF),A
75
        XOR     A
76
        OUT     (#BF),A
77
 
78
 
79
        OR      A    ;wait NMI
80
        JR      Z,$-1
81
 
82
        JR      NMIGENRAM
83
 
84
ENMICODE
85
?