1 //from https://github.com/sparky4/16/commit/7872dbf5d0240f01177588bd7966c3e042ced554
\r
2 #include "16/src/lib/omodex16.h"
\r
3 #include "16/src/lib/bitmap.h"
\r
7 //#include "dos_kb.h"
\r
8 #define SCREEN_WIDTH 320
\r
9 #define SCREEN_HEIGHT 240
\r
11 //word far *clock= (word far*) 0x046C; /* 18.2hz clock */
\r
19 unsigned int tilex,tiley; // tile position on the map
\r
34 int tx; //???? appears to be the tile position on the viewable screen map
\r
35 int ty; //???? appears to be the tile position on the viewable screen map
\r
36 word dxThresh; //????
\r
37 word dyThresh; //????
\r
41 int tx; //player position on the viewable map
\r
42 int ty; //player position on the viewable map
\r
46 omap_t allocMap(int w, int h);
\r
47 void oinitMap(omap_t *map);
\r
48 void omapScrollRight(omap_view_t *mv, byte offset);
\r
49 void omapScrollLeft(omap_view_t *mv, byte offest);
\r
50 void omapScrollUp(omap_view_t *mv, byte offset);
\r
51 void omapScrollDown(omap_view_t *mv, byte offset);
\r
52 void omapGoTo(omap_view_t *mv, int tx, int ty);
\r
53 void omapDrawTile(otiles_t *t, word i, opage_t *page, word x, word y);
\r
54 void omapDrawRow(omap_view_t *mv, int tx, int ty, word y);
\r
55 void omapDrawCol(omap_view_t *mv, int tx, int ty, word x);
\r
57 //#define SWAP(a, b) tmp=a; a=b; b=tmp;
\r
59 static global_game_variables_t gvar;
\r
66 opage_t screen;//,screen2;
\r
68 omap_view_t mv;//, mv2;
\r
69 omap_view_t *draw;//, *show, *tmp;
\r
72 //default player position on the viewable map
\r
78 /* create the map */
\r
79 map = allocMap(40,30); //20x15 is the resolution of the screen you can make omapS smaller than 20x15 but the null space needs to be drawn properly
\r
84 /* draw the tiles */
\r
86 omodexEnter(1, 1, &gvar);
\r
87 screen = omodexDefaultPage();
\r
88 screen.width += (TILEWH*2);
\r
90 omapGoTo(&mv, 16, 16);
\r
91 // screen2=omodexNextPage(mv.page);
\r
92 // mv2.page = &screen2;
\r
93 // omapGoTo(&mv2, 16, 16);
\r
94 // omodexShowPage(mv.page);
\r
100 //IN_StartAck (&gvar); while (!IN_CheckAck (&gvar)){ } omodexLeave(); IN_Shutdown(&gvar); exit(0);
\r
102 //TODO: set player position data here according to the viewable map screen thingy
\r
104 while(!gvar.in.inst->Keyboard[sc_Escape]) {
\r
105 //TODO: top left corner & bottem right corner of map veiw be set as map edge trigger since omapS are actually square
\r
106 //to stop scrolling and have the player position data move to the edge of the screen with respect to the direction
\r
107 //when player.tx or player.ty == 0 or player.tx == 20 or player.ty == 15 then stop because that is edge of map and you do not want to walk of the map
\r
108 if(gvar.in.inst->Keyboard[77]){
\r
109 // for(q=0; q<TILEWH; q++) {
\r
110 omapScrollRight(draw, 1);
\r
111 // omodexShowPage(draw->page);
\r
112 // omapScrollRight(draw, 1);
\r
113 // SWAP(draw, show);
\r
117 if(gvar.in.inst->Keyboard[75]){
\r
118 // for(q=0; q<TILEWH; q++) {
\r
119 omapScrollLeft(draw, 1);
\r
120 // omodexShowPage(draw->page);
\r
121 // omapScrollLeft(show, 1);
\r
122 // SWAP(draw, show);
\r
126 if(gvar.in.inst->Keyboard[80]){
\r
127 // for(q=0; q<TILEWH; q++) {
\r
128 omapScrollDown(draw, 1);
\r
129 // omodexShowPage(draw->page);
\r
130 // omapScrollDown(show, 1);
\r
131 // SWAP(draw, show);
\r
135 if(gvar.in.inst->Keyboard[72]){
\r
136 // for(q=0; q<TILEWH; q++) {
\r
137 omapScrollUp(draw, 1);
\r
138 // omodexShowPage(draw->page);
\r
139 // omapScrollUp(show, 1);
\r
140 // SWAP(draw, show);
\r
145 omodexShowPage(draw->page);
\r
152 IN_Shutdown(&gvar);
\r
157 allocMap(int w, int h) {
\r
162 result.data = malloc(sizeof(byte) * w * h);
\r
169 oinitMap(omap_t *map) {
\r
170 /* just a place holder to fill out an alternating pattern */
\r
174 map->tiles = malloc(sizeof(otiles_t));
\r
176 /* create the tile set */
\r
177 map->tiles->data = malloc(sizeof(bitmap_t));
\r
178 map->tiles->data->width = (TILEWH*2);
\r
179 map->tiles->data->height= TILEWH;
\r
180 map->tiles->data->data = malloc((TILEWH*2)*TILEWH);
\r
181 map->tiles->tileHeight = TILEWH;
\r
182 map->tiles->tileWidth =TILEWH;
\r
183 map->tiles->rows = 1;
\r
184 map->tiles->cols = 2;
\r
187 for(y=0; y<TILEWH; y++) {
\r
188 for(x=0; x<(TILEWH*2); x++) {
\r
190 map->tiles->data->data[i] = 0x24;
\r
192 map->tiles->data->data[i] = 0x34;
\r
198 for(y=0; y<map->height; y++) {
\r
199 for(x=0; x<map->width; x++) {
\r
200 map->data[i] = tile;
\r
201 tile = tile ? 0 : 1;
\r
204 tile = tile ? 0 : 1;
\r
210 omapScrollRight(omap_view_t *mv, byte offset) {
\r
211 word x;//, y; /* coordinate for drawing */
\r
213 /* increment the pixel position and update the page */
\r
214 mv->page->dx += offset;
\r
216 /* check to see if this changes the tile */
\r
217 if(mv->page->dx >= mv->dxThresh ) {
\r
218 /* go forward one tile */
\r
220 /* Snap the origin forward */
\r
221 mv->page->data += 4;
\r
222 mv->page->dx = mv->map->tiles->tileWidth;
\r
225 /* draw the next column */
\r
226 x= SCREEN_WIDTH + mv->map->tiles->tileWidth;
\r
227 omapDrawCol(mv, mv->tx + 20 , mv->ty-1, x);
\r
233 omapScrollLeft(omap_view_t *mv, byte offset) {
\r
234 //word x, y; /* coordinate for drawing */
\r
236 /* increment the pixel position and update the page */
\r
237 mv->page->dx -= offset;
\r
239 /* check to see if this changes the tile */
\r
240 if(mv->page->dx == 0) {
\r
241 /* go backward one tile */
\r
244 /* Snap the origin backward */
\r
245 mv->page->data -= 4;
\r
246 mv->page->dx = mv->map->tiles->tileWidth;
\r
248 /* draw the next column */
\r
249 omapDrawCol(mv, mv->tx-1, mv->ty-1, 0);
\r
255 omapScrollUp(omap_view_t *mv, byte offset) {
\r
256 word /*x,*/ y; /* coordinate for drawing */
\r
258 /* increment the pixel position and update the page */
\r
259 mv->page->dy -= offset;
\r
261 /* check to see if this changes the tile */
\r
262 if(mv->page->dy == 0 ) {
\r
263 /* go down one tile */
\r
265 /* Snap the origin downward */
\r
266 mv->page->data -= mv->page->width*4;
\r
267 mv->page->dy = mv->map->tiles->tileHeight;
\r
270 /* draw the next row */
\r
272 omapDrawRow(mv, mv->tx-1 , mv->ty-1, y);
\r
278 omapScrollDown(omap_view_t *mv, byte offset) {
\r
279 word /*x,*/ y; /* coordinate for drawing */
\r
281 /* increment the pixel position and update the page */
\r
282 mv->page->dy += offset;
\r
284 /* check to see if this changes the tile */
\r
285 if(mv->page->dy >= mv->dyThresh ) {
\r
286 /* go down one tile */
\r
288 /* Snap the origin downward */
\r
289 mv->page->data += mv->page->width*4;
\r
290 mv->page->dy = mv->map->tiles->tileHeight;
\r
293 /* draw the next row */
\r
294 y= SCREEN_HEIGHT + mv->map->tiles->tileHeight;
\r
295 omapDrawRow(mv, mv->tx-1 , mv->ty+15, y);
\r
302 omapGoTo(omap_view_t *mv, int tx, int ty) {
\r
306 /* set up the coordinates */
\r
309 mv->page->dx = mv->map->tiles->tileWidth;
\r
310 mv->page->dy = mv->map->tiles->tileHeight;
\r
312 /* set up the thresholds */
\r
313 mv->dxThresh = mv->map->tiles->tileWidth * 2;
\r
314 mv->dyThresh = mv->map->tiles->tileHeight * 2;
\r
316 /* draw the tiles */
\r
317 omodexClearRegion(mv->page, 0, 0, mv->page->width, mv->page->height, 0);
\r
319 i=mv->ty * mv->map->width + mv->tx;
\r
320 for(ty=mv->ty-1; py < SCREEN_HEIGHT+mv->dyThresh && ty < mv->map->height; ty++, py+=mv->map->tiles->tileHeight) {
\r
321 omapDrawRow(mv, tx-1, ty, py);
\r
322 i+=mv->map->width - tx;
\r
328 omapDrawTile(otiles_t *t, word i, opage_t *page, word x, word y) {
\r
331 rx = (i % t->cols) * t->tileWidth;
\r
332 ry = (i / t->cols) * t->tileHeight;
\r
333 omodexDrawBmpRegion(page, x, y, rx, ry, t->tileWidth, t->tileHeight, t->data);
\r
338 omapDrawRow(omap_view_t *mv, int tx, int ty, word y) {
\r
342 /* the position within the map array */
\r
343 i=ty * mv->map->width + tx;
\r
344 for(x=0; x<SCREEN_WIDTH+mv->dxThresh && tx < mv->map->width; x+=mv->map->tiles->tileWidth, tx++) {
\r
346 /* we are in the map, so copy! */
\r
347 omapDrawTile(mv->map->tiles, mv->map->data[i], mv->page, x, y);
\r
355 omapDrawCol(omap_view_t *mv, int tx, int ty, word x) {
\r
359 /* location in the map array */
\r
360 i=ty * mv->map->width + tx;
\r
362 /* We'll copy all of the columns in the screen,
\r
363 i + 1 row above and one below */
\r
364 for(y=0; y<SCREEN_HEIGHT+mv->dyThresh && ty < mv->map->height; y+=mv->map->tiles->tileHeight, ty++) {
\r
366 /* we are in the map, so copy away! */
\r
367 omapDrawTile(mv->map->tiles, mv->map->data[i], mv->page, x, y);
\r
369 i += mv->map->width;
\r