Fix possible compile mistakes in there. >_>

git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@6790 54d463be-8e91-2dee-dedb-b68131a5f0ec

1 files changed, 494 insertions, 4 deletions

diff --git a/src/map/mercenary.c b/src/map/mercenary.c
index 704963649..8ef7162db 100644
--- a/src/map/mercenary.c
+++ b/src/map/mercenary.c
@@ -1,11 +1,501 @@
+#include <stdio.h>

+#include <stdlib.h>

+#include <string.h>

+#include <ctype.h>

+#include <math.h>

+#include <limits.h>

+

+#include "../common/socket.h"

+#include "../common/timer.h"

+#include "../common/nullpo.h"

+#include "../common/mmo.h"

+#include "../common/core.h"

+#include "../common/showmsg.h"

+

+#include "log.h"

+#include "clif.h"

+#include "chrif.h"

+#include "intif.h"

+#include "itemdb.h"

+#include "map.h"

+#include "pc.h"

+#include "status.h"

+#include "skill.h"

+#include "mob.h"

+#include "pet.h"

+#include "battle.h"

+#include "party.h"

+#include "guild.h"

+#include "atcommand.h"

+#include "script.h"

+#include "npc.h"

+#include "trade.h"

+#include "unit.h"

+

+#include "mercenary.h"

 // Homunculus and future Mercenary system code go here [Celest]

+typedef char char32[32];

+

+// everything below is crappy code by [blackhole89].

+

+/*

+HLIF_HEAL#Ä¡À¯ÀÇ _Õ+æ(Èú)#

+HLIF_AVOID#+ä+ÞȸÇÇ#

+HLIF_BRAIN#_ú_ö_ú#

+HLIF_CHANGE#¸àÅ> Ã_ÀÎÁö#

+HAMI_CASTLE#Ä___¸÷#

+HAMI_DEFENCE#÷ðÆæ_º#

+HAMI_SKIN#_Æ_Ù¸¸Æ_¿ò _ºÅ_#

+HAMI_BLOODLUST#ºí·¯÷å ·¯_ºÆR#

+HFLI_MOON#¹R¶óÀÌÆR#

+HFLI_FLEET#Çø_ ¹<ºê#

+HFLI_SPEED#¿À¹ö÷å _ºÇÇ÷å#

+HFLI_SBR44#S.B.R.44#

+HVAN_CAPRICE#Ä<ÇÁ¸R_º#

+HVAN_CHAOTIC#Ä<¿ÀÆ_ º__×÷ñ_Ç#

+HVAN_INSTRUCT#Ã_ÀÎÁö ÀÎ_ºÆR·°_Ç#

+HVAN_EXPLOSION#¹ÙÀÌ¿À ÀÍ_ºÇ÷ÎÁ¯#

+*/

+char32 merc_skillname[20] = {"NULL","HLIF_HEAL","HLIF_AVOID","HLIF_BRAIN","HLIF_CHANGE",

+							"HAMI_CASTLE","HAMI_DEFENCE","HAMI_SKIN","HAMI_BLOODLUST",

+							"HFLI_MOON","HFLI_FLEET","HFLI_SPEED","HFLI_SBR44",

+							"HVAN_CAPRICE","HVAN_CHAOTIC","HVAN_INSTRUCT","HVAN_EXPLOSION"};

+

+void merc_load_exptables();

+void merc_save(struct map_session_data *sd);

+int mercskill_castend_id( int tid, unsigned int tick, int id,int data );

 

 int do_init_merc (void)

 {

-	// read DB's

+	merc_load_exptables();

+	return 0;

+}

+

+static int dirx[8]={0,-1,-1,-1,0,1,1,1};

+static int diry[8]={1,1,0,-1,-1,-1,0,1};

+

+

+

+static unsigned long hexptbl[126];

+

+void merc_load_exptables()

