Subversion Repositories Kolibri OS

/*	------- KOSILKA FOR KOLIBI -------

Written in C++ (MS Visual C++ 6.0+).

Version 1.16.

					 Andrey Mihaylovich aka Dron2004

*/

#include "kosSyst.h"

#include "kosFile.h"

#include "images.cpp"

//External levels

bool external_levels_available=false;

bool external_levels = false;

int level_read_result;

Byte * externallevels;

Byte external_levels_count[1] = {0};

/////////////////

int lastkosilkadirection=1;

int laststep=0; //Last step. 0-does not exists, 1-bottom, 2-up, 3-left, 4-right

Byte skindata[13824];

int read_result=0;

bool skin_available=false;

bool w_redraw=true;

#if LANG == RUS

	const char windowTitle[] = "Š®á¨«ª  ¤«ï Š®«¨¡à¨";

	const char version[]     = "‚¥àá¨ï 1.16";

	const char win[]         = "‚ë ¢ë¨£à «¨!";

	const char press_q[]     = "<­ ¦¬¨â¥  ¤«ï ¢®§¢à â  ¢ ¬¥­î>";

	const char fail[]        = "ˆ£à  ®ª®­ç¥­ ...";

	const char press_r[]     = "<­ ¦¬¨â¥  ¤«ï ⮣®, ç⮡ë áë£à âì ¥éñ à §>";

	const char k_o_s_i_l_k[] = "Š   Ž   ‘   ˆ   ‹   Š   €";

	const char for_kolibri[] = "¤«ï Š®«¨¡à¨ Ž‘";

	const char press_enter[] = "<¤«ï ­ ç «  ¨£àë ­ ¦¬¨â¥ ENTER>";

	const char press_g[]     = "<­ ¦¬¨â¥  ¤«ï ¯¥à¥ª«î祭¨ï ०¨¬  £à ä¨ª¨>";

	const char press_a[]     = "<­ ¦¬¨â¥  ¤«ï ¢ª«î祭¨ï/¢ëª«î祭¨ï  ­¨¬ æ¨¨>";

	const char press_h[]     = "<­ ¦¬¨â¥  ¤«ï ¯à®á¬®âà  á¢¥¤¥­¨© ® ¯à®£à ¬¬¥>";

	const char press_s[]     = "<­ ¦¬¨â¥  çâ®¡ë ¢ëª«îç¨âì/¢ª«îç¨âì ᪨­>";

	const char level_label[] = "“஢¥­ì:";

	const char attempts_left[] = "Žáâ «®áì ¯®¯ë⮪:";

	const char grass_left[]  = "Žáâ «®áì âà ¢ë:";

#else

	const char windowTitle[] = "Kosilka for Kolibri";

	const char version[]     = "  Ver. 1.16";

	const char win[]         = "  You won!  ";

	const char press_q[]     = " to return to the menu>";

	const char fail[]        = "   Game over.   ";

	const char press_r[]     = "";

	const char k_o_s_i_l_k[] = "K   O   S   I   L   K   A";

	const char for_kolibri[] = "for Kolibri OS";

	const char press_enter[] = "press ENTER to start the game";

	const char press_g[]     = " to switch graphics mode>";

	const char press_a[]     = " to turn on/off animation>";

	const char press_h[]     = " to view information about the program>";

	const char press_s[]     = " to turn on/off external skin>";

	const char level_label[] = "Level:";

	const char attempts_left[] = "Attempts left:";

	const char grass_left[]  = "Grass left:";

#endif

int levelcount=7;

char gamearea[20][20]; //The map

short int kosilkax; // Kosilka position

short int kosilkay;

short int kosilkadirection=1; //Last step direction. 1-bottom, 2-up, 3-left, 4-right

short int lives=2;

short int level=1;

short int status=0; //Where 0 - welcome screen

					// 1 - the game

					// 2 - win

					// 3 - fail

					// 4 - select the level (internal or external)

					// -1 - about

bool gamestarted=false; //Key locker. If "false" then not possible to play

bool drawgraphics=true; //Draw detailed graphics or just colored rectangles

bool drawanimation=true;

int grassLeft();  //Notify about "Grass Left" function

RGB kosilka_d[576];

RGB kosilka_l[576];

RGB kosilka_r[576];

RGB kosilka_u[576];

