373 lines
7.5 KiB
Plaintext
373 lines
7.5 KiB
Plaintext
|
; Zilog eZ80 ANSI C Compiler Release 3.4
|
||
|
|
; -optsize -noreduceopt -nomodsect -peephole -globalopt
|
||
|
|
; -localcse -const=ROM
|
||
|
|
FILE "SRC\MAIN.C"
|
||
|
|
.assume ADL=1
|
||
|
|
SEGMENT CODE
|
||
|
|
; 1 #include <stdbool.h>
|
||
|
|
; 2 #include <stddef.h>
|
||
|
|
; 3 #include <stdint.h>
|
||
|
|
; 4 #include <tice.h>
|
||
|
|
; 5
|
||
|
|
; 6 #include <math.h>
|
||
|
|
; 7 #include <stdio.h>
|
||
|
|
; 8 #include <stdlib.h>
|
||
|
|
; 9 #include <string.h>
|
||
|
|
; 10
|
||
|
|
; 11 #include <graphx.h>
|
||
|
|
; 12 #include <keypadc.h>
|
||
|
|
; 13
|
||
|
|
; 14 /* Include the sprite data */
|
||
|
|
; 15 #include "gfx/logo_gfx.h"
|
||
|
|
; 16
|
||
|
|
; 17 /* Function for drawing the main sprite */
|
||
|
|
; 18 void draw_sprite(int x, int y)
|
||
|
|
; 19 {
|
||
|
|
_draw_sprite:
|
||
|
|
CALL __frameset0
|
||
|
|
; 20 /* Fill the screen with color index 0
|
||
|
|
; 21 /* Note that this is a super inefficient way to
|
||
|
|
; 22 /* redraw, but it demonstrates a simple way of clearing past data */
|
||
|
|
; 23 // gfx_FillScreen(0xFF);
|
||
|
|
; 24
|
||
|
|
; 25 /* Draw a bunch of different styled sprites on the screen */
|
||
|
|
; 26
|
||
|
|
; 27 gfx_Sprite(dvd, x, y);
|
||
|
|
LD BC,(IX+9)
|
||
|
|
PUSH BC
|
||
|
|
LD BC,(IX+6)
|
||
|
|
PUSH BC
|
||
|
|
LD BC,_dvd_data
|
||
|
|
PUSH BC
|
||
|
|
CALL _gfx_Sprite
|
||
|
|
POP BC
|
||
|
|
POP BC
|
||
|
|
POP BC
|
||
|
|
; 28
|
||
|
|
; 29 /* Copy the buffer to the screen */
|
||
|
|
; 30 gfx_BlitBuffer(); // This is the same as gfx_Blit(gfx_buffer)
|
||
|
|
LD BC,1
|
||
|
|
PUSH BC
|
||
|
|
CALL _gfx_Blit
|
||
|
|
POP BC
|
||
|
|
; 31 }
|
||
|
|
LD SP,IX
|
||
|
|
POP IX
|
||
|
|
RET
|
||
|
|
|
||
|
|
|
||
|
|
;**************************** _draw_sprite ***************************
|
||
|
|
;Name Addr/Register Size Type
|
||
|
|
;_gfx_Blit IMPORT ----- function
|
||
|
|
;_dvd_data IMPORT 3922 variable
|
||
|
|
;_gfx_Sprite IMPORT ----- function
|
||
|
|
;y IX+9 3 parameter
|
||
|
|
;x IX+6 3 parameter
|
||
|
|
|
||
|
|
|
||
|
|
; Stack Frame Size: 12 (bytes)
|
||
|
|
; Spill Code: 0 (instruction)
|
||
|
|
|
||
|
|
|
||
|
|
; 32
|
||
|
|
; 33 void random_palette() {
|
||
|
|
_random_palette:
|
||
|
|
; 34 gfx_SetPalette(logo_gfx_pal[(rand() % (7 - 0 + 1))], sizeof_logo_gfx_pal, 0);
|
||
|
|
LD BC,0
|
||
|
|
PUSH BC
|
||
|
|
LD BC,86
|
||
|
|
PUSH BC
|
||
|
|
CALL _rand
|
||
|
|
LD BC,8
|
||
|
|
CALL __irems
|
||
|
|
ADD HL,HL
|
||
|
|
ADD HL,HL
|
||
|
|
LD BC,_logo_gfx_pal
|
||
|
|
ADD HL,BC
|
||
|
|
PUSH HL
|
||
|
|
CALL _gfx_SetPalette
|
||
|
|
POP BC
|
||
|
|
POP BC
|
||
|
|
POP BC
|
||
|
|
; 35 }
|
||
|
|
RET
|
||
|
|
|
||
|
|
|
||
|
|
;**************************** _random_palette ***************************
|
||
|
|
;Name Addr/Register Size Type
|
||
|
|
;_rand IMPORT ----- function
|
||
|
|
;_logo_gfx_pal IMPORT 32 variable
|
||
|
|
;_gfx_SetPalette IMPORT ----- function
|
||
|
|
|
||
|
|
|
||
|
|
; Stack Frame Size: 6 (bytes)
|
||
|
|
; Spill Code: 0 (instruction)
|
||
|
|
|
||
|
|
|
||
|
|
; 36
|
||
|
|
; 37 void main(void)
|
||
|
|
; 38 {
|
||
|
|
_main:
|
||
|
|
LD HL,-11
|
||
|
|
CALL __frameset
|
||
|
|
; 39 /* Coordinates used for the sprite */
|
||
|
|
; 40 int x, y;
|
||
|
|
; 41 bool gravity[2] = {
|
||
|
|
; 42 true,
|
||
|
|
; 43 true
|
||
|
|
; 44 };
|
||
|
|
LEA DE,IX+-8
|
||
|
|
LD HL,_0temp2
|
||
|
|
LD BC,2
|
||
|
|
LDIR
|
||
|
|
; 45 float angle;
|
||
|
|
; 46
|
||
|
|
; 47 /* Initialize the 8bpp graphics */
|
||
|
|
; 48 gfx_Begin();
|
||
|
|
CALL _gfx_Begin
|
||
|
|
; 49
|
||
|
|
; 50 /* Set up the palette for our sprites */
|
||
|
|
; 51 random_palette();
|
||
|
|
CALL _random_palette
|
||
|
|
; 52
|
||
|
|
; 53 /* Start at 0, 0 */
|
||
|
|
; 54 x = 0;
|
||
|
|
LD BC,0
|
||
|
|
LD (IX+-6),BC
|
||
|
|
; 55 y = (rand() % (LCD_HEIGHT - 0 + 1));
|
||
|
|
CALL _rand
|
||
|
|
LD BC,241
|
||
|
|
CALL __irems
|
||
|
|
LD (IX+-3),HL
|
||
|
|
; 56
|
||
|
|
; 57 gfx_SetDrawBuffer();
|
||
|
|
LD BC,1
|
||
|
|
PUSH BC
|
||
|
|
CALL _gfx_SetDraw
|
||
|
|
POP BC
|
||
|
|
; 58
|
||
|
|
; 59 gfx_FillScreen(1);
|
||
|
|
LD BC,1
|
||
|
|
PUSH BC
|
||
|
|
CALL _gfx_FillScreen
|
||
|
|
POP BC
|
||
|
|
; 60
|
||
|
|
; 61 draw_sprite(x, y);
|
||
|
|
LD BC,(IX+-3)
|
||
|
|
PUSH BC
|
||
|
|
LD BC,0
|
||
|
|
PUSH BC
|
||
|
|
CALL _draw_sprite
|
||
|
|
POP BC
|
||
|
|
POP BC
|
||
|
|
; 62
|
||
|
|
; 63 do
|
||
|
|
L_27:
|
||
|
|
; 64 {
|
||
|
|
; 65 /* Scan the keypad to update kb_Data */
|
||
|
|
; 66 kb_Scan();
|
||
|
|
CALL _kb_Scan
|
||
|
|
; 67
|
||
|
|
; 68 if ((x + dvd_width) <= LCD_WIDTH && x >= 0)
|
||
|
|
LD IY,(IX+-6)
|
||
|
|
LEA BC,IY+80
|
||
|
|
LD HL,320
|
||
|
|
OR A,A
|
||
|
|
SBC HL,BC
|
||
|
|
CALL __setflag
|
||
|
|
JP M,L_13
|
||
|
|
LD HL,(IX+-6)
|
||
|
|
CALL __icmpzero
|
||
|
|
CALL __setflag
|
||
|
|
JP M,L_13
|
||
|
|
; 69 {
|
||
|
|
; 70 if (gravity[0])
|
||
|
|
LD A,(IX+-8)
|
||
|
|
OR A,A
|
||
|
|
JR Z,L_7
|
||
|
|
; 71 {
|
||
|
|
; 72 x++;
|
||
|
|
LD BC,(IX+-6)
|
||
|
|
INC BC
|
||
|
|
LD (IX+-6),BC
|
||
|
|
; 73 }
|
||
|
|
; 74 else
|
||
|
|
JR L_25
|
||
|
|
L_7:
|
||
|
|
; 75 {
|
||
|
|
; 76 x--;
|
||
|
|
LD BC,(IX+-6)
|
||
|
|
DEC BC
|
||
|
|
LD (IX+-6),BC
|
||
|
|
; 77 }
|
||
|
|
; 78 }
|
||
|
|
; 79 else
|
||
|
|
JR L_25
|
||
|
|
L_13:
|
||
|
|
; 80 {
|
||
|
|
; 81 random_palette();
|
||
|
|
CALL _random_palette
|
||
|
|
; 82 if (gravity[0])
|
||
|
|
LD A,(IX+-8)
|
||
|
|
OR A,A
|
||
|
|
JR Z,L_11
|
||
|
|
; 83 {
|
||
|
|
; 84 gravity[0] = false;
|
||
|
|
LD (IX+-8),0
|
||
|
|
; 85 x--;
|
||
|
|
LD BC,(IX+-6)
|
||
|
|
DEC BC
|
||
|
|
LD (IX+-6),BC
|
||
|
|
; 86 }
|
||
|
|
; 87 else
|
||
|
|
JR L_25
|
||
|
|
L_11:
|
||
|
|
; 88 {
|
||
|
|
; 89 gravity[0] = true;
|
||
|
|
LD (IX+-8),1
|
||
|
|
; 90 x++;
|
||
|
|
LD BC,(IX+-6)
|
||
|
|
INC BC
|
||
|
|
LD (IX+-6),BC
|
||
|
|
; 91 }
|
||
|
|
; 92 }
|
||
|
|
L_25:
|
||
|
|
; 93
|
||
|
|
; 94 if ((y + dvd_height) <= LCD_HEIGHT && y >= 0)
|
||
|
|
LD IY,(IX+-3)
|
||
|
|
LEA BC,IY+49
|
||
|
|
LD HL,240
|
||
|
|
OR A,A
|
||
|
|
SBC HL,BC
|
||
|
|
JP M,L_24
|
||
|
|
LD HL,(IX+-3)
|
||
|
|
CALL __icmpzero
|
||
|
|
CALL __setflag
|
||
|
|
JP M,L_24
|
||
|
|
; 95 {
|
||
|
|
; 96 if (gravity[1])
|
||
|
|
LEA HL,IX+-8
|
||
|
|
INC HL
|
||
|
|
LD A,(HL)
|
||
|
|
OR A,A
|
||
|
|
JR Z,L_18
|
||
|
|
; 97 {
|
||
|
|
; 98 y++;
|
||
|
|
LD BC,(IX+-3)
|
||
|
|
INC BC
|
||
|
|
LD (IX+-3),BC
|
||
|
|
; 99 }
|
||
|
|
; 100 else
|
||
|
|
JR L_26
|
||
|
|
L_18:
|
||
|
|
; 101 {
|
||
|
|
; 102 y--;
|
||
|
|
LD BC,(IX+-3)
|
||
|
|
DEC BC
|
||
|
|
LD (IX+-3),BC
|
||
|
|
; 103 }
|
||
|
|
; 104 }
|
||
|
|
; 105 else
|
||
|
|
JR L_26
|
||
|
|
L_24:
|
||
|
|
; 106 {
|
||
|
|
; 107 random_palette();
|
||
|
|
CALL _random_palette
|
||
|
|
; 108 if (gravity[1])
|
||
|
|
LEA BC,IX+-8
|
||
|
|
INC BC
|
||
|
|
LD (IX+-11),BC
|
||
|
|
LD HL,BC
|
||
|
|
LD A,(HL)
|
||
|
|
OR A,A
|
||
|
|
JR Z,L_22
|
||
|
|
; 109 {
|
||
|
|
; 110 gravity[1] = false;
|
||
|
|
LD HL,(IX+-11)
|
||
|
|
LD (HL),0
|
||
|
|
; 111 y--;
|
||
|
|
LD BC,(IX+-3)
|
||
|
|
DEC BC
|
||
|
|
LD (IX+-3),BC
|
||
|
|
; 112 }
|
||
|
|
; 113 else
|
||
|
|
JR L_26
|
||
|
|
L_22:
|
||
|
|
; 114 {
|
||
|
|
; 115 gravity[1] = true;
|
||
|
|
LD HL,(IX+-11)
|
||
|
|
LD (HL),1
|
||
|
|
; 116 y++;
|
||
|
|
LD BC,(IX+-3)
|
||
|
|
INC BC
|
||
|
|
LD (IX+-3),BC
|
||
|
|
; 117 }
|
||
|
|
; 118 }
|
||
|
|
L_26:
|
||
|
|
; 119
|
||
|
|
; 120 draw_sprite(x, y);
|
||
|
|
LD BC,(IX+-3)
|
||
|
|
PUSH BC
|
||
|
|
LD BC,(IX+-6)
|
||
|
|
PUSH BC
|
||
|
|
CALL _draw_sprite
|
||
|
|
POP BC
|
||
|
|
POP BC
|
||
|
|
; 121 } while (kb_Data[6] != kb_Clear);
|
||
|
|
LD A,(16056348)
|
||
|
|
CP A,64
|
||
|
|
JR NZ,L_27
|
||
|
|
; 122
|
||
|
|
; 123 /* Close the graphics */
|
||
|
|
; 124 gfx_End();
|
||
|
|
CALL _gfx_End
|
||
|
|
; 125 }
|
||
|
|
LD SP,IX
|
||
|
|
POP IX
|
||
|
|
RET
|
||
|
|
|
||
|
|
|
||
|
|
;**************************** _main ***************************
|
||
|
|
;Name Addr/Register Size Type
|
||
|
|
;_gfx_End IMPORT ----- function
|
||
|
|
;_kb_Scan IMPORT ----- function
|
||
|
|
;_gfx_FillScreen IMPORT ----- function
|
||
|
|
;_gfx_SetDraw IMPORT ----- function
|
||
|
|
;_rand IMPORT ----- function
|
||
|
|
;_gfx_Begin IMPORT ----- function
|
||
|
|
;_0temp2 STATIC 2 variable
|
||
|
|
;G_0 IX-11 3 variable
|
||
|
|
;gravity IX-8 2 variable
|
||
|
|
;x IX-6 3 variable
|
||
|
|
;y IX-3 3 variable
|
||
|
|
|
||
|
|
|
||
|
|
; Stack Frame Size: 17 (bytes)
|
||
|
|
; Spill Code: 0 (instruction)
|
||
|
|
|
||
|
|
|
||
|
|
SEGMENT TEXT
|
||
|
|
_0temp2:
|
||
|
|
DB 1
|
||
|
|
DB 1
|
||
|
|
XREF _logo_gfx_pal:ROM
|
||
|
|
XREF _dvd_data:ROM
|
||
|
|
XREF _kb_Scan:ROM
|
||
|
|
XREF _gfx_Sprite:ROM
|
||
|
|
XREF _gfx_Blit:ROM
|
||
|
|
XREF _gfx_SetDraw:ROM
|
||
|
|
XREF _gfx_FillScreen:ROM
|
||
|
|
XREF _gfx_SetPalette:ROM
|
||
|
|
XREF _gfx_End:ROM
|
||
|
|
XREF _gfx_Begin:ROM
|
||
|
|
XREF _rand:ROM
|
||
|
|
XREF __irems:ROM
|
||
|
|
XREF __frameset0:ROM
|
||
|
|
XREF __frameset:ROM
|
||
|
|
XREF __setflag:ROM
|
||
|
|
XREF __icmpzero:ROM
|
||
|
|
XDEF _main
|
||
|
|
XDEF _random_palette
|
||
|
|
XDEF _draw_sprite
|
||
|
|
END
|