github/AmigaExamples
1
0
Fork 0
mirror of https://frontier.innolan.net/github/AmigaExamples.git synced 2025-12-06 13:44:05 +00:00
Code Releases Activity

First attemp at scrolling text

Browse Source
This commit is contained in:
alpine9000
2016-03-31 13:36:24 +11:00
parent 160b78f30a
commit f7d6840c3c
15 changed files with 1020 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

47
025.scroll_text/constants.i Normal file
View File

@ -0,0 +1,47 @@
MASKED_FONT equ 1
if MASKED_FONT==1
BACKGROUND_COLOR equ 4
else
BACKGROUND_COLOR equ 3
endif
FONT_WIDTH equ 8
FONT_HEIGHT equ 8
SCREEN_WIDTH equ 320
SCREEN_HEIGHT equ 256
SCREEN_WIDTH_BYTES equ (SCREEN_WIDTH/8)
SCREEN_WIDTH_WORDS equ SCREEN_WIDTH_BYTES/2
LEFT_SCREEN_BUFFER equ 16
RIGHT_SCREEN_BUFFER equ 16
LEFT_SCREEN_BUFFER_BYTES equ LEFT_SCREEN_BUFFER/8
RIGHT_SCREEN_BUFFER_BYTES equ RIGHT_SCREEN_BUFFER/8
BITPLANE_WIDTH equ SCREEN_WIDTH+LEFT_SCREEN_BUFFER+RIGHT_SCREEN_BUFFER
BITPLANE_WIDTH_BYTES equ BITPLANE_WIDTH/8
BITPLANE_WIDTH_WORDS equ BITPLANE_WIDTH_BYTES/2
if NUM_COLORS==64
SCREEN_BIT_DEPTH equ 6
endif
if NUM_COLORS==32
SCREEN_BIT_DEPTH equ 5
endif
if NUM_COLORS==16
SCREEN_BIT_DEPTH equ 4
endif
if NUM_COLORS==8
SCREEN_BIT_DEPTH equ 3
endif
if NUM_COLORS==4
SCREEN_BIT_DEPTH equ 2
endif
if NUM_COLORS==2
SCREEN_BIT_DEPTH equ 1
endif
SCREEN_RES equ 8 ; 8=lo resolution, 4=hi resolution
RASTER_X_START equ $81 ; hard coded coordinates from hardware manual
RASTER_Y_START equ $2c
RASTER_X_STOP equ RASTER_X_START+SCREEN_WIDTH
RASTER_Y_STOP equ RASTER_Y_START+256
IMAGESIZE equ BITPLANE_WIDTH_BYTES*SCREEN_BIT_DEPTH*SCREEN_HEIGHT