ugBASIC 1.18
An isomorphic BASIC language compiler for retrocomputers
Loading...
Searching...
No Matches
cga.h
Go to the documentation of this file.
1#ifndef __UGBC_TMS9918__
2#define __UGBC_TMS9918__
3
4/*****************************************************************************
5 * ugBASIC - an isomorphic BASIC language compiler for retrocomputers *
6 *****************************************************************************
7 * Copyright 2021-2026 Marco Spedaletti (asimov@mclink.it)
8 *
9 * Licensed under the Apache License, Version 2.0 (the "License");
10 * you may not use this file except in compliance with the License.
11 * You may obtain a copy of the License at
12 *
13 * http://www.apache.org/licenses/LICENSE-2.0
14 *
15 * Unless required by applicable law or agreed to in writing, software
16 * distributed under the License is distributed on an "AS IS" BASIS,
17 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
18 * See the License for the specific language governing permissions and
19 * limitations under the License.
20 *----------------------------------------------------------------------------
21 * Concesso in licenza secondo i termini della Licenza Apache, versione 2.0
22 * (la "Licenza"); è proibito usare questo file se non in conformità alla
23 * Licenza. Una copia della Licenza è disponibile all'indirizzo:
24 *
25 * http://www.apache.org/licenses/LICENSE-2.0
26 *
27 * Se non richiesto dalla legislazione vigente o concordato per iscritto,
28 * il software distribuito nei termini della Licenza è distribuito
29 * "COSì COM'è", SENZA GARANZIE O CONDIZIONI DI ALCUN TIPO, esplicite o
30 * implicite. Consultare la Licenza per il testo specifico che regola le
31 * autorizzazioni e le limitazioni previste dalla medesima.
32 ****************************************************************************/
33
34#include "../ugbc.h"
35
36#define COLOR_TRANSPARENT 0x00
37#define COLOR_BLACK 0x00
38#define COLOR_DARK_WHITE 0x08 // DARK GRAY
39#define COLOR_WHITE 0x0f
40#define COLOR_LIGHT_WHITE COLOR_WHITE
41#define COLOR_DARK_RED 0x04
42#define COLOR_RED 0x0c
43#define COLOR_LIGHT_RED COLOR_RED
44#define COLOR_CYAN 0x0b
45#define COLOR_VIOLET 0x0d // LIGHT MAGENTA
46#define COLOR_DARK_GREEN 0x02
47#define COLOR_GREEN 0x0a
48#define COLOR_LIGHT_GREEN COLOR_GREEN
49#define COLOR_DARK_BLUE 0x01
50#define COLOR_BLUE 0x09
51#define COLOR_LIGHT_BLUE COLOR_BLUE
52#define COLOR_YELLOW 0x0e
53#define COLOR_ORANGE COLOR_LIGHT_RED
54#define COLOR_BROWN 0x06
55#define COLOR_DARK_GREY COLOR_DARK_WHITE
56#define COLOR_GREY 0x07
57#define COLOR_LIGHT_GREY COLOR_GREY
58#define COLOR_MAGENTA 0x0d
59#define COLOR_PURPLE COLOR_VIOLET
60#define COLOR_LAVENDER COLOR_VIOLET
61#define COLOR_GOLD COLOR_YELLOW
62#define COLOR_TURQUOISE COLOR_LIGHT_BLUE
63#define COLOR_TAN COLOR_BROWN
64#define COLOR_YELLOW_GREEN COLOR_LIGHT_GREEN
65#define COLOR_OLIVE_GREEN COLOR_GREEN
66#define COLOR_PINK COLOR_LIGHT_RED
67#define COLOR_PEACH COLOR_PINK
68#define COLOR_COUNT 16
69
70#define DEFAULT_PEN_COLOR COLOR_WHITE
71#define DEFAULT_PAPER_COLOR COLOR_BLACK
72
73#define TEXT_COLUMNS_COUNT 40
74#define TEXT_ROWS_COUNT 25
75
76#define TILEMAP_MODE_40x25x2 0 // BIOS MODE 00h (40x25, 2 colors)
77#define TILEMAP_MODE_40x25x16 1 // BIOS MODE 01h (40x25, 16 colors)
78#define TILEMAP_MODE_80x25x2 2 // BIOS MODE 02h (80x25, 2 colors)
79#define TILEMAP_MODE_80x25x16 3 // BIOS MODE 03h (80x25, 16 colors)
80#define TILEMAP_MODE_STANDARD TILEMAP_MODE_40x25x16
81
82#define BITMAP_MODE_320x200x2 4 // BIOS MODE 05h (320x200, 2 colors)
83#define BITMAP_MODE_320x200x4 5 // BIOS MODE 04h (320x200, 4 colors)
84#define BITMAP_MODE_640x200x2 6 // BIOS MODE 06h (640x200, 2 colors)
85#define BITMAP_MODE_STANDARD BITMAP_MODE_320x200x4
86
87#define BITMAP_MODE_DEFAULT BITMAP_MODE_STANDARD
88
89#define SPRITE_COUNT 32
90#define SPRITE_WIDTH 8
91#define SPRITE_HEIGHT 8
92#define SPRITE_X_MIN 0
93#define SPRITE_Y_MIN 0
94#define SPRITE_X_MAX 264
95#define SPRITE_Y_MAX 200
96
97#define SCREEN_SPRITE_RATIO_X 100
98#define SCREEN_SPRITE_RATIO_Y 100
99#define SCREEN_BORDER_X 0
100#define SCREEN_BORDER_Y 0
101
102#define IMAGE_WIDTH_SIZE 2
103#define IMAGE_WIDTH_OFFSET 0
104#define IMAGE_HEIGHT_SIZE 1
105#define IMAGE_HEIGHT_OFFSET 2
106
107#define DOUBLE_BUFFER_PAGE_0 0
108#define DOUBLE_BUFFER_PAGE_1 1
109
110// #define TILES_PADDING 8
111
112int cga_screen_mode_enable( Environment * _environment, ScreenMode * _screen_mode );
113
114void cga_initialization( Environment * _environment );
115void cga_finalization( Environment * _environment );
116
117void cga_back( Environment * _environment );
118void cga_background_color( Environment * _environment, int _index, int _background_color );
119void cga_background_color_vars( Environment * _environment, char * _index, char * _background_color );
120void cga_background_color_semivars( Environment * _environment, int _index, char * _background_color );
121void cga_colors_vars( Environment * _environment, char * _foreground_color, char * _background_color );
122void cga_background_color_get_vars( Environment * _environment, char * _index, char * _background_color );
123void cga_border_color( Environment * _environment, char * _border_color );
124Variable * cga_collision( Environment * _environment, char * _sprite );
125void cga_hit( Environment * _environment, char * _sprite_mask, char * _result );
126void cga_next_raster( Environment * _environment );
127void cga_next_raster_at( Environment * _environment, char * _label, char * _positionlo, char * _positionhi );
128void cga_raster_at( Environment * _environment, char * _label, char * _positionlo, char * _positionhi );
129void cga_sprite_common_color( Environment * _environment, char * _index, char * _common_color );
130void cga_bitmap_enable( Environment * _environment, int _width, int _height, int _colors );
131void cga_bitmap_disable( Environment * _environment );
132void cga_bitmap_at( Environment * _environment, char * _address );
133void cga_colormap_at( Environment * _environment, char * _address );
134void cga_textmap_at( Environment * _environment, char * _address );
135void cga_tiles_at( Environment * _environment, char * _address );
136void cga_tilemap_enable( Environment * _environment, int _width, int _height, int _colors, int _tile_width, int _tile_height );
137
138void cga_bank_select( Environment * _environment, int _bank );
139void cga_screen_on( Environment * _environment );
140void cga_screen_off( Environment * _environment );
141void cga_screen_rows( Environment * _environment, char * _rows );
142void cga_screen_columns( Environment * _environment, char * _columns );
143
144void cga_sprite_data_from( Environment * _environment, char * _sprite, char * _image );
145void cga_sprite_data_set( Environment * _environment, char * _sprite, char * _image );
146void cga_sprite_enable( Environment * _environment, char *_sprite );
147void cga_sprite_disable( Environment * _environment, char * _sprite );
148void cga_sprite_at( Environment * _environment, char * _sprite, char * _x, char * _y );
149void cga_sprite_expand_vertical( Environment * _environment, char * _sprite );
150void cga_sprite_expand_horizontal( Environment * _environment, char * _sprite );
151void cga_sprite_compress_vertical( Environment * _environment, char * _sprite );
152void cga_sprite_compress_horizontal( Environment * _environment, char * _sprite );
153void cga_sprite_multicolor( Environment * _environment, char * _sprite );
154void cga_sprite_monocolor( Environment * _environment, char * _sprite );
155void cga_sprite_color( Environment * _environment, char * _sprite, char * _color );
156void cga_sprite_priority( Environment * _environment, char * _sprite, char * _priority );
157void cga_vertical_scroll( Environment * _environment, char * _displacement );
158void cga_horizontal_scroll( Environment * _environment, char * _displacement );
159void cga_busy_wait( Environment * _environment, char * _timing );
160
161void cga_tiles_get( Environment * _environment, char * _result );
162void cga_get_width( Environment * _environment, char * _result );
163void cga_get_height( Environment * _environment, char * _result );
164
165void cga_pset_int( Environment * _environment, int _x, int _y, int *_c );
166void cga_pset_vars( Environment * _environment, char *_x, char *_y, char *_c );
167void cga_pget_color_vars( Environment * _environment, char *_x, char *_y, char * _result );
168void cga_cls( Environment * _environment );
169void cga_cls_box( Environment * _environment, char * _x1, char * _y1, char * _w, char * _h );
170void cga_scroll_text( Environment * _environment, int _direction, int _overlap );
171void cga_hscroll_line( Environment * _environment, int _direction, int _overlap );
172void cga_hscroll_screen( Environment * _environment, int _direction, int _overlap );
173void cga_text( Environment * _environment, char * _text, char * _text_size, int _raw );
174void cga_cline( Environment * _environment, char * _characters );
175void cga_scroll( Environment * _environment, int _dx, int _dy );
176
177void cga_calculate_sequence_frame_offset( Environment * _environment, char * _offset, char * _sequence, char * _frame, int _frame_size, int _frame_count );
178
179Variable * cga_get_raster_line( Environment * _environment );
180
181int cga_image_size( Environment * _environment, int _width, int _height, int _mode );
182Variable * cga_image_converter( Environment * _environment, char * _data, int _width, int _height, int _depth, int _offset_x, int _offset_y, int _frame_width, int _frame_height, int _mode, int _transparent_color, int _flags );
183Variable * cga_sprite_converter( Environment * _environment, char * _data, int _width, int _height, int _depth, RGBi * _color, int _x_slot, int _y_slot );
184void cga_put_image( Environment * _environment, Resource * _image, char * _x, char * _y, char * _frame, char * _sequence, int _frame_size, int _frame_count, char * _flags );
185void cga_blit_image( Environment * _environment, char * _sources[], int _source_count, char * _blit, char * _x, char * _y, char * _frame, char * _sequence, int _frame_size, int _frame_count, int _flags );
186void cga_wait_vbl( Environment * _environment );
187Variable * cga_new_image( Environment * _environment, int _width, int _height, int _mode );
188Variable * cga_new_images( Environment * _environment, int _frames, int _width, int _height, int _mode );
189Variable * cga_new_sequence( Environment * _environment, int _sequences, int _frames, int _width, int _height, int _mode );
190void cga_get_image( Environment * _environment, char * _image, char * _x, char * _y, char * _frame, char * _sequence, int _frame_size, int _frame_count, int _palette );
191
192void cga_put_tile( Environment * _environment, char * _image, char * _x, char * _y );
193void cga_put_tiles( Environment * _environment, char * _image, char * _x, char * _y, char *_w, char *_h );
194void cga_move_tiles( Environment * _environment, char * _image, char * _x, char * _y );
195void cga_use_tileset( Environment * _environment, char * _tileset );
196void cga_tile_at( Environment * _environment, char * _x, char * _y, char *_result );
197
198void cga_move_memory_video( Environment * _environment, char * _from, char * _to, char * _size );
199void cga_move_video_memory( Environment * _environment, char * _from, char * _to, char * _size );
200void cga_move_video_video( Environment * _environment, char * _from, char * _to, char * _size );
201
202typedef void (*Tms9918SliceImageFunction)(Environment *, char *, char *, char *, int, int, char *);
203
204void cga_slice_image_copy( Environment * _environment, char * _image, char * _frame, char * _sequence, int _frame_size, int _frame_count, char * _destination );
205void cga_slice_image_extract( Environment * _environment, char * _image, char * _frame, char * _sequence, int _frame_size, int _frame_count, char * _destination );
206int cga_palette_extract( Environment * _environment, char * _data, int _width, int _height, int _depth, int _flags, RGBi * _palette );
207void cga_flip_image( Environment * _environment, Resource * _image, char * _frame, char * _sequence, int _frame_size, int _frame_count, char * _direction );
208
209void cga_screen( Environment * _environment, char * _x, char * _y, char * _c );
210
211#endif
void cga_blit_image(Environment *_environment, char *_sources[], int _source_count, char *_blit, char *_x, char *_y, char *_frame, char *_sequence, int _frame_size, int _frame_count, int _flags)
Definition cga.c:1541
void cga_initialization(Environment *_environment)
Definition cga.c:1091
void cga_colormap_at(Environment *_environment, char *_address)
Definition cga.c:834
void cga_scroll_text(Environment *_environment, int _direction, int _overlap)
Definition cga.c:1026
Variable * cga_new_sequence(Environment *_environment, int _sequences, int _frames, int _width, int _height, int _mode)
Definition cga.c:1608
void cga_move_video_memory(Environment *_environment, char *_from, char *_to, char *_size)
Definition cga.c:1682
void cga_next_raster_at(Environment *_environment, char *_label, char *_positionlo, char *_positionhi)
CGA: emit code to wait for next raster irq at different position
Definition cga.c:357
void cga_screen_columns(Environment *_environment, char *_columns)
Definition cga.c:927
void cga_border_color(Environment *_environment, char *_border_color)
CGA: emit code to change border color
Definition cga.c:206
int cga_screen_mode_enable(Environment *_environment, ScreenMode *_screen_mode)
Definition cga.c:365
void cga_vertical_scroll(Environment *_environment, char *_displacement)
Definition cga.c:987
void cga_put_tiles(Environment *_environment, char *_image, char *_x, char *_y, char *_w, char *_h)
Definition cga.c:1656
void cga_screen_on(Environment *_environment)
Definition cga.c:907
void cga_calculate_sequence_frame_offset(Environment *_environment, char *_offset, char *_sequence, char *_frame, int _frame_size, int _frame_count)
Definition cga.c:1716
void cga_cls(Environment *_environment)
Definition cga.c:1011
Variable * cga_collision(Environment *_environment, char *_sprite)
Definition cga.c:174
void cga_slice_image_copy(Environment *_environment, char *_image, char *_frame, char *_sequence, int _frame_size, int _frame_count, char *_destination)
Definition cga.c:1694
void cga_hscroll_line(Environment *_environment, int _direction, int _overlap)
Definition cga.c:1292
void cga_text(Environment *_environment, char *_text, char *_text_size, int _raw)
Definition cga.c:1038
void cga_sprite_color(Environment *_environment, char *_sprite, char *_color)
Definition cga.c:975
void cga_sprite_compress_vertical(Environment *_environment, char *_sprite)
Definition cga.c:959
void cga_screen_rows(Environment *_environment, char *_rows)
Definition cga.c:923
void cga_sprite_compress_horizontal(Environment *_environment, char *_sprite)
Definition cga.c:963
void cga_background_color_vars(Environment *_environment, char *_index, char *_background_color)
CGA: emit code to change background color
Definition cga.c:247
void cga_sprite_expand_vertical(Environment *_environment, char *_sprite)
Definition cga.c:951
void cga_raster_at(Environment *_environment, char *_label, char *_positionlo, char *_positionhi)
CGA: emit code to set raster irq
Definition cga.c:326
void cga_tiles_at(Environment *_environment, char *_address)
Definition cga.c:983
void cga_sprite_multicolor(Environment *_environment, char *_sprite)
Definition cga.c:967
void cga_bitmap_enable(Environment *_environment, int _width, int _height, int _colors)
Definition cga.c:776
void cga_pset_vars(Environment *_environment, char *_x, char *_y, char *_c)
Definition cga.c:863
void cga_sprite_common_color(Environment *_environment, char *_index, char *_common_color)
CGA: emit code to change common sprite's color
Definition cga.c:307
void cga_get_image(Environment *_environment, char *_image, char *_x, char *_y, char *_frame, char *_sequence, int _frame_size, int _frame_count, int _palette)
Definition cga.c:1640
void cga_bitmap_disable(Environment *_environment)
Definition cga.c:799
Variable * cga_new_image(Environment *_environment, int _width, int _height, int _mode)
Definition cga.c:1553
void cga_busy_wait(Environment *_environment, char *_timing)
Definition cga.c:995
void cga_bank_select(Environment *_environment, int _bank)
Definition cga.c:361
void cga_move_memory_video(Environment *_environment, char *_from, char *_to, char *_size)
Definition cga.c:1678
void cga_get_height(Environment *_environment, char *_result)
Definition cga.c:1007
void cga_get_width(Environment *_environment, char *_result)
Definition cga.c:999
void cga_back(Environment *_environment)
Definition cga.c:1300
void cga_put_tile(Environment *_environment, char *_image, char *_x, char *_y)
Definition cga.c:1648
void cga_bitmap_at(Environment *_environment, char *_address)
Definition cga.c:830
int cga_palette_extract(Environment *_environment, char *_data, int _width, int _height, int _depth, int _flags, RGBi *_palette)
Definition cga.c:1702
void cga_sprite_data_from(Environment *_environment, char *_sprite, char *_image)
Definition cga.c:935
void cga_sprite_expand_horizontal(Environment *_environment, char *_sprite)
Definition cga.c:955
void cga_horizontal_scroll(Environment *_environment, char *_displacement)
Definition cga.c:991
void cga_sprite_data_set(Environment *_environment, char *_sprite, char *_image)
Definition cga.c:931
void cga_use_tileset(Environment *_environment, char *_tileset)
Definition cga.c:1664
void cga_cline(Environment *_environment, char *_characters)
Definition cga.c:1304
void cga_sprite_disable(Environment *_environment, char *_sprite)
Definition cga.c:943
void cga_sprite_monocolor(Environment *_environment, char *_sprite)
Definition cga.c:971
void cga_sprite_priority(Environment *_environment, char *_sprite, char *_priority)
Definition cga.c:979
void cga_sprite_at(Environment *_environment, char *_sprite, char *_x, char *_y)
Definition cga.c:947
void cga_screen_off(Environment *_environment)
Definition cga.c:915
void cga_finalization(Environment *_environment)
Definition cga.c:1275
void cga_sprite_enable(Environment *_environment, char *_sprite)
Definition cga.c:939
void cga_move_tiles(Environment *_environment, char *_image, char *_x, char *_y)
Definition cga.c:1652
void cga_background_color_get_vars(Environment *_environment, char *_index, char *_background_color)
CGA: emit code to retrieve background color
Definition cga.c:289
void cga_tile_at(Environment *_environment, char *_x, char *_y, char *_result)
Definition cga.c:1660
void cga_textmap_at(Environment *_environment, char *_address)
Definition cga.c:838
void cga_next_raster(Environment *_environment)
CGA: emit code to wait for next raster irq
Definition cga.c:340
void cga_flip_image(Environment *_environment, Resource *_image, char *_frame, char *_sequence, int _frame_size, int _frame_count, char *_direction)
Definition cga.c:1720
void cga_background_color(Environment *_environment, int _index, int _background_color)
CGA: emit code to change background color
Definition cga.c:227
void(* Tms9918SliceImageFunction)(Environment *, char *, char *, char *, int, int, char *)
Definition cga.h:202
Variable * cga_image_converter(Environment *_environment, char *_data, int _width, int _height, int _depth, int _offset_x, int _offset_y, int _frame_width, int _frame_height, int _mode, int _transparent_color, int _flags)
Definition cga.c:1515
Variable * cga_get_raster_line(Environment *_environment)
Definition cga.c:1668
Variable * cga_new_images(Environment *_environment, int _frames, int _width, int _height, int _mode)
Definition cga.c:1577
void cga_pget_color_vars(Environment *_environment, char *_x, char *_y, char *_result)
Definition cga.c:889
void cga_tilemap_enable(Environment *_environment, int _width, int _height, int _colors, int _tile_width, int _tile_height)
Definition cga.c:803
void cga_pset_int(Environment *_environment, int _x, int _y, int *_c)
Definition cga.c:842
int cga_image_size(Environment *_environment, int _width, int _height, int _mode)
Definition cga.c:1308
void cga_hscroll_screen(Environment *_environment, int _direction, int _overlap)
Definition cga.c:1296
void cga_cls_box(Environment *_environment, char *_x1, char *_y1, char *_w, char *_h)
Definition cga.c:1022
void cga_slice_image_extract(Environment *_environment, char *_image, char *_frame, char *_sequence, int _frame_size, int _frame_count, char *_destination)
Definition cga.c:1698
void cga_wait_vbl(Environment *_environment)
Definition cga.c:1549
void cga_tiles_get(Environment *_environment, char *_result)
Definition cga.c:1003
void cga_put_image(Environment *_environment, Resource *_image, char *_x, char *_y, char *_frame, char *_sequence, int _frame_size, int _frame_count, char *_flags)
Definition cga.c:1545
void cga_move_video_video(Environment *_environment, char *_from, char *_to, char *_size)
void cga_colors_vars(Environment *_environment, char *_foreground_color, char *_background_color)
Definition cga.c:1686
void cga_hit(Environment *_environment, char *_sprite_mask, char *_result)
CGA: emit code to check for collision
Definition cga.c:193
void cga_scroll(Environment *_environment, int _dx, int _dy)
Definition cga.c:1644
Variable * cga_sprite_converter(Environment *_environment, char *_data, int _width, int _height, int _depth, RGBi *_color, int _x_slot, int _y_slot)
Definition cga.c:1370
void cga_background_color_semivars(Environment *_environment, int _index, char *_background_color)
CGA: emit code to change background color
Definition cga.c:268
void cga_screen(Environment *_environment, char *_x, char *_y, char *_c)
Definition cga.c:1724
struct _ScreenMode ScreenMode
struct _Resource Resource
struct _RGBi RGBi
Structure to store color components (red, green and blue).
struct _Variable Variable
Structure of a single variable.
struct _Environment Environment
Structure of compilation environment.