+{

+	FILE *fl;

+	int i;

+

+	fl=fopen("db/hexptbl.txt","rb");

+	if(!fl) return;

+	

+	ShowInfo("reading db/hexptbl.txt\n");

+

+	for(i=0;i<125;++i)

+	{

+		fscanf(fl,"%u,",&(hexptbl[i]));

+	}

+	fclose(fl);

+}

+

+char *merc_skill_get_name(id)

+{

+	return merc_skillname[id-8000];

+}

+

+void merc_die(struct map_session_data *sd)

+{

+	if(sd->hd)

+	{

+		sd->hd->alive=0;

+		merc_save(sd);

+		clif_clearchar_area(&sd->hd->bl,0);

+		map_delblock(&sd->hd->bl);	

+	}

 }

 

-int do_final_merc (void)

+int merc_damage(struct block_list *src,struct homun_data *hd,int damage,int type)

 {

-	// clean up

-}
\ No newline at end of file
+	if(damage > hd->hp) damage = hd->hp;

+	hd->hp -= damage;

+

+	clif_homuninfo(hd->master);

+

+	if(hd->hp == 0)

+	{

+		//dead lol

+		clif_clearchar((struct block_list*)hd,1);

+		hd->bl.m = 0;

+		hd->bl.x = 0;

+		hd->bl.y = 0;	//send it somewhere where it doesn't bother us

+		merc_save(hd->master);

+		merc_die(hd->master);

+		return damage;

+	}

+

+	merc_save(hd->master);

+	return damage;

+}

+

+void merc_calc_status(struct homun_data *hd)

+{

+	int dstr; 

+	int atk_rate=100,aspd_rate=100,speed_rate=100;

+

+	// attack

+	dstr = hd->str/10;

+	hd->atk = hd->str + dstr*dstr + hd->dex/5;

+

+	// matk

+	hd->matk = hd->int_+(hd->int_/6)*(hd->int_/6);

+	

+	// crit

+	hd->crit = (hd->luk*3)+10; //x.1

+

+	// hit

+	hd->hit = hd->dex + hd->level;

+

+	// flee

+	hd->flee = hd->agi + hd->level;

+

+	// lucky flee

+	hd->flee2 = hd->luk+10;	//x.1

+

+	// def

+	hd->def = hd->vit;

+

+	// mdef

+	hd->mdef = hd->int_;

+

+	// hp recovery

+	hd->regenhp = 1 + (hd->vit/5) + (hd->max_hp/200);

+

+	// sp recovery

+	hd->regensp = 1 + (hd->int_/6) + (hd->max_sp/100);

+	if(hd->int_ >= 120)

+		hd->regensp += ((hd->int_-120)>>1) + 4;

+

+	if(hd->sc_count && hd->sc.data)

+	{

+

+		if(hd->sc.data[SC_AVOID].timer!=-1)

+			speed_rate -= hd->sc.data[SC_AVOID].val1*10;

+	

+		if(hd->sc.data[SC_CHANGE].timer!=-1)

+			hd->int_ += 60;

+		

+		if(hd->sc.data[SC_BLOODLUST].timer!=-1)

+			atk_rate += hd->sc.data[SC_BLOODLUST].val1*10+20;

+

+		if(hd->sc.data[SC_FLEET].timer!=-1)

+		{

+			aspd_rate -= hd->sc.data[SC_FLEET].val1*3;

+			atk_rate+=5+hd->sc.data[SC_FLEET].val1*5;

+		}

+	}

+

+	hd->amotion	= 1800 - (1800 * hd->agi / 250 + 1800 * hd->dex / 1000);

+	hd->amotion	-= 200;

+	hd->dmotion=hd->amotion;

+}

+

+void merc_skillup(struct map_session_data *sd,short skillnum)

+{

+	nullpo_retv(sd);

+	nullpo_retv(sd->hd);

+	if(!sd->hd->skillpts) return;	//no skill points left

+

+	sd->hd->hskill[(skillnum-8001)%4].id=skillnum;

+	sd->hd->hskill[(skillnum-8001)%4].level+=1;

+	sd->hd->skillpts-=1;

+

+	clif_homuninfo(sd);

+	clif_homunskillinfoblock(sd);

+	clif_skillup(sd, skillnum);

+

+	merc_save(sd);

+}

