Difference for server/skill_util.c from version 1.17 to 1.18

version 1.17

version 1.18

Line 1

* static char *rcsid_skill_util_c =

* "$Id: skill_util.c,v 1.17 2001/05/29 04:41:54 mwedel Exp $";

* "$Id: skill_util.c,v 1.18 2001/06/29 05:59:46 mwedel Exp $";

CrossFire, A Multiplayer game for X-windows

Line 824

LOG(llevError,"Error: unlink_skill() called for non-player!\n");

return;

}

#ifdef LINKED_SKILL_LIST

if(remove_skill_from_list(op,skillop))

#endif

skillop->exp_obj = NULL;

}

int remove_skill_from_list(object *op, object *skillop) {

objectlink *obl=op->sk_list,*first,*prev=NULL,*nxt;

if(!skillop) return 0;

prev=first=obl;

while(obl) {

nxt = obl->next ? obl->next: NULL;

if(obl->id==skillop->stats.sp) {

if(obl==first) {

op->sk_list = nxt;

nxt = (nxt&&nxt->next) ? nxt->next: NULL;

}

if(prev) prev->next = nxt;

#if 0

LOG(llevDebug,"Removing skill: %s from list\n",

skillop->name);

#endif

CFREE(obl);

obl = NULL;

return 1;

} else

prev = obl;

obl=nxt;

}

if(first) op->sk_list = first;

return 0;

}

/* link_player_skills() - linking skills with experience objects

* and creating a linked list of skills for later fast access.

Line 964

Line 931

}

/* Ok, create linked list and link the associated skills to exp objects */

for(i=0;i<sk_index;i++) {

#ifdef LINKED_SKILL_LIST

objectlink *obl;

obl = (objectlink *) malloc(sizeof(objectlink));

obl->ob=sk_ob[i];

obl->id=sk_ob[i]->stats.sp;

obl->next = pl->sk_list;

pl->sk_list = obl;

#endif

cat = skills[sk_ob[i]->stats.sp].category;

if(cat==EXP_NONE) continue;

Line 991

Line 950

int link_player_skill(object *pl, object *skillop) {

object *tmp;

int cat;

#ifdef LINKED_SKILL_LIST

objectlink *obl;

/* add it to the linked list */

obl = (objectlink *) malloc(sizeof(objectlink));

obl->ob=skillop;

obl->id=skillop->stats.sp;

obl->next = pl->sk_list;

pl->sk_list = obl;

#endif

cat = skills[skillop->stats.sp].category;

Line 1027

Line 976

learn_skill (object *pl, object *scroll) {

object *tmp;

archetype *skill;

#ifdef LINKED_SKILL_LIST

objectlink *obl;

#else

object *tmp2;

#endif

int has_meditation=0;

skill=find_archetype(scroll->slaying);

if(!skill)

return 2;

Line 1039

Line 986

if(!tmp) return 2;

/* check if player already has it */

#ifdef LINKED_SKILL_LIST

for (tmp2=pl->inv;tmp2;tmp2=tmp2->below) {

for(obl=pl->sk_list;obl;obl=obl->next)

if(tmp2->type==SKILL&&tmp2->invisible) {

if(obl->ob->invisible

if (tmp2->stats.sp==tmp->stats.sp) return 0;

&&(obl->ob->stats.sp==tmp->stats.sp)) return 0;

else if (tmp2->stats.sp == SK_MEDITATION) has_meditation=1;

#else /* LINKED_SKILL_LIST */

}

for(tmp2=pl->inv;tmp2;tmp2=tmp2->below)

}

if(tmp2->type==SKILL&&tmp2->invisible

&&tmp2->stats.sp==tmp->stats.sp) return 0;

# endif /* LINKED_SKILL_LIST */

/* Special check - if the player has meditation (monk), they can not

* learn melee weapons. Prevents monk from getting this

* skill.

if (tmp->stats.sp == SK_MELEE_WEAPON && has_meditation) {

new_draw_info(NDI_UNIQUE, 0,pl,"Your knowledge of inner peace prevents you from learning about melee weapons.");

return 2;

}

/* now a random change to learn, based on player Int */

if(RANDOM()%100>learn_spell[pl->stats.Int])

return 2; /* failure :< */

Line 1094

Line 1046

object *tmp=NULL;

char buf[MAX_BUF], *in;

int i,length,is_first;

#ifdef LINKED_SKILL_LIST

objectlink *obl;

if (!op->sk_list) {

new_draw_info(NDI_UNIQUE, 0,op,"You know no skills.");

op->chosen_skill=NULL; /* double safety - for those who lose skills */

return;

} else {

#endif

length = 31;

in = "";

if (op)

Line 1110

Line 1054

/* sprintf(buf,"Player Skills Category /lvl"); */

sprintf(buf,"Player skills by experience category");

new_draw_info(NDI_UNIQUE, 0,op,buf);

#ifdef LINKED_SKILL_LIST

}

#endif

/* print out skills by category */

for (i=0;i<=nrofexpcat;i++) {

Line 1120

Line 1061

Special[0]='\0';

is_first=1;

if(i==nrofexpcat) i=EXP_NONE; /* skip to misc exp category */

#ifdef LINKED_SKILL_LIST

for (obl=op->sk_list;obl;obl=obl->next) {

tmp = obl->ob;

#else

for (tmp=op->inv;tmp;tmp=tmp->below) {

if(tmp->type!=SKILL) continue;

#endif

if(skills[tmp->stats.sp].category==i

&&(tmp->invisible||QUERY_FLAG(tmp,FLAG_APPLIED))) {

/* header info */

Line 1151

Line 1087

tmp_exp->stats.exp,

level_exp(tmp_exp->level+1, op->expmul));

}

if (strcmp(tmp_exp->name,"physique")==0)

if (strcmp(tmp_exp->name,"physique")==0) {

{

sprintf(Special,"You can handle %d weapon improvements.",tmp_exp->level/5+5);

}

if (strcmp(tmp_exp->name,"wisdom")==0)

if (strcmp(tmp_exp->name,"wisdom")==0) {

{

char *cp = determine_god(op);

sprintf(Special,"You worship %s.", cp?cp:"no god at current time");

}

} else if(i==EXP_NONE) {

new_draw_info(NDI_UNIQUE,0,op,"misc.");

}

} /* is_first */

/* print matched skills */

if((!op || QUERY_FLAG(op, FLAG_WIZ)))

(void) sprintf(buf,"%s%s %s (%5d)",in,

Line 1175

Line 1107

(void) sprintf(buf,"%s%s %s",in,

QUERY_FLAG(tmp,FLAG_APPLIED)?"*":"-",

skills[tmp->stats.sp].name);

new_draw_info(NDI_UNIQUE,0,op,buf);

}

if (Special[0]!='\0')

if (Special[0]!='\0') {

{

new_draw_info(NDI_UNIQUE,0,op,Special);

}

Legend:

line(s) removed in v.1.17
line(s) changed
	line(s) added in v.1.18

File made using version 1.98 of cvs2html by leaf at 2011-07-21 17:45