RGB grass[576];

RGB stone[576];

RGB tree[576];

RGB skos[576];

//Palette. Decoding to 0xRRGGBB

char * apppath;

char * levpath;

char * getLevelsPathName(){

	int lastslashindex=0;

	static char levfilename[]="koslevel.pak";

	int tempslfnd=0;

	for (tempslfnd=0; tempslfnd < strlen(kosExePath); tempslfnd++){

			if (kosExePath[tempslfnd]=='/'){lastslashindex=tempslfnd;}

	}

	levpath = new char[lastslashindex+strlen(levfilename)+1];

	for (tempslfnd=0; tempslfnd <= lastslashindex; tempslfnd++){

		levpath[tempslfnd]=kosExePath[tempslfnd];

	}

	for (tempslfnd=0; tempslfnd < strlen(levfilename); tempslfnd++){

		levpath[tempslfnd+lastslashindex+1]=levfilename[tempslfnd];

	}

	return levpath;

}

void interlevelpause(){ //The pause between levels

	Byte tempCode;

	RGB tmprgb;

	int tmpa=0;

	laststep=0;

	static int yellow_pal[] = {0xA8A93D,0xBEBF4C,0xD6D856,0xDFE15A,0xECEE5B,

						    0xECEE5B,0xDFE15A,0xD6D856,0xBEBF4C,0xA8A93D};

		for (int iic=0;iic<240;iic++){

			kos_WaitForEvent(1); //Pause()?

			kos_GetKey(tempCode);

			kos_DrawBar(iic*2,0,2,480,yellow_pal[tmpa]);

			tmpa++;

			if (tmpa>9) tmpa=0;

		}

}

void draw_element(int elx, int ely){ //Draw map element

switch (gamearea[elx][ely]){

			case 'g':

				if (drawgraphics==true){

					kos_PutImage((RGB*)grass,24,24,elx*24,ely*24);

				}

				else

				{

					kos_DrawBar(elx*24,ely*24,24,24,0xAAAA00);

				}

				break;

			case 'k':

				if (drawgraphics==true){

					switch(kosilkadirection){

					case 1:

						kos_PutImage((RGB*)kosilka_d,24,24,elx*24,ely*24);

						break;

					case 2:

						kos_PutImage((RGB*)kosilka_u,24,24,elx*24,ely*24);

						break;

					case 3:

						kos_PutImage((RGB*)kosilka_l,24,24,elx*24,ely*24);

						break;

					case 4:

						kos_PutImage((RGB*)kosilka_r,24,24,elx*24,ely*24);

						break;

					}

				}

				else

				{

					kos_DrawBar(elx*24,ely*24,24,24,0x00AAAA);

				}

				break;

			case 'n':

				if (drawgraphics==true){

					kos_PutImage((RGB*)skos,24,24,elx*24,ely*24);

				}

				else

				{

					kos_DrawBar(elx*24,ely*24,24,24,0xAAAAAA);

				}

				break;

			case 's':

				if (drawgraphics==true){

					kos_PutImage((RGB*)stone,24,24,elx*24,ely*24);

				}

				else

				{

					kos_DrawBar(elx*24,ely*24,24,24,0x555555);

				}

				break;

			case 't':

				if (drawgraphics==true){

					kos_PutImage((RGB*)tree,24,24,elx*24,ely*24);

				}

				else

				{

					kos_DrawBar(elx*24,ely*24,24,24,0x005500);

				}

				break;

			}

}

void display_grass_left(){

	kos_DrawBar(605,120,20,10,0xEEEEEE);

	kos_DisplayNumberToWindow(grassLeft(),3,605,120,0x0000FF,nbDecimal,false);

}

void animate(int initcellx, int initcelly, int direction){ //kosilka movement animation

	int tmpp=0;

	switch (direction){

		case 1:

			for (tmpp=0; tmpp<23;tmpp++){

				if (drawgraphics==true){

					kos_PutImage((RGB*)skos,24,24,initcellx*24,initcelly*24);

					kos_PutImage((RGB*)kosilka_d,24,24,initcellx*24,initcelly*24+tmpp);

				} else {

					kos_DrawBar(initcellx*24,initcelly*24,24,24,0xAAAAAA);

					kos_DrawBar(initcellx*24,initcelly*24+tmpp,24,24,0x00AAAA);