+

+void merc_calc_stats(struct homun_data *hd)

+{

+	/* very proprietary */

+	int l,i;

+	l=hd->level;

+	hd->max_hp=500+l*10+l*l;

+	hd->max_sp=300+l*11+l*l*90/100;

+/*	hd->atk=10+l*5+l*l/125;

+	hd->matk=6+l*6+l*l/120;

+	hd->hit=3+l+l*l/200;

+	hd->crit=1+l*69/125;

+	hd->def=5+l+l*l/119;

+	hd->mdef=1+l+l*l/80;

+	hd->flee=7+l+l*l/150; */ // obsolete

+	switch(hd->class_)

+	{

+	case 6001:	//LIF ~ int,dex,vit

+		hd->str = 3+l/7;

+		hd->agi = 3+2*l/5;

+		hd->vit = 4+l;

+		hd->int_ = 4+3*l/4;

+		hd->dex = 4+2*l/3;

+		hd->luk = 3+l/4;

+		for(i=8001;i<8005;++i)

+		{

+			hd->hskill[i-8001].id=i;

+			//hd->hskill[i-8001].level=1;

+		}

+		break;

+	case 6003:	//FILIR ~ str,agi,dex

+		hd->str = 4+3*l/4;

+		hd->agi = 4+2*l/3;

+		hd->vit = 3+2*l/5;

+		hd->int_ = 3+l/4;

+		hd->dex = 4+l;

+		hd->luk = 3+l/7;

+		for(i=8009;i<8013;++i)

+		{

+			hd->hskill[i-8009].id=i;

+			//hd->hskill[i-8009].level=1;

+		}

+		break;

+	case 6002:	//AMISTR ~ str,vit,luk

+		hd->str = 4+l;

+		hd->agi = 3+l/4;

+		hd->vit = 3+3*l/4;

+		hd->int_ = 3+1/10;

+		hd->dex = 3+2*l/5;

+		hd->luk = 4+2*l/3;

+		for(i=8005;i<8009;++i)

+		{

+			hd->hskill[i-8005].id=i;

+			//hd->hskill[i-8005].level=1;

+		}

+		break;

+	case 6004:	//VANILMIRTH ~ int,dex,luk

+		hd->str = 3+l/4;

+		hd->agi = 3+l/7;

+		hd->vit = 3+2*l/5;

+		hd->int_ = 4+l;

+		hd->dex = 4+2*l/3;

+		hd->luk = 4+3*l/4;

+		for(i=8013;i<8017;++i)

+		{

+			hd->hskill[i-8013].id=i;

+			//hd->hskill[i-8013].level=1;

+		}

+		break;

+	}

+	merc_calc_status(hd);

+	hd->exp_next=hexptbl[l-1];

+}

+

+int merc_gainexp(struct homun_data *hd,int exp)

+{

+	hd->exp += exp;

+

+	if(hd->exp > hd->exp_next) //levelup

+	{

+		while(hd->exp > hd->exp_next)

+		{

+			hd->exp-=hd->exp_next;

+			hd->level += 1;

+			

+			clif_misceffect(&hd->bl,0);

+			merc_calc_stats(hd);

+			hd->hp=hd->max_hp;

+			hd->sp=hd->max_sp;

+		}

+	}

+

+	merc_save(hd->master);

+	clif_homuninfo(hd->master);

+	return 0;

+}

+

+int merc_heal(struct homun_data *hd,int hp,int sp)

+{

+	hd->hp+=hp;

+	hd->sp+=sp;

+	if(hd->max_hp < hd->hp) hd->hp = hd->max_hp;

+	if(hd->max_sp < hd->sp) hd->sp = hd->max_sp;

+

+	merc_save(hd->master);

+	clif_homuninfo(hd->master);

+

+	return hp+sp;

+}

+

