- player.tx = bg->tx + 10;
- player.ty = bg->ty + 8;
- player.x = player.tx*TILEWH;
- player.y = player.ty*TILEWH;
- player.triggerx = player.tx;
- player.triggery = player.ty+1;
- //TODO: erase player initial draw
- modexDrawSpriteRegion(spri->page, player.x-4, player.y-TILEWH, 24, 64, 24, 32, &ptmp);
- //temp draw trigger box
- modexClearRegion(spri->page, player.triggerx*16, player.triggery*16, 16, 16, 1);
- modexClearRegion(bg->page, player.triggerx*16, player.triggery*16, 16, 16, 1);
- modexShowPage(spri->page);
- while(!keyp(1))
- {
- //top left corner & bottem right corner of map veiw be set as map edge trigger since maps are actually square
- //to stop scrolling and have the player position data move to the edge of the screen with respect to the direction
- //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
-
- if(keyp(72) && !keyp(80) && player.q == 1) player.d = 1;
- if(keyp(77) && !keyp(75) && player.q == 1) player.d = 2;
- if(keyp(80) && !keyp(72) && player.q == 1) player.d = 3;
- if(keyp(75) && !keyp(77) && player.q == 1) player.d = 4;
- //if(player.d>0) player.q=1;
-
- #define INC_PER_FRAME if(player.q&1) persist_aniframe++; if(persist_aniframe>4) persist_aniframe = 1;
-
- if(player.d == 2)
- {
- if(bg->tx >= 0 && bg->tx+20 < MAPX && player.tx == bg->tx + 10 && !(player.tx+1 == TRIGGX && player.ty == TRIGGY))
- {
- //for(q=1; q<=(TILEWH/SPEED); q++)
- if(player.q<=(TILEWH/SPEED))
- {
- INC_PER_FRAME;
- //animatePlayer(bg, spri, mask, 1, 1, player.x, player.y, persist_aniframe, q, &ptmp);
- animatePlayer(bg, spri, 1, 1, player.x, player.y, persist_aniframe, player.q, &ptmp);
- mapScrollRight(bg, SPEED);
- mapScrollRight(spri, SPEED);
- //mapScrollRight(mask, SPEED);
- modexShowPage(spri->page);
- player.q++;
- } else { player.q = 1; player.d = 0; player.tx++; }
- }
- else if(player.tx < MAPX && !(player.tx+1 == TRIGGX && player.ty == TRIGGY))
- {
- //for(q=1; q<=(TILEWH/SPEED); q++)
- if(player.q<=(TILEWH/SPEED))
- {
- INC_PER_FRAME;
- player.x+=SPEED;
- //animatePlayer(bg, spri, mask, 1, 0, player.x, player.y, persist_aniframe, q, &ptmp);
- animatePlayer(bg, spri, 1, 0, player.x, player.y, persist_aniframe, player.q, &ptmp);
- modexShowPage(spri->page);
- player.q++;
- } else { player.q = 1; player.d = 0; player.tx++; }
- }
- else
- {
- modexCopyPageRegion(spri->page, bg->page, player.x-4, player.y-TILEWH, player.x-4, player.y-TILEWH, 24, 32);
- modexDrawSpriteRegion(spri->page, player.x-4, player.y-TILEWH, 24, 32, 24, 32, &ptmp);
- modexShowPage(spri->page);
- }
- player.triggerx = player.tx+1;
- player.triggery = player.ty;
- }
-
- if(player.d == 4)
- {
- if(bg->tx > 0 && bg->tx+20 <= MAPX && player.tx == bg->tx + 10 && !(player.tx-1 == TRIGGX && player.ty == TRIGGY))
- {
- //for(q=1; q<=(TILEWH/SPEED); q++)
- if(player.q<=(TILEWH/SPEED))
- {
- INC_PER_FRAME;
- //animatePlayer(bg, spri, mask, 3, 1, player.x, player.y, persist_aniframe, q, &ptmp);
- animatePlayer(bg, spri, 3, 1, player.x, player.y, persist_aniframe, player.q, &ptmp);
- mapScrollLeft(bg, SPEED);
- mapScrollLeft(spri, SPEED);
- //mapScrollLeft(mask, SPEED);
- modexShowPage(spri->page);
- player.q++;
- } else { player.q = 1; player.d = 0; player.tx--; }
- }
- else if(player.tx > 1 && !(player.tx-1 == TRIGGX && player.ty == TRIGGY))
- {
- //for(q=1; q<=(TILEWH/SPEED); q++)
- if(player.q<=(TILEWH/SPEED))
- {
- INC_PER_FRAME;
- player.x-=SPEED;
- //animatePlayer(bg, spri, mask, 3, 0, player.x, player.y, persist_aniframe, q, &ptmp);
- animatePlayer(bg, spri, 3, 0, player.x, player.y, persist_aniframe, player.q, &ptmp);
- modexShowPage(spri->page);
- player.q++;
- } else { player.q = 1; player.d = 0; player.tx--; }
- }
- else
- {
- modexCopyPageRegion(spri->page, bg->page, player.x-4, player.y-TILEWH, player.x-4, player.y-TILEWH, 24, 32);
- modexDrawSpriteRegion(spri->page, player.x-4, player.y-TILEWH, 24, 96, 24, 32, &ptmp);
- modexShowPage(spri->page);
- }
- player.triggerx = player.tx-1;
- player.triggery = player.ty;
- }
-
- if(player.d == 3)
- {
- if(bg->ty >= 0 && bg->ty+15 < MAPY && player.ty == bg->ty + 8 && !(player.tx == TRIGGX && player.ty+1 == TRIGGY))
- {
- //for(q=1; q<=(TILEWH/SPEED); q++)
- if(player.q<=(TILEWH/SPEED))
- {
- INC_PER_FRAME;
- //animatePlayer(bg, spri, mask, 2, 1, player.x, player.y, persist_aniframe, q, &ptmp);
- animatePlayer(bg, spri, 2, 1, player.x, player.y, persist_aniframe, player.q, &ptmp);
- mapScrollDown(bg, SPEED);
- mapScrollDown(spri, SPEED);
- //mapScrollDown(mask, SPEED);
- modexShowPage(spri->page);
- player.q++;
- } else { player.q = 1; player.d = 0; player.ty++; }
- }
- else if(player.ty < MAPY && !(player.tx == TRIGGX && player.ty+1 == TRIGGY))
- {
- //for(q=1; q<=(TILEWH/SPEED); q++)
- if(player.q<=(TILEWH/SPEED))
- {
- INC_PER_FRAME;
- player.y+=SPEED;
- //animatePlayer(bg, spri, mask, 2, 0, player.x, player.y, persist_aniframe, q, &ptmp);
- animatePlayer(bg, spri, 2, 0, player.x, player.y, persist_aniframe, player.q, &ptmp);
- modexShowPage(spri->page);
- player.q++;
- } else { player.q = 1; player.d = 0; player.ty++; }
- }
- else
- {
- modexCopyPageRegion(spri->page, bg->page, player.x-4, player.y-TILEWH, player.x-4, player.y-TILEWH, 24, 32);
- modexDrawSpriteRegion(spri->page, player.x-4, player.y-TILEWH, 24, 64, 24, 32, &ptmp);
- modexShowPage(spri->page);
- }
- player.triggerx = player.tx;
- player.triggery = player.ty+1;
- }
-
- if(player.d == 1)
- {
- if(bg->ty > 0 && bg->ty+15 <= MAPY && player.ty == bg->ty + 8 && !(player.tx == TRIGGX && player.ty-1 == TRIGGY))
- {
- //for(q=1; q<=(TILEWH/SPEED); q++)
- if(player.q<=(TILEWH/SPEED))
- {
- INC_PER_FRAME;
- //animatePlayer(bg, spri, mask, 0, 1, player.x, player.y, persist_aniframe, q, &ptmp);
- animatePlayer(bg, spri, 0, 1, player.x, player.y, persist_aniframe, player.q, &ptmp);
- mapScrollUp(bg, SPEED);
- mapScrollUp(spri, SPEED);
- //mapScrollUp(mask, SPEED);
- modexShowPage(spri->page);
- player.q++;
- } else { player.q = 1; player.d = 0; player.ty--; }
- }
- else if(player.ty > 1 && !(player.tx == TRIGGX && player.ty-1 == TRIGGY))
- {
- //for(q=1; q<=(TILEWH/SPEED); q++)
- if(player.q<=(TILEWH/SPEED))
- {
- INC_PER_FRAME;
- player.y-=SPEED;
- //animatePlayer(bg, spri, mask, 0, 0, player.x, player.y, persist_aniframe, q, &ptmp);
- modexShowPage(spri->page);
- animatePlayer(bg, spri, 0, 0, player.x, player.y, persist_aniframe, player.q, &ptmp);
- player.q++;
- } else { player.q = 1; player.d = 0; player.ty--; }
- }
- else
- {
- modexCopyPageRegion(spri->page, bg->page, player.x-4, player.y-TILEWH, player.x-4, player.y-TILEWH, 24, 32);
- modexDrawSpriteRegion(spri->page, player.x-4, player.y-TILEWH, 24, 0, 24, 32, &ptmp);
- modexShowPage(spri->page);
- }
- player.triggerx = player.tx;
- player.triggery = player.ty-1;
- }
- //modexClearRegion(mask->page, 66, 66, 2, 40, 0);
-
- if((player.triggerx == TRIGGX && player.triggery == TRIGGY) && keyp(KEY_ENTER))
- {
- short i;
- for(i=600; i>=400; i--)
- {
- sound(i);
- }
- nosound();
- }
- }
-
+ player.tx = bg->tx + 10;\r
+ player.ty = bg->ty + 8;\r
+ player.x = player.tx*TILEWH;\r
+ player.y = player.ty*TILEWH;\r
+ player.triggerx = player.tx;\r
+ player.triggery = player.ty+1;\r
+ player.q=0;\r
+ player.d=0;\r
+ modexDrawSpriteRegion(spri->page, player.x-4, player.y-TILEWH, 24, 64, 24, 32, &ptmp);\r
+\r
+ modexClearRegion(spri->page, player.triggerx*16, player.triggery*16, 16, 16, 1);\r
+ modexClearRegion(bg->page, player.triggerx*16, player.triggery*16, 16, 16, 1);\r
+ modexShowPage(spri->page);\r
+ while(!keyp(1))\r
+ {\r
+ //top left corner & bottem right corner of map veiw be set as map edge trigger since maps are actually square\r
+ //to stop scrolling and have the player position data move to the edge of the screen with respect to the direction\r
+ //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
+\r
+\r
+ //TODO: make this better like rpg maker 2000 better\r
+ if(player.q <= 1)\r
+ {\r
+ dpad(&player);
+ if(player.d>0) dpad(&player);
+ if(player.q<1) player.q++;\r
+ }\r
+\r
+ #define INC_PER_FRAME if(player.q&1) persist_aniframe++; if(persist_aniframe>4) persist_aniframe = 1;\r
+\r
+ if(player.d == 2)\r
+ {\r
+ if(bg->tx >= 0 && bg->tx+20 < MAPX && player.tx == bg->tx + 10 && !(player.tx+1 == TRIGGX && player.ty == TRIGGY))\r
+ {\r
+ if(player.q<=(TILEWH/SPEED))\r
+ {\r
+ INC_PER_FRAME;\r
+ //animatePlayer(bg, spri, mask, 1, 1, player.x, player.y, persist_aniframe, q, &ptmp);\r
+ animatePlayer(bg, spri, 1, 1, player.x, player.y, persist_aniframe, player.q, &ptmp);\r
+ mapScrollRight(bg, SPEED);\r
+ mapScrollRight(spri, SPEED);\r
+ //mapScrollRight(mask, SPEED);\r
+ modexShowPage(spri->page);\r
+ player.q++;\r
+ } else { player.q = 0; player.d = 0; player.tx++; }\r
+ }\r
+ else if(player.tx < MAPX && !(player.tx+1 == TRIGGX && player.ty == TRIGGY))\r
+ {\r
+ if(player.q<=(TILEWH/SPEED))\r
+ {\r
+ INC_PER_FRAME;\r
+ player.x+=SPEED;\r
+ //animatePlayer(bg, spri, mask, 1, 0, player.x, player.y, persist_aniframe, q, &ptmp);\r
+ animatePlayer(bg, spri, 1, 0, player.x, player.y, persist_aniframe, player.q, &ptmp);\r
+ modexShowPage(spri->page);\r
+ player.q++;\r
+ } else { player.q = 0; player.d = 0; player.tx++; }\r
+ }\r
+ else\r
+ {\r
+ modexCopyPageRegion(spri->page, bg->page, player.x-4, player.y-TILEWH, player.x-4, player.y-TILEWH, 24, 32);\r
+ modexDrawSpriteRegion(spri->page, player.x-4, player.y-TILEWH, 24, 32, 24, 32, &ptmp);\r
+ modexShowPage(spri->page);\r
+ player.d = 0;\r
+ }\r
+ player.triggerx = player.tx+1;\r
+ player.triggery = player.ty;\r
+ }\r
+\r
+ if(player.d == 4)\r
+ {\r
+ if(bg->tx > 0 && bg->tx+20 <= MAPX && player.tx == bg->tx + 10 && !(player.tx-1 == TRIGGX && player.ty == TRIGGY))\r
+ {\r
+ if(player.q<=(TILEWH/SPEED))\r
+ {\r
+ INC_PER_FRAME;\r
+ //animatePlayer(bg, spri, mask, 3, 1, player.x, player.y, persist_aniframe, q, &ptmp);\r
+ animatePlayer(bg, spri, 3, 1, player.x, player.y, persist_aniframe, player.q, &ptmp);\r
+ mapScrollLeft(bg, SPEED);\r
+ mapScrollLeft(spri, SPEED);\r
+ //mapScrollLeft(mask, SPEED);\r
+ modexShowPage(spri->page);\r
+ player.q++;\r
+ } else { player.q = 0; player.d = 0; player.tx--; }\r
+ }\r
+ else if(player.tx > 1 && !(player.tx-1 == TRIGGX && player.ty == TRIGGY))\r
+ {\r
+ if(player.q<=(TILEWH/SPEED))\r
+ {\r
+ INC_PER_FRAME;\r
+ player.x-=SPEED;\r
+ //animatePlayer(bg, spri, mask, 3, 0, player.x, player.y, persist_aniframe, q, &ptmp);\r
+ animatePlayer(bg, spri, 3, 0, player.x, player.y, persist_aniframe, player.q, &ptmp);\r
+ modexShowPage(spri->page);\r
+ player.q++;\r
+ } else { player.q = 0; player.d = 0; player.tx--; }\r
+ }\r
+ else\r
+ {\r
+ modexCopyPageRegion(spri->page, bg->page, player.x-4, player.y-TILEWH, player.x-4, player.y-TILEWH, 24, 32);\r
+ modexDrawSpriteRegion(spri->page, player.x-4, player.y-TILEWH, 24, 96, 24, 32, &ptmp);\r
+ modexShowPage(spri->page);\r
+ player.d = 0;\r
+ }\r
+ player.triggerx = player.tx-1;\r
+ player.triggery = player.ty;\r
+ }\r
+\r
+ if(player.d == 3)\r
+ {\r
+ if(bg->ty >= 0 && bg->ty+15 < MAPY && player.ty == bg->ty + 8 && !(player.tx == TRIGGX && player.ty+1 == TRIGGY))\r
+ {\r
+ if(player.q<=(TILEWH/SPEED))\r
+ {\r
+ INC_PER_FRAME;\r
+ //animatePlayer(bg, spri, mask, 2, 1, player.x, player.y, persist_aniframe, q, &ptmp);\r
+ animatePlayer(bg, spri, 2, 1, player.x, player.y, persist_aniframe, player.q, &ptmp);\r
+ mapScrollDown(bg, SPEED);\r
+ mapScrollDown(spri, SPEED);\r
+ //mapScrollDown(mask, SPEED);\r
+ modexShowPage(spri->page);\r
+ player.q++;\r
+ } else { player.q = 0; player.d = 0; player.ty++; }\r
+ }\r
+ else if(player.ty < MAPY && !(player.tx == TRIGGX && player.ty+1 == TRIGGY))\r
+ {\r
+ if(player.q<=(TILEWH/SPEED))\r
+ {\r
+ INC_PER_FRAME;\r
+ player.y+=SPEED;\r
+ //animatePlayer(bg, spri, mask, 2, 0, player.x, player.y, persist_aniframe, q, &ptmp);\r
+ animatePlayer(bg, spri, 2, 0, player.x, player.y, persist_aniframe, player.q, &ptmp);\r
+ modexShowPage(spri->page);\r
+ player.q++;\r
+ } else { player.q = 0; player.d = 0; player.ty++; }\r
+ }\r
+ else\r
+ {\r
+ modexCopyPageRegion(spri->page, bg->page, player.x-4, player.y-TILEWH, player.x-4, player.y-TILEWH, 24, 32);\r
+ modexDrawSpriteRegion(spri->page, player.x-4, player.y-TILEWH, 24, 64, 24, 32, &ptmp);\r
+ modexShowPage(spri->page);\r
+ player.d = 0;\r
+ }\r
+ player.triggerx = player.tx;\r
+ player.triggery = player.ty+1;\r
+ }\r
+\r
+ if(player.d == 1)\r
+ {\r
+ if(bg->ty > 0 && bg->ty+15 <= MAPY && player.ty == bg->ty + 8 && !(player.tx == TRIGGX && player.ty-1 == TRIGGY))\r
+ {\r
+ if(player.q<=(TILEWH/SPEED))\r
+ {\r
+ INC_PER_FRAME;\r
+ //animatePlayer(bg, spri, mask, 0, 1, player.x, player.y, persist_aniframe, q, &ptmp);\r
+ animatePlayer(bg, spri, 0, 1, player.x, player.y, persist_aniframe, player.q, &ptmp);\r
+ mapScrollUp(bg, SPEED);\r
+ mapScrollUp(spri, SPEED);\r
+ //mapScrollUp(mask, SPEED);\r
+ modexShowPage(spri->page);\r
+ player.q++;\r
+ } else { player.q = 0; player.d = 0; player.ty--; }\r
+ }\r
+ else if(player.ty > 1 && !(player.tx == TRIGGX && player.ty-1 == TRIGGY))\r
+ {\r
+ if(player.q<=(TILEWH/SPEED))\r
+ {\r
+ INC_PER_FRAME;\r
+ player.y-=SPEED;\r
+ //animatePlayer(bg, spri, mask, 0, 0, player.x, player.y, persist_aniframe, q, &ptmp);\r
+ modexShowPage(spri->page);\r
+ animatePlayer(bg, spri, 0, 0, player.x, player.y, persist_aniframe, player.q, &ptmp);\r
+ player.q++;\r
+ } else { player.q = 0; player.d = 0; player.ty--; }\r
+ }\r
+ else\r
+ {\r
+ modexCopyPageRegion(spri->page, bg->page, player.x-4, player.y-TILEWH, player.x-4, player.y-TILEWH, 24, 32);\r
+ modexDrawSpriteRegion(spri->page, player.x-4, player.y-TILEWH, 24, 0, 24, 32, &ptmp);\r
+ modexShowPage(spri->page);\r
+ player.d = 0;\r
+ }\r
+ player.triggerx = player.tx;\r
+ player.triggery = player.ty-1;\r
+ }\r
+ //modexClearRegion(mask->page, 66, 66, 2, 40, 0);\r
+\r
+ if((player.triggerx == TRIGGX && player.triggery == TRIGGY) && keyp(KEY_ENTER))\r
+ {\r
+ short i;\r
+ for(i=600; i>=400; i--)\r
+ {\r
+ sound(i);\r
+ }\r
+ nosound();\r
+ }\r
+ }\r
+\r