mister-devel/InputTest_MiSTer
1
0
Fork 0
mirror of https://github.com/MiSTer-devel/InputTest_MiSTer.git synced 2026-04-19 03:04:18 +00:00
Code Issues Packages Projects Releases Wiki Activity
Files
d7241e7735409fa8535f54328eee547a301d897e
InputTest_MiSTer/src/inputtest/rom.asm
jimmystones d7241e7735 Add Gunsight mode
2022-08-23 21:19:22 +01:00

418 lines
8.2 KiB
NASM
Raw Blame History

;--------------------------------------------------------
; File Created by SDCC : free open source ANSI-C Compiler
; Version 4.0.0 #11528 (Linux)
;--------------------------------------------------------
.module os
.optsdcc -mz80
;--------------------------------------------------------
; Public variables in this module
;--------------------------------------------------------
.globl _main
.globl _app_main
.globl _app_credits
.globl _fadein
.globl _fadeout
.globl _snek_attract
.globl _snek_gameplay
.globl _start_snek_gameplay
.globl _start_snek_attract
.globl _app_zorblaxx
.globl _menu
.globl _start_menu
.globl _gunsight
.globl _btntest
.globl _inputtester_advanced
.globl _inputtester_analog
.globl _inputtester_digital
.globl _start_gunsight
.globl _start_btntest
.globl _start_inputtester_advanced
.globl _start_inputtester_analog
.globl _start_inputtester_digital
.globl _loader
.globl _musicram
.globl _sndram
.globl _tilemapram
.globl _tilemapctl
.globl _spritecollisionram
.globl _spriteram
.globl _bgcolram
.globl _fgcolram
.globl _chram
.globl _system_menu
.globl _system_pause
.globl _starfield3
.globl _starfield2
.globl _starfield1
.globl _timer
.globl _timestamp
.globl _ps2_mouse
.globl _ps2_key
.globl _spinner
.globl _paddle
.globl _analog_r
.globl _analog_l
.globl _joystick
.globl _video_ctl
.globl _input0
;--------------------------------------------------------
; special function registers
;--------------------------------------------------------
;--------------------------------------------------------
; ram data
;--------------------------------------------------------
.area _DATA
_input0 = 0x8000
_video_ctl = 0x8001
_joystick = 0x8100
_analog_l = 0x8200
_analog_r = 0x8300
_paddle = 0x8400
_spinner = 0x8500
_ps2_key = 0x8600
_ps2_mouse = 0x8700
_timestamp = 0x8800
_timer = 0x8900
_starfield1 = 0x8a00
_starfield2 = 0x8a10
_starfield3 = 0x8a20
_system_pause = 0x8a30
_system_menu = 0x8a31
_chram = 0x9800
_fgcolram = 0xa000
_bgcolram = 0xa800
_spriteram = 0xb000
_spritecollisionram = 0xb400
_tilemapctl = 0x8c00
_tilemapram = 0x8c10
_sndram = 0x8b00
_musicram = 0x8b10
;--------------------------------------------------------
; ram data
;--------------------------------------------------------
.area _INITIALIZED
;--------------------------------------------------------
; absolute external ram data
;--------------------------------------------------------
.area _DABS (ABS)
;--------------------------------------------------------
; global & static initialisations
;--------------------------------------------------------
.area _HOME
.area _GSINIT
.area _GSFINAL
.area _GSINIT
;--------------------------------------------------------
; Home
;--------------------------------------------------------
.area _HOME
.area _HOME
;--------------------------------------------------------
; code
;--------------------------------------------------------
.area _CODE
;os.c:38: void app_main()
; ---------------------------------
; Function app_main
; ---------------------------------
_app_main::
;os.c:40: chram_size = chram_cols * chram_rows;
ld hl,#_chram_rows + 0
ld e, (hl)
ld hl,#_chram_cols + 0
ld h, (hl)
ld l, #0x00
ld d, l
ld b, #0x08
00233$:
add hl, hl
jr NC,00234$
add hl, de
00234$:
djnz 00233$
ld (_chram_size), hl
;os.c:41: while (1)
00124$:
;os.c:43: hsync = input0 & 0x80;
ld iy, #_input0
ld a, 0 (iy)
rlc a
and a, #0x01
ld (_hsync+0), a
;os.c:44: vsync = input0 & 0x40;
ld a, 0 (iy)
and a, #0x40
ld c, a
ld b, #0x00
ld a, b
or a, c
add a, #0xff
ld a, #0x00
rla
ld (_vsync+0), a
;os.c:45: hblank = CHECK_BIT(input0, INPUT_HBLANK);
ld a, 0 (iy)
and a, #0x20
ld c, a
xor a, a
cp a, c
rla
ld (_hblank+0), a
;os.c:46: vblank = CHECK_BIT(input0, INPUT_VBLANK);
ld a, 0 (iy)
and a, #0x10
ld c, a
xor a, a
cp a, c
rla
ld (_vblank+0), a
;os.c:47: switch (state)
ld iy, #_state
ld a, 0 (iy)
dec a
jp Z,00101$
ld a, 0 (iy)
sub a, #0x02
jp Z,00102$
ld a, 0 (iy)
sub a, #0x03
jp Z,00103$
ld a, 0 (iy)
sub a, #0x04
jp Z,00104$
ld a, 0 (iy)
sub a, #0x05
jp Z,00105$
ld a, 0 (iy)
sub a, #0x06
jp Z,00106$
ld a, 0 (iy)
sub a, #0x07
jp Z,00107$
ld a, 0 (iy)
sub a, #0x08
jp Z,00108$
ld a, 0 (iy)
sub a, #0x09
jp Z,00109$
ld a, 0 (iy)
sub a, #0x0a
jp Z,00110$
ld a, 0 (iy)
sub a, #0x0b
jp Z,00111$
ld a, 0 (iy)
sub a, #0x0c
jp Z,00112$
ld a, 0 (iy)
sub a, #0x14
jr Z,00113$
ld a, 0 (iy)
sub a, #0x16
jr Z,00114$
ld a, 0 (iy)
sub a, #0x1e
jr Z,00115$
ld a, 0 (iy)
sub a, #0x1f
jp Z,00116$
ld a, 0 (iy)
sub a, #0x28
jp Z,00118$
ld a, 0 (iy)
sub a, #0x29
jp Z,00119$
ld a, 0 (iy)
sub a, #0x2a
jr Z,00117$
ld a, 0 (iy)
sub a, #0x2b
jr Z,00120$
jp 00121$
;os.c:49: case STATE_START_INPUTTESTER:
00101$:
;os.c:50: start_inputtester_digital();
call _start_inputtester_digital
;os.c:51: break;
jp 00122$
;os.c:52: case STATE_INPUTTESTER:
00102$:
;os.c:53: inputtester_digital();
call _inputtester_digital
;os.c:54: break;
jp 00122$
;os.c:56: case STATE_START_INPUTTESTERADVANCED:
00103$:
;os.c:57: start_inputtester_advanced();
call _start_inputtester_advanced
;os.c:58: break;
jp 00122$
;os.c:59: case STATE_INPUTTESTERADVANCED:
00104$:
;os.c:60: inputtester_advanced();
call _inputtester_advanced
;os.c:61: break;
jp 00122$
;os.c:63: case STATE_START_INPUTTESTERANALOG:
00105$:
;os.c:64: start_inputtester_analog();
call _start_inputtester_analog
;os.c:65: break;
jp 00122$
;os.c:66: case STATE_INPUTTESTERANALOG:
00106$:
;os.c:67: inputtester_analog();
call _inputtester_analog
;os.c:68: break;
jr 00122$
;os.c:70: case STATE_START_BTNTEST:
00107$:
;os.c:71: start_btntest();
call _start_btntest
;os.c:72: break;
jr 00122$
;os.c:73: case STATE_BTNTEST:
00108$:
;os.c:74: btntest();
call _btntest
;os.c:75: break;
jr 00122$
;os.c:77: case STATE_START_GUNSIGHT:
00109$:
;os.c:78: start_gunsight();
call _start_gunsight
;os.c:79: break;
jr 00122$
;os.c:80: case STATE_GUNSIGHT:
00110$:
;os.c:81: gunsight();
call _gunsight
;os.c:82: break;
jr 00122$
;os.c:84: case STATE_START_MENU:
00111$:
;os.c:85: start_menu();
call _start_menu
;os.c:86: break;
jr 00122$
;os.c:87: case STATE_MENU:
00112$:
;os.c:88: menu();
call _menu
;os.c:89: break;
jr 00122$
;os.c:91: case STATE_FADEOUT:
00113$:
;os.c:92: fadeout();
call _fadeout
;os.c:93: break;
jr 00122$
;os.c:94: case STATE_FADEIN:
00114$:
;os.c:95: fadein();
call _fadein
;os.c:96: break;
jr 00122$
;os.c:98: case STATE_START_ATTRACT:
00115$:
;os.c:99: state = 0;
ld hl,#_state + 0
ld (hl), #0x00
;os.c:100: loader("SNEK.AZN");
ld hl, #___str_0
push hl
call _loader
pop af
;os.c:101: start_snek_attract();
call _start_snek_attract
;os.c:102: break;
jr 00122$
;os.c:103: case STATE_ATTRACT:
00116$:
;os.c:104: snek_attract();
call _snek_attract
;os.c:105: break;
jr 00122$
;os.c:106: case STATE_START_CREDITS:
00117$:
;os.c:107: app_credits();
call _app_credits
;os.c:108: break;
jr 00122$
;os.c:110: case STATE_START_GAME_SNEK:
00118$:
;os.c:111: start_snek_gameplay();
call _start_snek_gameplay
;os.c:112: break;
jr 00122$
;os.c:113: case STATE_GAME_SNEK:
00119$:
;os.c:114: snek_gameplay();
call _snek_gameplay
;os.c:115: break;
jr 00122$
;os.c:116: case STATE_START_ZORBLAXX:
00120$:
;os.c:117: state = 0;
ld hl,#_state + 0
ld (hl), #0x00
;os.c:118: loader("ZORBLAXX.AZN");
ld hl, #___str_1
push hl
call _loader
pop af
;os.c:119: app_zorblaxx();
call _app_zorblaxx
;os.c:120: break;
jr 00122$
;os.c:122: default:
00121$:
;os.c:127: loader("INPUTTESTER.AZN");
ld hl, #___str_2
push hl
call _loader
pop af
;os.c:128: start_inputtester_digital();
call _start_inputtester_digital
;os.c:133: }
00122$:
;os.c:135: hsync_last = hsync;
ld a,(#_hsync + 0)
ld iy, #_hsync_last
ld 0 (iy), a
;os.c:136: vsync_last = vsync;
ld a,(#_vsync + 0)
ld iy, #_vsync_last
ld 0 (iy), a
;os.c:137: hblank_last = hblank;
ld a,(#_hblank + 0)
ld iy, #_hblank_last
ld 0 (iy), a
;os.c:138: vblank_last = vblank;
ld a,(#_vblank + 0)
ld iy, #_vblank_last
ld 0 (iy), a
;os.c:140: }
jp 00124$
___str_0:
.ascii "SNEK.AZN"
.db 0x00
___str_1:
.ascii "ZORBLAXX.AZN"
.db 0x00
___str_2:
.ascii "INPUTTESTER.AZN"
.db 0x00
;os.c:143: void main()
; ---------------------------------
; Function main
; ---------------------------------
_main::
;os.c:145: app_main();
;os.c:146: }
jp _app_main
.area _CODE
.area _INITIALIZER
.area _CABS (ABS)
Reference in New Issue View Git Blame Copy Permalink