+void merc_save(struct map_session_data *sd)

+{

+#ifndef TXT_ONLY

+	sprintf(tmp_sql, "UPDATE `homunculus` SET `class`='%d',`name`='%s',`level`='%d',`exp`='%d',`hunger`='%d',`hp`='%d',`sp`='%d',`skill1lv`='%d',`skill2lv`='%d',`skill3lv`='%d',`skill4lv`='%d',`skillpts`='%d' WHERE `id` = '%d'", 

+		sd->hd->class_,sd->hd->name,sd->hd->level,sd->hd->exp,sd->hd->hunger_rate,sd->hd->hp,sd->hd->sp,

+		sd->hd->hskill[0].level,sd->hd->hskill[1].level,sd->hd->hskill[2].level,sd->hd->hskill[3].level,

+		sd->hd->skillpts,sd->hd->id);

+    if(mysql_query(&mmysql_handle, tmp_sql)){

+			ShowSQL("DB error - %s\n",mysql_error(&mmysql_handle));

+			ShowDebug("at %s:%d - %s\n", __FILE__,__LINE__,tmp_sql);

+		return;

+	}

+#endif

+}

+

+//not nice, but works

+void merc_res(struct map_session_data *sd,int skilllv)

+{

+	sprintf(tmp_sql, "UPDATE `homunculus` SET `hp`='10' WHERE `char_id` = '%d' AND `hp`=0",sd->char_id);

+	if(mysql_query(&mmysql_handle, tmp_sql)){

+			ShowSQL("DB error - %s\n",mysql_error(&mmysql_handle));

+			ShowDebug("at %s:%d - %s\n", __FILE__,__LINE__,tmp_sql);

+		return;

+	}

+	if(sd->hd)

+	{

+		sd->hd->hp=skilllv*sd->hd->max_hp/10;

+		sd->hd->alive=1;

+	}

+}

+

+void merc_load(struct map_session_data *sd)

