1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
|
/*
The Return of Traxtor (Amstrad CPC)
Copyright (C) 2015 Juan J. Martinez <jjm@usebox.net>
This program is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation, either version 3 of the License, or
(at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program. If not, see <https://www.gnu.org/licenses/>.
*/
#ifndef _INT_H
#define _INT_H
#ifndef WFRAMES
#define WFRAMES 4
#endif
// timer
unsigned char tick;
unsigned char timer;
unsigned char playerISR;
void
wait()
{
while ((unsigned char)(tick - timer) < WFRAMES)
__asm__("halt");
timer = tick;
}
void
WyzPlayerOn()
{
__asm;
di
ld a, #1
ld (_playerISR), a
ei
__endasm;
}
void
WyzPlayerOff()
{
__asm;
di
xor a
ld (_playerISR), a
call _cpc_WyzSetPlayerOff
ei
__endasm;
}
void
setup_int()
{
tick = 0;
timer = 0;
playerISR = 0;
__asm;
di
ld ix, #0x0038
ld hl, #isr
ld (ix), #0xc3
ld 1(ix), l
ld 2(ix), h
im 1
ei
jp setup_done
isr:
push af
ld a, (#_tick)
inc a
ld (#_tick), a
ld a, (#_playerISR)
or a
jp z, player_is_off
jp _cpc_WyzPlayerISR
player_is_off:
pop af
ei
ret
setup_done:
__endasm;
}
#endif // _INT_H
|
