Subversion Repositories pentevo

Rev

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

Rev Author Line No. Line
13 ddp 1 
.MACRO  PUSHX
42 ddp 2 
        PUSH    XL
13 ddp 3 
        PUSH    XH
4 
.ENDMACRO
5 
 
6 
.MACRO  POPX
42 ddp 7 
        POP     XH
13 ddp 8 
        POP     XL
9 
.ENDMACRO
10 
 
11 
.MACRO  PUSHY
42 ddp 12 
        PUSH    YL
13 ddp 13 
        PUSH    YH
14 
.ENDMACRO
15 
 
16 
.MACRO  POPY
42 ddp 17 
        POP     YH
13 ddp 18 
        POP     YL
19 
.ENDMACRO
20 
 
21 
.MACRO  PUSHZ
42 ddp 22 
        PUSH    ZL
13 ddp 23 
        PUSH    ZH
24 
.ENDMACRO
25 
 
26 
.MACRO  POPZ
42 ddp 27 
        POP     ZH
13 ddp 28 
        POP     ZL
29 
.ENDMACRO
30 
 
31 
.MACRO  LDIX
32 
        LDI     XL,LOW(@0)
33 
        LDI     XH,HIGH(@0)
34 
.ENDMACRO
35 
 
36 
.MACRO  LDIY
37 
        LDI     YL,LOW(@0)
38 
        LDI     YH,HIGH(@0)
39 
.ENDMACRO
40 
 
41 
.MACRO  LDIZ
42 
        LDI     ZL,LOW(@0)
43 
        LDI     ZH,HIGH(@0)
44 
.ENDMACRO
45 
 
46 
.MACRO  LDSX
47 
        LDS     XL,@0
48 
        LDS     XH,@0+1
49 
.ENDMACRO
50 
 
51 
.MACRO  LDSY
52 
        LDS     YL,@0
53 
        LDS     YH,@0+1
54 
.ENDMACRO
55 
 
56 
.MACRO  LDSZ
57 
        LDS     ZL,@0
58 
        LDS     ZH,@0+1
59 
.ENDMACRO
60 
 
61 
.MACRO  STSX
62 
        STS     @0,XL
63 
        STS     @0+1,XH
64 
.ENDMACRO
65 
 
66 
.MACRO  STSY
67 
        STS     @0,YL
68 
        STS     @0+1,YH
69 
.ENDMACRO
70 
 
71 
.MACRO  STSZ
72 
        STS     @0,ZL
73 
        STS     @0+1,ZH
74 
.ENDMACRO
75 
 
76 
; @0 - port, @1 - regs
77 
.MACRO  OUTPORT
78 
        STS     @0+$20*(@0<$40),@1
79 
.ENDMACRO
80 
 
81 
; @0 - regs, @1 - port
82 
.MACRO  INPORT
83 
        LDS     @0,@1+$20*(@1<$40)
84 
.ENDMACRO
85 
 
86 
; ADDI reg,const   ஦  䫠!
87 
.MACRO  ADDI
88 
        SUBI    @0,(-@1&$FF)
89 
.ENDMACRO