+{

+	struct homun_data *hd;

+	int alive=1;

+

+	sd->hd=NULL;

+

+#ifndef TXT_ONLY

+	sprintf(tmp_sql, "SELECT `id`,`class`,`name`,`level`,`exp`,`hunger`,`hp`,`sp`,`skill1lv`,`skill2lv`,`skill3lv`,`skill4lv`,`skillpts` FROM `homunculus` WHERE `char_id` = '%d'", sd->char_id);

+    if(mysql_query(&mmysql_handle, tmp_sql)){

+			ShowSQL("DB error - %s\n",mysql_error(&mmysql_handle));

+			ShowDebug("at %s:%d - %s\n", __FILE__,__LINE__,tmp_sql);

+		return;

+	}

+

+	sql_res = mysql_store_result(&mmysql_handle);

+	if(mysql_num_rows(sql_res) <= 0){

+		mysql_free_result(sql_res);

+		return;	//no homunculus for this char

+	}

+

+	sql_row = mysql_fetch_row(sql_res);

+	if(atoi(sql_row[6])==0) alive=0; //it is dead

+#else

+	int id,charid,class_,level,exp,hunger,hp,sp;

+	char name[24];

+	FILE *fl=fopen("save/homunculus.txt","r");

+	

+	ShowInfo("Looking up Homunculus for %d...\n",sd->char_id);

+	charid=1;

+	while(charid!=0)

+	{

+		fscanf(fl,"%d,%d,%d,%s ,%d,%d,%d,%d,%d\n",&id,&charid,&class_,name,&level,&exp,&hunger,&hp,&sp);

+		ShowInfo("%d",charid);

+		if(charid==sd->char_id) goto gotit;

+	}

+	return;	//none found

+gotit:

+	ShowInfo("found it!\n");

+#endif

+	

+	//dummy code

+	hd=(struct homun_data *) aCalloc(1, sizeof(struct homun_data));

+	sd->hd=hd;		//pointer from master to homunculus

+	memset(hd,0,sizeof(struct homun_data));

+	hd->master=sd;	//pointer from homunculus to master

+#ifndef TXT_ONLY

+	hd->id=atoi(sql_row[0]);

+	hd->class_=atoi(sql_row[1]);

+	hd->level=atoi(sql_row[3]);

+	hd->hp=atoi(sql_row[6]);

+	hd->sp=atoi(sql_row[7]);

+	hd->exp=atoi(sql_row[4]);

+	hd->hunger_rate=atoi(sql_row[5]);

+	hd->hskill[0].level=atoi(sql_row[8]);

+	hd->hskill[1].level=atoi(sql_row[9]);

+	hd->hskill[2].level=atoi(sql_row[10]);

+	hd->hskill[3].level=atoi(sql_row[11]);

+	hd->skillpts=atoi(sql_row[12]);

+	memcpy(hd->name,sql_row[2],strlen(sql_row[2])<24?strlen(sql_row[2]):24);

+#else

+	hd->id=id;

+	hd->class_=class_;

+	hd->level=level;

+	hd->exp=exp;

+	hd->hunger_rate=hunger;

+	hd->hp=hp;

+	hd->sp=sp;

+	memcpy(hd->name,name,strlen(name)<24?strlen(name):24);

+#endif

+	hd->alive=alive;

+	

+	hd->speed=0x96;

+	

+	hd->bl.m=sd->bl.m;

+	hd->bl.x=sd->bl.x;

+	hd->bl.y=sd->bl.y;

+	hd->bl.type=BL_HOMUNCULUS;

+	hd->bl.id= npc_get_new_npc_id();

+	hd->bl.prev=NULL;

+	hd->bl.next=NULL;

+

+	status_set_viewdata(&hd->bl, hd->class_);

+	status_change_init(&hd->bl);

+	unit_dataset(&hd->bl);

+

+	map_addiddb(&hd->bl);

+

+	merc_calc_stats(hd);	//this function will have more sense later on

+

+	mysql_free_result(sql_res);

+	

+//clif_spawnhomun(hd);

+//	clif_homunack(sd);

+//	clif_homuninfo(sd);

+//	clif_homuninfo(sd); // send this x2. dunno why, but kRO does that [blackhole89]

+}

+

+int merc_create_homunculus(struct map_session_data *sd,int id,int m,int x,int y)

+{

+/*	struct homun_data *hd;

+	//dummy code

+	hd=(struct homun_data *) aCalloc(1, sizeof(struct homun_data));

+	sd->hd=hd;		//pointer from master to homunculus

+	memset(hd,0,sizeof(struct homun_data));

+	hd->master=sd;	//pointer from homunculus to master

+	hd->class_=id;

+	hd->speed=0x96;

+	hd->level=1;

+	hd->bl.m=m;

+	hd->bl.x=hd->to_x=x;

+	hd->bl.y=hd->to_y=y;

+	hd->to_x+=2;

+	hd->bl.type=BL_HOMUNCULUS;

+	hd->bl.id= npc_get_new_npc_id();

+	hd->bl.prev=NULL;

+	hd->bl.next=NULL;

+	map_addiddb(&hd->bl);

+	hd->max_hp=500;

+	hd->hp=400;

+	hd->max_sp=300;

+	hd->sp=200;

+	hd->atk=15;

+	hd->matk=2;

+	hd->hit=3;

+	hd->crit=90;

+	hd->def=5;

+	hd->mdef=6;

+	hd->flee=7;

+	hd->exp=10;

+	hd->exp_next=100;

+	hd->hunger_rate=32;

+	hd->walktimer=-1;

+	memcpy(hd->name,"Homunculus\0",11);

+	merc_calc_stats(hd);

+	hd->attackabletime=0;

+

+	merc_save(hd->master);

+

+	clif_spawnhomun(hd);

+	clif_homunack(sd);

+	clif_homuninfo(sd);

+	clif_homuninfo(sd);*/ // send this x2. dunno why, but kRO does that [blackhole89]

+}

+

+int do_final_merc (void);
\ No newline at end of file