Subversion Repositories pentevo

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
1186 savelij 1
        cpu     pms132
2
        page    0
3
 
4
databit3        bit     [0x34].3
5
databit4        bit     [0x34],4
6
databit5        bit     databit4+1
7
portbit5        bit     io(0x34).5
8
portbit6        bit     io(0x34).6
9
portbit8        bit     portbit6+2
10
 
11
        nop                     ; 0x0000
12
        ldsptl                  ; 0x0006
13
        ldspth                  ; 0x0007
14
 
15
        addc    a               ; 0x0060
16
        subc    a               ; 0x0061
17
        izsn    a               ; 0x0062
18
        dzsn    a               ; 0x0063
19
        pcadd   a               ; 0x0067
20
        not     a               ; 0x0068
21
        neg     a               ; 0x0069
22
        sr      a               ; 0x006a
23
        sl      a               ; 0x006b
24
        src     a               ; 0x006c
25
        slc     a               ; 0x006d
26
        swap    a               ; 0x006e
27
 
28
        wdreset                 ; 0x0070
29
        pushaf                  ; 0x0072
30
        popaf                   ; 0x0073
31
        reset                   ; 0x0075
32
        stopsys                 ; 0x0076
33
        stopexe                 ; 0x0077
34
        engint                  ; 0x0078
35
        disgint                 ; 0x0079
36
        ret                     ; 0x007a
37
        reti                    ; 0x007b
38
        mul                     ; 0x007c
39
 
40
        xor     io(0x34),a      ; 0x00f4
41
        mov     io(0x34),a      ; 0x01b4
42
        mov     a,io(0x34)      ; 0x01f4
43
 
44
        ret     0xab            ; 0x02ab
45
 
46
        stt16   [0x78]          ; 0x0378
47
        ldt16   [0x78]          ; 0x0379
48
 
49
        idxm    [0x78],a        ; 0x03f8
50
        idxm    a,[0x78]        ; 0x03f9
51
 
52
        swapc   io(0x34).5      ; 0x0574
53
        swapc   portbit5        ; 0x0574
54
        swapc   io(0x34).6      ; 0x05b4
55
        swapc   portbit6        ; 0x05b4
56
        swapc   io(0x35).0      ; 0x0435
57
        swapc   portbit8        ; 0x0435
58
 
59
        comp    a,[0x78]        ; 0x0678
60
        comp    [0x78],a        ; 0x06f8
61
        nadd    a,[0x78]        ; 0x0778
62
        nadd    [0x78],a        ; 0x07f8
63
        add     [0x78],a        ; 0x0878
64
        sub     [0x78],a        ; 0x08f8
65
        addc    [0x78],a        ; 0x0978
66
        subc    [0x78],a        ; 0x09f8
67
        and     [0x78],a        ; 0x0a78
68
        or      [0x78],a        ; 0x0af8
69
        xor     [0x78],a        ; 0x0b78
70
        mov     [0x78],a        ; 0x0bf8
71
        add     a,[0x78]        ; 0x0c78
72
        sub     a,[0x78]        ; 0x0cf8
73
        addc    a,[0x78]        ; 0x0d78
74
        subc    a,[0x78]        ; 0x0df8
75
        and     a,[0x78]        ; 0x0e78
76
        or      a,[0x78]        ; 0x0ef8
77
        xor     a,[0x78]        ; 0x0f78
78
        mov     a,[0x78]        ; 0x0ff8
79
 
80
        addc    [0x78]          ; 0x1078
81
        subc    [0x78]          ; 0x10f8
82
        izsn    [0x78]          ; 0x1178
83
        dzsn    [0x78]          ; 0x11f8
84
        inc     [0x78]          ; 0x1278
85
        dec     [0x78]          ; 0x12f8
86
        clear   [0x78]          ; 0x1378
87
        xch     [0x78]          ; 0x13f8
88
        not     [0x78]          ; 0x1478
89
        neg     [0x78]          ; 0x14f8
90
        sr      [0x78]          ; 0x1578
91
        sl      [0x78]          ; 0x15f8
