/[projet1]/users/barnsey123/HNEFATAFL/game.s
Defence Force logotype

Contents of /users/barnsey123/HNEFATAFL/game.s

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1053 - (show annotations)
Sun Dec 22 18:10:25 2013 UTC (6 years ago) by barnsey123
File size: 1108 byte(s)
v0.103 fixed major issue in findpiece. reduced size of checkbrokenarrow/pacman2/3

1
2 _setfoundpiece10
3 lda #10
4 sta _foundpiece
5 rts
6
7 _setcheckmode1
8 lda #1
9 sta _checkroutemode
10 rts
11
12 _setcheckmode2
13 lda #2
14 sta _checkroutemode
15 rts
16
17 _setcheckmode3
18 lda #3
19 sta _checkroutemode
20 rts
21
22 _setcheckmode4
23 lda #4
24 sta _checkroutemode
25 rts
26
27 _incmodeone
28 inc _modeonevalid
29 rts
30
31 _incroute
32 inc _route
33 rts
34
35 _decroute
36 dec _route
37 rts
38
39 _incpoints
40 inc _points
41 rts
42
43 _decpoints
44 .(
45 dec _points
46 bne end
47 inc _points
48 end
49 rts
50 .)
51
52 _setpoints
53 lda #10
54 sta _points
55 rts
56
57 _pointsplusten
58 clc
59 lda _points
60 adc #10
61 ;adc _hightarget
62 sta _points
63 rts
64
65 _incsurround
66 inc _surrounded
67 rts
68
69 _MultiplyPoints
70 .(
71 lda _points
72 ldx _MultiPoints
73 loop
74 beq end
75 clc
76 adc #10
77 dex
78 bne loop
79 end
80 sta _points
81 rts
82 .)
83
84 _inccounter
85 inc _counter
86 rts
87
88 _zeroarrow
89 lda #0
90 sta _arrow
91 rts
92
93 _zerocounter
94 lda #0
95 sta _counter
96 rts
97
98 _zerofoundpiece
99 lda #0
100 sta _foundpiece
101 rts
102
103 _inctakecounter
104 inc _takecounter
105 rts
106
107 ;_getspace
108 ; ; get code of last key pressed
109 ; lda $02df
110 ; sta _mkey
111 ; rts

  ViewVC Help
Powered by ViewVC 1.1.26