ugBASIC 1.18
An isomorphic BASIC language compiler for retrocomputers
Loading...
Searching...
No Matches
vic2z.h
Go to the documentation of this file.
1#ifndef __UGBC_VIC2Z__
2#define __UGBC_VIC2Z__
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_BLACK 0
37#define COLOR_WHITE 1
38#define COLOR_RED 2
39#define COLOR_CYAN 3
40#define COLOR_VIOLET 4
41#define COLOR_GREEN 5
42#define COLOR_BLUE 6
43#define COLOR_YELLOW 7
44#define COLOR_ORANGE 8
45#define COLOR_BROWN 9
46#define COLOR_LIGHT_RED 10
47#define COLOR_DARK_GREY 11
48#define COLOR_GREY 12
49#define COLOR_LIGHT_GREEN 13
50#define COLOR_LIGHT_BLUE 14
51#define COLOR_LIGHT_GREY 15
52#define COLOR_DARK_BLUE 6
53#define COLOR_MAGENTA COLOR_RED
54#define COLOR_PURPLE COLOR_VIOLET
55#define COLOR_LAVENDER COLOR_VIOLET
56#define COLOR_GOLD COLOR_YELLOW
57#define COLOR_TURQUOISE COLOR_LIGHT_BLUE
58#define COLOR_TAN COLOR_BROWN
59#define COLOR_YELLOW_GREEN COLOR_YELLOW
60#define COLOR_OLIVE_GREEN COLOR_GREEN
61#define COLOR_PINK COLOR_LIGHT_RED
62#define COLOR_PEACH COLOR_PINK
63#define COLOR_LIGHT_WHITE COLOR_WHITE
64#define COLOR_COUNT 16
65
66#define IMAGE_WIDTH_SIZE 2
67#define IMAGE_WIDTH_OFFSET 0
68#define IMAGE_HEIGHT_SIZE 1
69#define IMAGE_HEIGHT_OFFSET 2
70
71#define DEFAULT_PEN_COLOR COLOR_WHITE
72#define DEFAULT_PAPER_COLOR COLOR_BLACK
73
74#define TEXT_COLUMNS_COUNT 40
75#define TEXT_ROWS_COUNT 25
76
77#define BITMAP_MODE_STANDARD 2 // Standard Bitmap Mode 320 x 200 x 2
78#define BITMAP_MODE_MULTICOLOR 3 // Multicolor Bitmap Mode 160 x 200 x 4
79#define BITMAP_MODE_AH 5 // Advanced HiRes 320 x 200 x 16 (w/l)
80#define BITMAP_MODE_AIFLI 6
81#define BITMAP_MODE_ASSLACE 7
82#define BITMAP_MODE_ECI 8
83#define BITMAP_MODE_IAFLI 9
84#define BITMAP_MODE_IH 10
85#define BITMAP_MODE_MRFLI 11
86#define BITMAP_MODE_MUCSUFLI 12
87#define BITMAP_MODE_MUCSUH 13
88#define BITMAP_MODE_MUFLI 14
89#define BITMAP_MODE_MUIFLI 15
90#define BITMAP_MODE_NUFLI 16
91#define BITMAP_MODE_NUIFLI 17
92#define BITMAP_MODE_SH 18
93#define BITMAP_MODE_SHFLI 19
94#define BITMAP_MODE_SHI 20
95#define BITMAP_MODE_SHIFLI 21
96#define BITMAP_MODE_SHIFXL 22
97#define BITMAP_MODE_UFLI 23
98#define BITMAP_MODE_UIFLI 24
99#define BITMAP_MODE_TRIFLI 25
100#define BITMAP_MODE_XFLI 26
101#define BITMAP_MODE_XIFLI 27
102#define BITMAP_MODE_FLI 28
103#define BITMAP_MODE_HCB 29
104#define BITMAP_MODE_IFLI 30
105#define BITMAP_MODE_MUCSU 31
106#define BITMAP_MODE_MCI 32
107#define BITMAP_MODE_MEGATEXT 33
108#define BITMAP_MODE_PRS 34
109
110#define BITMAP_MODE_DEFAULT BITMAP_MODE_STANDARD
111
112#define TILEMAP_MODE_STANDARD 0 // Standard Character Mode 40 x 25 x 16
113#define TILEMAP_MODE_MULTICOLOR 1 // Multicolor Character Mode 40 x 25 x 16
114#define TILEMAP_MODE_EXTENDED 4 // Extended Background Color Mode 40 x 25 x 20
115
116#define SPRITE_COUNT 8
117#define SPRITE_WIDTH 24
118#define SPRITE_HEIGHT 21
119#define SPRITE_X_MIN 0
120#define SPRITE_Y_MIN 0
121#define SPRITE_X_MAX 366
122#define SPRITE_Y_MAX 255
123
124#define SCREEN_SPRITE_RATIO_X 200
125#define SCREEN_SPRITE_RATIO_Y 100
126#define SCREEN_BORDER_X 23
127#define SCREEN_BORDER_Y 50
128
129#define DOUBLE_BUFFER_PAGE_0 0
130#define DOUBLE_BUFFER_PAGE_1 1
131
132int vic2z_screen_mode_enable( Environment * _environment, ScreenMode * _screen_mode );
133
134void vic2z_initialization( Environment * _environment );
135void vic2z_finalization( Environment * _environment );
136
137void vic2z_back( Environment * _environment );
138void vic2z_background_color( Environment * _environment, int _index, int _background_color );
139void vic2z_background_color_vars( Environment * _environment, char * _index, char * _background_color );
140void vic2z_background_color_semivars( Environment * _environment, int _index, char * _background_color );
141void vic2z_background_color_get_vars( Environment * _environment, char * _index, char * _background_color );
142void vic2z_border_color( Environment * _environment, char * _border_color );
143Variable * vic2z_collision( Environment * _environment, char * _sprite );
144void vic2z_hit( Environment * _environment, char * _sprite_mask, char * _result );
145void vic2z_next_raster( Environment * _environment );
146void vic2z_next_raster_at( Environment * _environment, char * _label, char * _positionlo, char * _positionhi );
147void vic2z_raster_at( Environment * _environment, char * _label, char * _positionlo, char * _positionhi );
148void vic2z_sprite_common_color( Environment * _environment, char * _index, char * _common_color );
149void vic2z_bitmap_enable( Environment * _environment, int _width, int _height, int _colors );
150void vic2z_bitmap_disable( Environment * _environment );
151void vic2z_bitmap_at( Environment * _environment, char * _address );
152void vic2z_colormap_at( Environment * _environment, char * _address );
153void vic2z_textmap_at( Environment * _environment, char * _address );
154void vic2z_tiles_at( Environment * _environment, char * _address );
155void vic2z_tilemap_enable( Environment * _environment, int _width, int _height, int _colors, int _tile_width, int _tile_height );
156
157void vic2z_bank_select( Environment * _environment, int _bank );
158void vic2z_screen_on( Environment * _environment );
159void vic2z_screen_off( Environment * _environment );
160void vic2z_screen_rows( Environment * _environment, char * _rows );
161void vic2z_screen_columns( Environment * _environment, char * _columns );
162
163void vic2z_sprite_data_from( Environment * _environment, char * _sprite, char * _address );
164void vic2z_sprite_data_set( Environment * _environment, char * _sprite, char * _address );
165void vic2z_sprite_enable( Environment * _environment, char *_sprite );
166void vic2z_sprite_disable( Environment * _environment, char * _sprite );
167void vic2z_sprite_at( Environment * _environment, char * _sprite, char * _x, char * _y );
168void vic2z_sprite_expand_vertical( Environment * _environment, char * _sprite );
169void vic2z_sprite_expand_horizontal( Environment * _environment, char * _sprite );
170void vic2z_sprite_compress_vertical( Environment * _environment, char * _sprite );
171void vic2z_sprite_compress_horizontal( Environment * _environment, char * _sprite );
172void vic2z_sprite_multicolor( Environment * _environment, char * _sprite );
173void vic2z_sprite_monocolor( Environment * _environment, char * _sprite );
174void vic2z_sprite_color( Environment * _environment, char * _sprite, char * _color );
175void vic2z_sprite_priority( Environment * _environment, char * _sprite, char * _priority );
176void vic2z_vertical_scroll( Environment * _environment, char * _displacement );
177void vic2z_horizontal_scroll( Environment * _environment, char * _displacement );
178void vic2z_busy_wait( Environment * _environment, char * _timing );
179
180void vic2z_tiles_get( Environment * _environment, char * _result );
181void vic2z_get_width( Environment * _environment, char * _result );
182void vic2z_get_height( Environment * _environment, char * _result );
183
184void vic2z_pset_int( Environment * _environment, int _x, int _y, int *_c );
185void vic2z_pset_vars( Environment * _environment, char *_x, char *_y, char *_c );
186void vic2z_pget_color_vars( Environment * _environment, char *_x, char *_y, char * _result );
187void vic2z_cls( Environment * _environment );
188void vic2z_cls_box( Environment * _environment, char * _x1, char * _y1, char * _w, char * _h );
189void vic2z_scroll_text( Environment * _environment, int _direction, int _overlap );
190void vic2z_hscroll_line( Environment * _environment, int _direction, int _overlap );
191void vic2z_hscroll_screen( Environment * _environment, int _direction, int _overlap );
192void vic2z_text( Environment * _environment, char * _text, char * _text_size, int _raw );
193void vic2z_cline( Environment * _environment, char * _characters );
194void vic2z_scroll( Environment * _environment, int _dx, int _dy );
195
197
198Variable * vic2z_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 );
199Variable * vic2z_sprite_converter( Environment * _environment, char * _data, int _width, int _height, int _depth, RGBi * _color, int _flags );
200void vic2z_put_image( Environment * _environment, char * _image, char * _x, char * _y, char * _frame, char * _sequence, int _frame_size, int _frame_count, char * _flags );
201void vic2z_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 );
202void vic2z_wait_vbl( Environment * _environment );
203Variable * vic2z_new_image( Environment * _environment, int _width, int _height, int _mode );
204Variable * vic2z_new_images( Environment * _environment, int _frames, int _width, int _height, int _mode );
205Variable * vic2z_new_sequence( Environment * _environment, int _sequences, int _frames, int _width, int _height, int _mode );
206void vic2z_get_image( Environment * _environment, char * _image, char * _x, char * _y, char * _frame, char * _sequence, int _frame_size, int _frame_count, int _palette );
207
208void vic2z_put_tile( Environment * _environment, char * _image, char * _x, char * _y );
209void vic2z_put_tiles( Environment * _environment, char * _image, char * _x, char * _y, char *_w, char *_h );
210void vic2z_move_tiles( Environment * _environment, char * _image, char * _x, char * _y );
211void vic2z_use_tileset( Environment * _environment, char * _tileset );
212void vic2z_tile_at( Environment * _environment, char * _x, char * _y, char * _result );
213
214void vic2z_slice_image( Environment * _environment, char * _image, char * _frame, char * _sequence, int _frame_size, int _frame_count, char * _destination );
215
216#endif
struct _ScreenMode ScreenMode
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.
void vic2z_pget_color_vars(Environment *_environment, char *_x, char *_y, char *_result)
void vic2z_sprite_disable(Environment *_environment, char *_sprite)
void vic2z_screen_off(Environment *_environment)
void vic2z_wait_vbl(Environment *_environment)
void vic2z_hscroll_line(Environment *_environment, int _direction, int _overlap)
void vic2z_raster_at(Environment *_environment, char *_label, char *_positionlo, char *_positionhi)
void vic2z_slice_image(Environment *_environment, char *_image, char *_frame, char *_sequence, int _frame_size, int _frame_count, char *_destination)
void vic2z_sprite_enable(Environment *_environment, char *_sprite)
void vic2z_put_tiles(Environment *_environment, char *_image, char *_x, char *_y, char *_w, char *_h)
void vic2z_screen_rows(Environment *_environment, char *_rows)
int vic2z_screen_mode_enable(Environment *_environment, ScreenMode *_screen_mode)
void vic2z_put_image(Environment *_environment, char *_image, char *_x, char *_y, char *_frame, char *_sequence, int _frame_size, int _frame_count, char *_flags)
void vic2z_vertical_scroll(Environment *_environment, char *_displacement)
void vic2z_tiles_at(Environment *_environment, char *_address)
void vic2z_sprite_expand_horizontal(Environment *_environment, char *_sprite)
Variable * vic2z_new_image(Environment *_environment, int _width, int _height, int _mode)
void vic2z_sprite_multicolor(Environment *_environment, char *_sprite)
Variable * vic2z_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)
void vic2z_sprite_common_color(Environment *_environment, char *_index, char *_common_color)
Variable * vic2z_get_raster_line(Environment *_environment)
void vic2z_scroll_text(Environment *_environment, int _direction, int _overlap)
void vic2z_scroll(Environment *_environment, int _dx, int _dy)
void vic2z_sprite_color(Environment *_environment, char *_sprite, char *_color)
void vic2z_get_height(Environment *_environment, char *_result)
void vic2z_hit(Environment *_environment, char *_sprite_mask, char *_result)
void vic2z_use_tileset(Environment *_environment, char *_tileset)
void vic2z_busy_wait(Environment *_environment, char *_timing)
void vic2z_bitmap_enable(Environment *_environment, int _width, int _height, int _colors)
void vic2z_bitmap_disable(Environment *_environment)
void vic2z_colormap_at(Environment *_environment, char *_address)
void vic2z_textmap_at(Environment *_environment, char *_address)
void vic2z_sprite_at(Environment *_environment, char *_sprite, char *_x, char *_y)
void vic2z_background_color_vars(Environment *_environment, char *_index, char *_background_color)
void vic2z_screen_columns(Environment *_environment, char *_columns)
void vic2z_sprite_expand_vertical(Environment *_environment, char *_sprite)
void vic2z_next_raster(Environment *_environment)
void vic2z_sprite_compress_vertical(Environment *_environment, char *_sprite)
void vic2z_bank_select(Environment *_environment, int _bank)
void vic2z_sprite_data_from(Environment *_environment, char *_sprite, char *_address)
void vic2z_sprite_priority(Environment *_environment, char *_sprite, char *_priority)
void vic2z_background_color(Environment *_environment, int _index, int _background_color)
void vic2z_pset_int(Environment *_environment, int _x, int _y, int *_c)
void vic2z_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)
Variable * vic2z_new_sequence(Environment *_environment, int _sequences, int _frames, int _width, int _height, int _mode)
Variable * vic2z_collision(Environment *_environment, char *_sprite)
void vic2z_initialization(Environment *_environment)
void vic2z_tilemap_enable(Environment *_environment, int _width, int _height, int _colors, int _tile_width, int _tile_height)
void vic2z_next_raster_at(Environment *_environment, char *_label, char *_positionlo, char *_positionhi)
void vic2z_horizontal_scroll(Environment *_environment, char *_displacement)
void vic2z_tiles_get(Environment *_environment, char *_result)
void vic2z_bitmap_at(Environment *_environment, char *_address)
void vic2z_finalization(Environment *_environment)
void vic2z_cls_box(Environment *_environment, char *_x1, char *_y1, char *_w, char *_h)
Variable * vic2z_new_images(Environment *_environment, int _frames, int _width, int _height, int _mode)
void vic2z_get_width(Environment *_environment, char *_result)
void vic2z_screen_on(Environment *_environment)
void vic2z_background_color_semivars(Environment *_environment, int _index, char *_background_color)
void vic2z_hscroll_screen(Environment *_environment, int _direction, int _overlap)
void vic2z_sprite_data_set(Environment *_environment, char *_sprite, char *_address)
Variable * vic2z_sprite_converter(Environment *_environment, char *_data, int _width, int _height, int _depth, RGBi *_color, int _flags)
void vic2z_background_color_get_vars(Environment *_environment, char *_index, char *_background_color)
void vic2z_border_color(Environment *_environment, char *_border_color)
void vic2z_sprite_compress_horizontal(Environment *_environment, char *_sprite)
void vic2z_pset_vars(Environment *_environment, char *_x, char *_y, char *_c)
void vic2z_back(Environment *_environment)
void vic2z_tile_at(Environment *_environment, char *_x, char *_y, char *_result)
void vic2z_text(Environment *_environment, char *_text, char *_text_size, int _raw)
void vic2z_move_tiles(Environment *_environment, char *_image, char *_x, char *_y)
void vic2z_sprite_monocolor(Environment *_environment, char *_sprite)
void vic2z_cline(Environment *_environment, char *_characters)
void vic2z_get_image(Environment *_environment, char *_image, char *_x, char *_y, char *_frame, char *_sequence, int _frame_size, int _frame_count, int _palette)
void vic2z_cls(Environment *_environment)
void vic2z_put_tile(Environment *_environment, char *_image, char *_x, char *_y)