92
        src     [0x78]          ; 0x1678
93
        slc     [0x78]          ; 0x16f8
94
        ceqsn   a,[0x78]        ; 0x1778
95
        cneqsn  a,[0x78]        ; 0x17f8
96
 
97
        t0sn    io(0x34).5      ; 0x1974
98
        t0sn    portbit5        ; 0x1974
99
        t0sn    io(0x34),6      ; 0x19b4
100
        t0sn    portbit6        ; 0x19b4
101
        t0sn    io(0x35),0      ; 0x1835
102
        t0sn    portbit8        ; 0x1835
103
        t1sn    io(0x34).5      ; 0x1b74
104
        t1sn    portbit5        ; 0x1b74
105
        t1sn    io(0x34),6      ; 0x1bb4
106
        t1sn    portbit6        ; 0x1bb4
107
        t1sn    io(0x35),0      ; 0x1a35
108
        t1sn    portbit8        ; 0x1a35
109
        set0    io(0x34).5      ; 0x1d74
110
        set0    portbit5        ; 0x1d74
111
        set0    io(0x34),6      ; 0x1db4
112
        set0    portbit6        ; 0x1db4
113
        set0    io(0x35),0      ; 0x1c35
114
        set0    portbit8        ; 0x1c35
115
        set1    io(0x34).5      ; 0x1f74
116
        set1    portbit5        ; 0x1f74
117
        set1    io(0x34),6      ; 0x1fb4
118
        set1    portbit6        ; 0x1fb4
119
        set1    io(0x35),0      ; 0x1e35
120
        set1    portbit8        ; 0x1e35
121
 
122
        t0sn    [0x34].3        ; 0x20f4
123
        t0sn    databit3        ; 0x20f4
124
        t0sn    [0x34],4        ; 0x2134
125
        t0sn    databit4        ; 0x2134
126
        t0sn    [0x34],5        ; 0x2174
127
        t0sn    databit5        ; 0x2174
128
        t1sn    [0x34].3        ; 0x22f4
129
        t1sn    databit3        ; 0x22f4
130
        t1sn    [0x34],4        ; 0x2334
131
        t1sn    databit4        ; 0x2334
132
        t1sn    [0x34],5        ; 0x2374
133
        t1sn    databit5        ; 0x2374
134
        set0    [0x34].3        ; 0x24f4
135
        set0    databit3        ; 0x24f4
136
        set0    [0x34],4        ; 0x2534
137
        set0    databit4        ; 0x2534
138
        set0    [0x34],5        ; 0x2574
139
        set0    databit5        ; 0x2574
140
        set1    [0x34].3        ; 0x26f4
141
        set1    databit3        ; 0x26f4
142
        set1    [0x34],4        ; 0x2734
143
        set1    databit4        ; 0x2734
144
        set1    [0x34],5        ; 0x2774
145
        set1    databit5        ; 0x2774
146
 
147
        add     a,0xab          ; 0x28ab
148
        sub     a,0xab          ; 0x29ab
149
        ceqsn   a,0xab          ; 0x2aab
150
        cneqsn  a,0xab          ; 0x2bab
151
        and     a,0xab          ; 0x2cab
152
        or      a,0xab          ; 0x2dab
153
        xor     a,0xab          ; 0x2eab
154
        mov     a,0xab          ; 0x2fab
155
 
156
        goto    0x789           ; 0x3789
157
        call    0x789           ; 0x3f89
158
 
159
        data    1000,2000,3000,4000,5000,6000,7000,8000,9000,10000,11000,12000,13000,14000,15000,16000
160
        expect  1320
161
        data    17000
162
        endexpect
163
        data    "12345678"
164
 
165
uart    struct
166
data    res     1
167
ctrl    res     1
168
txen    bit     ctrl,0
169
rxen    bit     ctrl,1
170
stat    res     1
171
drdy    bit     stat,0
172
txempt  bit     stat,1
173
rxovr   bit     stat,2
174
txovr   bit     stat,3
175
        endstruct
176
 
177
        segment data
178
 
179
        org     0x08
180
uart1   uart