Builder/src/main.c

848 lines
24 KiB
C

# include <gint/display.h>
# include <gint/keyboard.h>
# include <stdlib.h>
# include <time.h>
# include <string.h>
# include <gint/clock.h>
# include "msg_fr.h"
# include "itemsizes.h"
# include "gamesettings.h"
# include "worldgen.h"
# include "itoa.h"
# define ERROR(error, errorcode) dclear(C_WHITE); \
dprint(1, 1, C_BLACK, "ERROR"); \
dprint(1, 6, C_BLACK, "LINE : %d", __LINE__); \
dprint(1, 12, C_BLACK, "FILE : %d", __FILE__); \
dprint(1, 18, C_BLACK, "ERROR NUM : %d", errorcode); \
dprint(1, 24, C_BLACK, "%c", error); \
dupdate(); \
getkey(); \
return errorcode;
extern bopti_image_t title_img;
extern bopti_image_t soil_tile;
extern bopti_image_t grass_tile;
extern bopti_image_t stone_tile;
extern bopti_image_t coal_tile;
extern bopti_image_t steel_tile;
extern bopti_image_t wood_tile;
extern bopti_image_t woodplanks_tile;
extern bopti_image_t woodsteps_1_tile;
extern bopti_image_t woodsteps_2_tile;
extern bopti_image_t woodstick_tile;
extern bopti_image_t fire_tile;
extern bopti_image_t skin1_player_left1;
extern bopti_image_t skin1_player_left2;
extern bopti_image_t skin1_player_right1;
extern bopti_image_t skin1_player_right2;
extern bopti_image_t select_tool;
extern bopti_image_t pickaxe_tool;
extern bopti_image_t invnormal;
extern bopti_image_t invselected;
extern bopti_image_t craftselection;
extern bopti_image_t arrow_1;
extern bopti_image_t arrow_2;
extern bopti_image_t overlay_break_1;
extern bopti_image_t overlay_break_2;
extern bopti_image_t overlay_break_3;
extern bopti_image_t overlay_break_4;
extern font_t microfont;
# include "objects.h"
//int x, y, pos, hour, animation, orient, timing, falling, jumping, jumpheight;
int pos, hour;
char tmp_char[2];
Player player;
Crafting crafting;
Tool hand;
Tool wood_pickaxe;
Destroy destroy;
const int canbeplaced_lenght = 7;
const int canbeplaced[7] = {1, 2, 3, 4, 5, 6, 8};
const int hasmenu_lenght = 1;
const int hasmenu[1] = {8};
void drawtile(int x, int y, int tilenum) {
switch(tilenum){
case 1:
dimage(x, y, &soil_tile); break;
case 2:
dimage(x, y, &stone_tile); break;
case 3:
dimage(x, y, &coal_tile); break;
case 4:
dimage(x, y, &steel_tile); break;
case 5:
dimage(x, y, &wood_tile); break;
case 6:
dimage(x, y, &woodplanks_tile); break;
case 7:
dimage(x, y, &pickaxe_tool); break;
case 8:
dimage(x, y, &fire_tile); break;
}
}
void drawoverlay() {
/*
Calculation details :
x = x - 60
y = y - 24
ftx = x>>3
fty = y>>3
sx = ftx*8-x
sy = fty*8-y
rx = sx+(tx-ftx)*8
ry = sy+(ty-fty)*8
*/
int rx = (((player.x-60)>>3)*8-(player.x-60))+(player.select_tx-((player.x-60)>>3))*8;
int ry = (((player.y-24)>>3)*8-(player.y-24))+(player.select_ty-((player.y-24)>>3))*8;
switch(player.overlayframe){
case 1:
dimage(rx, ry, &overlay_break_1);break;
case 2:
dimage(rx, ry, &overlay_break_2);break;
case 3:
dimage(rx, ry, &overlay_break_3);break;
case 4:
dimage(rx, ry, &overlay_break_4);break;
}
}
void drawselectedgame(int selected) {
dclear(C_WHITE);
// dimage(16, 8, &title_img);
for(int i=0;i!=GAMESNUM;i++){
dtext(1, WORLDSEL_MARGIN + i*(LINEHEIGHT), C_BLACK, WORLDSEL_EMPTY);
}
drect(1, WORLDSEL_MARGIN+selected*(LINEHEIGHT)-(int)(LINEPADDING/2), 128, WORLDSEL_MARGIN+(selected+1)*(LINEHEIGHT)-(int)(LINEPADDING/2), C_INVERT);
dupdate();
}
void addtree(int pos, unsigned short int * terrain, int n){
int i;
srand(clock());
for(i=pos-rand()%6;i!=pos;i++){
terrain[i*WORLD_WIDTH+(n>>3)] = 5;
}
}
void addtrees(unsigned short int * terrain){
int n, i;
for(n=0;n!=WORLD_WIDTH;n++){
if(rand()%11 == 1){
for(i=0;i!=WORLD_HEIGHT;i++){
if(terrain[i*WORLD_WIDTH+(n>>3)] != 0){
pos = i;
break;
}
}
if(n != (player.x>>3)){
addtree(pos, terrain, n);
}
}
}
}
void mappartdisplaying(int x, int y, unsigned short int * terrain, int player) {
x = x-60;
y = y-24;
int firsttile_x = x>>3, firsttile_y = y>>3;
int base_x = firsttile_x*8, base_y = firsttile_y*8;
int sx = base_x - x, sy = base_y - y, tx = (SCREEN_WIDTH>>3) + 1, ty = (SCREEN_HEIGHT>>3) + 1;
int cx, cy, px = sx, py = sy;
unsigned short type, type_over;
dclear(C_WHITE);
for(cy = 0;cy != ty;cy++){
for(cx = 0;cx != tx;cx++){
type = terrain[(firsttile_y+cy)*WORLD_WIDTH+(firsttile_x+cx)];
type_over = terrain[(firsttile_y+cy-1)*WORLD_WIDTH+(firsttile_x+cx)];
switch(type){
case 1:
if(type_over == 0){dimage(px, py, &grass_tile);}else{dimage(px, py, &soil_tile);} break;
case 2:
dimage(px, py, &stone_tile); break;
case 3:
dimage(px, py, &coal_tile); break;
case 4:
dimage(px, py, &steel_tile); break;
case 5:
dimage(px, py, &wood_tile); break;
case 6:
dimage(px, py, &woodplanks_tile); break;
case 8:
dimage(px, py, &fire_tile); break;
}
px += 8;
}
py += 8;
px = sx;
}
switch(player){
case 2:
dimage(60, 24, &skin1_player_right2); break;
case 3:
dimage(60, 24, &skin1_player_left1); break;
case 4:
dimage(60, 24, &skin1_player_left2); break;
default:
dimage(60, 24, &skin1_player_right1); break;
}
}
int exists(unsigned short int * terrain, short type) {
int i;
for(i=0;i!=WORLD_WIDTH*WORLD_HEIGHT;i++){
if(terrain[i]==type){
return 1;
}
}
return 0;
}
int pointoverrectangle(int rx1, int ry1, int rx2, int ry2, int x, int y){
if ((x>=rx1 && y>=ry1) && (x<=rx2 && y<=ry2)){
return 1;
}
return 0;
}
int collisiononmap(int x, int y, unsigned short int * terrain, int testx, int testy) {
x = x-60;
y = y-24;
int firsttile_x = x>>3, firsttile_y = y>>3;
int base_x = firsttile_x*8, base_y = firsttile_y*8;
int sx = base_x - x, sy = base_y - y, tx = (SCREEN_WIDTH>>3) + 1, ty = (SCREEN_HEIGHT>>3) + 1;
int cx, cy, px = sx, py = sy;
unsigned short type;
dclear(C_WHITE);
for(cy = 0;cy != ty;cy++){
for(cx = 0;cx != tx;cx++){
type = terrain[(firsttile_y+cy)*WORLD_WIDTH+(firsttile_x+cx)];
if(type != 0){
if(pointoverrectangle(px, py, px+8, py+8, testx, testy)){
return 1;
}
}
px += 8;
}
py += 8;
px = sx;
}
return 0;
}
void drawinventory(){
int i;
for(i=0;i!=5;i++){
if(i == player.invselect){
dimage(26+i*15, 49, &invselected);
}else{
dimage(26+i*15, 49, &invnormal);
}
drawtile(26+i*15+3, 52, player.inventoryitems[i]);
}
}
void drawdetailinv(){
int i;
dtext(1, 1, C_BLACK, INV_INFO);
for(i=0;i!=INVENTORY_SIZE;i++){
pos = i*8+16;
drawtile(5, pos, player.inventoryitems[i]);
itoa(player.inventorynum[i], tmp_char);
dtext(20, pos, C_BLACK, tmp_char);
if(i == player.invselect){
dtext(60, pos, C_BLACK, SELECTED);
}
if(i == player.invmoving){
dtext(66, pos, C_BLACK, MOVING);
}
}
}
void drawcrafting(){
int i;
dfont(&microfont);
dimage(32, 0, &craftselection);
dimage(4, 28, &arrow_2);
dimage(116, 28, &arrow_1);
drawtile(36, 28, craftingitem[crafting.selected]);
dtext(36, 38, C_BLACK, MULTIPLY);
itoa(craftingnum[crafting.selected], tmp_char);
dtext(36, 44, C_BLACK, tmp_char);
pos = 4;
for(i=crafting.selected*CRAFTSIZE;i!=(crafting.selected+1)*CRAFTSIZE;i++){
if(craftingsnum[i]!=0){
switch(craftingsitems[i]){
case 1:
dtext(58, pos, C_BLACK, SOIL_TILE); break;
case 2:
dtext(58, pos, C_BLACK, STONE_TILE); break;
case 3:
dtext(58, pos, C_BLACK, COAL_TILE); break;
case 4:
dtext(58, pos, C_BLACK, STEEL_TILE); break;
case 5:
dtext(58, pos, C_BLACK, WOOD_TILE); break;
case 6:
dtext(58, pos, C_BLACK, WOODPLANKS_TILE); break;
case 7:
dtext(58, pos, C_BLACK, WOODPICKAXE_TILE); break;
case 8:
dtext(58, pos, C_BLACK, FIRE_TILE); break;
}
itoa(craftingsnum[i], tmp_char);
dtext(46, pos, C_BLACK, tmp_char);
dtext(52, pos, C_BLACK, MULTIPLY);
pos+=6;
}
}
dfont(dfont_default());
}
void drawdestroy() {
int i;
dtext(1, 1, C_BLACK, DESTROY_INFO);
for(i=0;i!=INVENTORY_SIZE;i++){
pos = i*8+16;
drawtile(5, pos, player.inventoryitems[i]);
itoa(player.inventorynum[i], tmp_char);
dtext(20, pos, C_BLACK, tmp_char);
if(i == destroy.selected){
dtext(60, pos, C_BLACK, SELECTED);
}
}
}
bool is_in(int item, int* array, int len){
for(int i=0;i!=len;i++){
if(array[i] == item){
return 1;
}
}
return 0;
}
int main(void) {
// Tools //
// Hand
hand.easy_lenght = 1;
hand.middle_lenght = 1;
hand.hard_lenght = 1;
hand.very_hard_lenght = 2;
hand.breakable_middle = NULL;
hand.breakable_hard = NULL;
hand.breakable_very_hard = NULL;
hand.breakable_middle = malloc(sizeof(int));
hand.breakable_hard = malloc(sizeof(int));
hand.breakable_very_hard = malloc(hand.very_hard_lenght*sizeof(int));
if(hand.breakable_middle == NULL || hand.breakable_hard == NULL || hand.breakable_very_hard == NULL){
ERROR("Need more ram !", 2)
}
hand.breakable_middle[0] = 1;
hand.breakable_hard[0] = 6;
hand.breakable_very_hard[0] = 5;
hand.breakable_very_hard[1] = 8;
hand.attack = 1;
// Wooden pickaxe
wood_pickaxe.easy_lenght = 1;
wood_pickaxe.middle_lenght = 1;
wood_pickaxe.hard_lenght = 3;
wood_pickaxe.very_hard_lenght = 3;
wood_pickaxe.breakable_middle = NULL;
wood_pickaxe.breakable_hard = NULL;
wood_pickaxe.breakable_very_hard = NULL;
wood_pickaxe.breakable_middle = malloc(sizeof(int));
wood_pickaxe.breakable_hard = malloc(wood_pickaxe.hard_lenght*sizeof(int));
wood_pickaxe.breakable_very_hard = malloc(wood_pickaxe.very_hard_lenght*sizeof(int));
if(wood_pickaxe.breakable_middle == NULL || wood_pickaxe.breakable_hard == NULL || wood_pickaxe.breakable_very_hard == NULL){
ERROR("Need more ram !", 3)
}
wood_pickaxe.breakable_middle[0] = 1;
wood_pickaxe.breakable_hard[0] = 6;
wood_pickaxe.breakable_hard[1] = 2;
wood_pickaxe.breakable_hard[2] = 8;
wood_pickaxe.breakable_very_hard[0] = 5;
wood_pickaxe.breakable_very_hard[1] = 3;
wood_pickaxe.breakable_very_hard[2] = 4;
wood_pickaxe.attack = 2;
///////////
dclear(C_WHITE);
dimage(16, TITLE_IMAGE_MARGIN, &title_img);
dtext(1, TITLE_MARGIN, C_BLACK, TITLE_START);
dupdate();
int key = 0, game = 0, selected = 0, i, n;
unsigned short int* terrain = NULL;
terrain = malloc(WORLD_WIDTH*WORLD_HEIGHT*sizeof(unsigned short int));
if(terrain == NULL){
ERROR("Need more ram !", 0)
}
while(keydown(KEY_EXIT) == 0){
////////// TITLE SCREEN //////////
if(game == 0){
key=getkey().key;
if(key==KEY_EXE){
drawselectedgame(selected);
game = 1;
}
}
////////// GAME CHOOSING SCREEN //////////
else if(game == 1){
key=getkey().key;
if(key==KEY_DOWN){
if(selected<GAMESNUM - 1){
selected++;
}else{
selected = 0;
}
drawselectedgame(selected);
}else if(key==KEY_UP){
if(selected>0){
selected--;
}else{
selected = GAMESNUM - 1;
}
drawselectedgame(selected);
}else if(key==KEY_EXE){
dclear(C_WHITE);
game = 2;
}
}else if(game == 2){
dtext(1, 1, C_BLACK, WORLDGEN_INFO);
dupdate();
for(i=0;i!=WORLD_WIDTH*WORLD_HEIGHT;i++){
terrain[i] = 0;
}
srand(clock());
generateworld(terrain, WORLD_WIDTH, WORLD_HEIGHT, (int)((rand() % ((WORLD_HEIGHT - 50) - (WORLD_HEIGHT - 60) + 1)) + WORLD_HEIGHT - 60), WORLD_HEIGHT - 60, WORLD_HEIGHT - 50, 0, 1);
srand(clock());
generateworld(terrain, WORLD_WIDTH, WORLD_HEIGHT, (int)((rand() % ((WORLD_HEIGHT - 40) - (WORLD_HEIGHT - 50) + 1)) + WORLD_HEIGHT - 50), WORLD_HEIGHT - 50, WORLD_HEIGHT - 40, 3, 2);
srand(clock());
generateworld(terrain, WORLD_WIDTH, WORLD_HEIGHT, (int)((rand() % ((WORLD_HEIGHT - 30) - (WORLD_HEIGHT - 40) + 1)) + WORLD_HEIGHT - 40), WORLD_HEIGHT - 40, WORLD_HEIGHT - 30, 4, 2);
// dtext(1, 1, C_BLACK, "Adding trees");
///// Add trees /////
addtrees(terrain);
/////////////////////
player.x = 0;
/*for(i=0;i!=WORLD_HEIGHT;i++){
if(terrain[i*WORLD_WIDTH+(x>>3)] != 0){
y = i*8-8;
break;
}
} */
player.y = 0;
game = 3;
hour = 0;
player.timing = 0;
player.jumping = 0;
player.jumpheight = 0;
player.falling = 0;
player.overlayframe = 0;
player.overlaytimer = 0;
player.wasdestroyingbefore = 0;
player.destroytime = 3;
player.select_tx = 0;
player.select_ty = 0;
player.invselect = 0;
player.invmoving = 0;
for(i=0;i!=INVENTORY_SIZE;i++){
player.inventoryitems[i] = 0;
player.inventorynum[i] = 0;
}
player.tool = hand;
}else if(game == 3){
clock_t begin = clock();
switch(player.inventoryitems[player.invselect]){
case 7:
player.tool = wood_pickaxe; break;
default:
player.tool = hand; break;
};
player.select_tx = ((player.x+player.selx)>>3);
player.select_ty = ((player.y+player.sely)>>3);
clearevents();
if(keydown(KEY_RIGHT) && (collisiononmap(player.x, player.y, terrain, 67, 35) == 0 && collisiononmap(player.x, player.y, terrain, 67, 25) == 0)){
player.x++;
if(player.animation == 0 && player.timing == 5){
player.animation = 1;
player.timing = 0;
}else if(player.animation == 1 && player.timing == 5){
player.animation = 0;
player.timing = 0;
}
player.timing++;
player.orient = 1;
}else if(keydown(KEY_LEFT) && (collisiononmap(player.x, player.y, terrain, 61, 35) == 0 && collisiononmap(player.x, player.y, terrain, 61, 25) == 0)){
player.x--;
if(player.animation == 0 && player.timing == 5){
player.animation = 1;
player.timing = 0;
}else if(player.animation == 1 && player.timing == 5){
player.animation = 0;
player.timing = 0;
}
player.timing++;
player.orient = 3;
}
if(collisiononmap(player.x, player.y, terrain, 62, 40) == 0 && collisiononmap(player.x, player.y, terrain, 66, 40) == 0 && collisiononmap(player.x, player.y, terrain, 60, 40) == 0 && player.jumping == 0){
player.y++;
player.falling = 1;
}else{
player.falling = 0;
}
/* clearevents();
if(keydown(KEY_UP)){
y--;
}else if(keydown(KEY_DOWN)){
y++;
} */
clearevents();
if(keydown(KEY_SHIFT) && player.jumping == 0 && player.falling == 0 && player.jumpheight == 0){
player.jumping = 1;
player.jumpheight = 1;
}
if(player.jumping == 1 && player.jumpheight == 12){
player.jumping = 0;
player.jumpheight = 0;
}else if(collisiononmap(player.x, player.y, terrain, 62, 23) || collisiononmap(player.x, player.y, terrain, 66, 23) || collisiononmap(player.x, player.y, terrain, 60, 23)){
player.jumping = 0;
player.jumpheight = 0;
}else if(player.jumping == 1){
player.jumpheight++;
player.y--;
}
if(exists(terrain, 5)==0){
addtrees(terrain);
}
if(player.y>>3>WORLD_HEIGHT){
player.y = 0;
}
clearevents();
if (keydown(KEY_8) && player.sely>-8){
player.sely--;
}else if (keydown(KEY_5) && player.sely<24){
player.sely++;
}
clearevents();
if (keydown(KEY_4) && player.selx>-8){
player.selx--;
}else if (keydown(KEY_6) && player.selx<16){
player.selx++;
}
if(((player.x+player.selx)>>3)!=player.select_tx||((player.y+player.sely)>>3)!=player.select_ty){
player.overlayframe = 0;
player.overlaytimer = 0;
player.wasdestroyingbefore = 0;
}
pos = ((player.y+player.sely)>>3)*WORLD_WIDTH+((player.x+player.selx)>>3);
if(pos<=WORLD_WIDTH*WORLD_HEIGHT && pos>=0){
player.is_breakable = 1;
if(is_in(terrain[pos], player.tool.breakable_easy, player.tool.easy_lenght)){
player.destroytime = 4;
}else if(is_in(terrain[pos], player.tool.breakable_middle, player.tool.middle_lenght)){
player.destroytime = 8;
}else if(is_in(terrain[pos], player.tool.breakable_hard, player.tool.hard_lenght)){
player.destroytime = 16;
}else if(is_in(terrain[pos], player.tool.breakable_very_hard, player.tool.very_hard_lenght)){
player.destroytime = 32;
}else{
player.is_breakable = 0;
}
clearevents();
if (keydown(KEY_EXE)){
int placed = 0;
if(terrain[pos] == 0 && player.inventorynum[player.invselect] != 0 && is_in(player.inventoryitems[player.invselect], (int*)canbeplaced, canbeplaced_lenght)){
placed = player.inventoryitems[player.invselect];
terrain[pos] = player.inventoryitems[player.invselect];
player.inventorynum[player.invselect]--;
if(player.inventorynum[player.invselect] == 0) {
player.inventoryitems[player.invselect] = 0;
}
if(is_in(placed, (int*)hasmenu, hasmenu_lenght)){
clearevents();
while(keydown(KEY_EXE)){
clearevents();
}
}
}else if(terrain[pos] == 8){
game = 6;
clearevents();
while(keydown(KEY_EXE)){
clearevents();
}
}
}else if (keydown(KEY_1) && terrain[pos] != 0 && player.is_breakable && player.overlaytimer == player.destroytime && player.overlayframe == 4 && (player.select_tx == player.old_select_tx && player.select_ty == player.old_select_ty)){
for(i=0;i!=INVENTORY_SIZE;i++){
if((terrain[pos] == player.inventoryitems[i] && player.inventorynum[i] < 64 && terrain[pos] != 0) || (player.inventoryitems[i] == 0 && player.inventorynum[i] == 0 && terrain[pos] != 0)) {
player.inventoryitems[i] = terrain[pos];
terrain[pos] = 0;
player.inventorynum[i]++;
break;
}
}
player.overlayframe = 0;
player.overlaytimer = 0;
player.wasdestroyingbefore = 0;
}else if (keydown(KEY_1) && terrain[pos] != 0 && player.is_breakable && (player.select_tx == player.old_select_tx && player.select_ty == player.old_select_ty)){
if(player.overlaytimer == player.destroytime){
player.overlaytimer = 0;
player.overlayframe++;
}
player.overlaytimer++;
if(player.wasdestroyingbefore == 0){
player.wasdestroyingbefore = 1;
}
}else if(player.wasdestroyingbefore == 1 && keydown(KEY_1) == 0){
player.overlayframe = 0;
player.overlaytimer = 0;
player.wasdestroyingbefore = 0;
}
}
clearevents();
if (keydown(KEY_0)){
if(player.invselect<INVENTORY_SIZE-1){
player.invselect++;
}else{
player.invselect = 0;
}
clearevents();
while(keydown(KEY_0)){
clearevents();
}
}
clearevents();
if(keydown(KEY_MENU)){
game = 4;
while(keydown(KEY_MENU)){
clearevents();
}
}
// dtext(1, 1, C_BLACK, "test");
mappartdisplaying(player.x, player.y, terrain, player.orient+player.animation);
if(player.wasdestroyingbefore && (player.select_tx == player.old_select_tx && player.select_ty == player.old_select_ty)){
drawoverlay();
}
dimage(player.selx + 56, player.sely + 20, &select_tool);
drawinventory();
player.old_select_tx = player.select_tx;
player.old_select_ty = player.select_ty;
dupdate();
clock_t end = clock();
double time_spent = (double)(end-begin)/CLOCKS_PER_SEC;
int ms = time_spent*1000;
if(ms < 20){
sleep_ms(20-ms);
}
}else if(game == 4){
dclear(C_WHITE);
drawdetailinv();
dupdate();
clearevents();
if(keydown(KEY_EXE)){
game = 3;
clearevents();
while(keydown(KEY_EXE)){
clearevents();
}
}else if(keydown(KEY_MENU)){
game = 5;
clearevents();
while(keydown(KEY_MENU)){
clearevents();
}
}
clearevents();
if(keydown(KEY_SHIFT)){
player.invmoving = player.invselect;
clearevents();
while(keydown(KEY_SHIFT)){
clearevents();
}
}
clearevents();
if(keydown(KEY_ALPHA)){
if(player.inventorynum[player.invselect] != 64 && (player.inventoryitems[player.invselect] == player.inventoryitems[player.invmoving] || player.inventoryitems[player.invselect] == 0)){
if(player.inventoryitems[player.invselect] == 0){
player.inventoryitems[player.invselect] = player.inventoryitems[player.invmoving];
}
while(player.inventorynum[player.invselect] != 64 && player.inventorynum[player.invmoving] != 0){
player.inventorynum[player.invselect]++;
player.inventorynum[player.invmoving]--;
}
if(player.inventorynum[player.invmoving] == 0){
player.inventoryitems[player.invmoving] = 0;
}
}
clearevents();
while(keydown(KEY_ALPHA)){
clearevents();
}
}
clearevents();
if(keydown(KEY_X2)){
if(player.inventorynum[player.invselect] != 64 && (player.inventoryitems[player.invselect] == player.inventoryitems[player.invmoving] || player.inventoryitems[player.invselect] == 0)){
if(player.inventoryitems[player.invselect] == 0){
player.inventoryitems[player.invselect] = player.inventoryitems[player.invmoving];
}
if(player.inventorynum[player.invselect] != 64 && player.inventorynum[player.invmoving] != 0){
player.inventorynum[player.invselect]++;
player.inventorynum[player.invmoving]--;
}
if(player.inventorynum[player.invmoving] == 0){
player.inventoryitems[player.invmoving] = 0;
}
}
clearevents();
while(keydown(KEY_X2)){
clearevents();
}
}
clearevents();
if (keydown(KEY_0)){
if(player.invselect<INVENTORY_SIZE-1){
player.invselect++;
}else{
player.invselect = 0;
}
dclear(C_WHITE);
drawdetailinv();
dupdate();
clearevents();
while(keydown(KEY_0)){
clearevents();
}
}
}else if(game == 5){
dclear(C_WHITE);
drawcrafting();
dupdate();
clearevents();
if(keydown(KEY_EXE)){
game = 4;
clearevents();
while(keydown(KEY_EXE)){
clearevents();
}
}
clearevents();
if (keydown(KEY_LEFT)){
if(crafting.selected>0){
crafting.selected--;
}else{
crafting.selected=CRAFTINGS-1;
}
clearevents();
while(keydown(KEY_LEFT)){
clearevents();
}
}
if (keydown(KEY_RIGHT)){
if(crafting.selected<CRAFTINGS-1){
crafting.selected++;
}else{
crafting.selected=0;
}
clearevents();
while(keydown(KEY_RIGHT)){
clearevents();
}
}
if(keydown(KEY_SHIFT)){
crafting.ispossible = 0;
pos = 0;
for(i=0;i!=5;i++){
if((player.inventoryitems[i]==craftingitem[crafting.selected] || player.inventoryitems[i]==0) && player.inventorynum[i]<=64-craftingnum[crafting.selected]){
crafting.ispossible = 1;
pos = i;
break;
}
}
crafting.hasanything = 0;
for(n=crafting.selected*CRAFTSIZE;n!=(crafting.selected+1)*CRAFTSIZE;n++){
crafting.hasitem = 0;
for(i=0;i!=5;i++){
if(craftingsitems[n]==player.inventoryitems[i] && craftingsnum[n]<=player.inventorynum[i]){
crafting.hasitem = 1;
}
}
crafting.hasanything += crafting.hasitem;
}
if(crafting.hasanything == CRAFTSIZE && crafting.ispossible == 1){
player.inventoryitems[pos] = craftingitem[crafting.selected];
player.inventorynum[pos] += craftingnum[crafting.selected];
for(n=crafting.selected*CRAFTSIZE;n!=(crafting.selected+1)*CRAFTSIZE;n++){
for(i=0;i!=5;i++){
if(craftingsitems[n]==player.inventoryitems[i] && craftingsnum[n]<=player.inventorynum[i]){
player.inventorynum[i]-=craftingsnum[n];
if(player.inventorynum[i]==0){
player.inventoryitems[i]=0;
}
}
}
}
dfont(&microfont);
dclear(C_WHITE);
dtext(10, 29, C_BLACK, ITEM_BUILT);
dtext(10, 35, C_BLACK, RELEASE_SHIFT);
dfont_default();
dupdate();
clearevents();
while(keydown(KEY_SHIFT)){
clearevents();
}
}else{
dfont(&microfont);
dclear(C_WHITE);
dtext(10, 29, C_BLACK, ITEM_NOT_BUILT);
dtext(10, 35, C_BLACK, RELEASE_SHIFT);
dfont_default();
dupdate();
clearevents();
while(keydown(KEY_SHIFT)){
clearevents();
}
}
clearevents();
while(keydown(KEY_SHIFT)){
clearevents();
}
}
}else if(game == 6){
dclear(C_WHITE);
drawdestroy();
clearevents();
if(keydown(KEY_EXE)){
game = 3;
clearevents();
while(keydown(KEY_EXE)){
clearevents();
}
}
if(keydown(KEY_SHIFT) && player.inventorynum[destroy.selected] > 0 && player.inventoryitems[destroy.selected] != 0){
player.inventorynum[destroy.selected]--;
if(player.inventorynum[destroy.selected] == 0){
player.inventoryitems[destroy.selected] = 0;
}
clearevents();
while(keydown(KEY_SHIFT)){
clearevents();
}
}else if(keydown(KEY_DEL)){
player.inventoryitems[destroy.selected] = 0;
player.inventorynum[destroy.selected] = 0;
clearevents();
while(keydown(KEY_DEL)){
clearevents();
}
}else if (keydown(KEY_0)){
if(destroy.selected<INVENTORY_SIZE-1){
destroy.selected++;
}else{
destroy.selected = 0;
}
clearevents();
while(keydown(KEY_0)){
clearevents();
}
}
dupdate();
}
clearevents();
}
return 1;
}