| version 1.59 | | version 1.60 |
|---|
| | |
| /* | | /* |
| * static char *rcsid_player_c = | | * static char *rcsid_player_c = |
| * "$Id: player.c,v 1.59 2001/06/11 04:13:23 michtoen Exp $"; | | * "$Id: player.c,v 1.60 2001/06/13 10:51:57 michtoen Exp $"; |
| */ | | */ |
| | | |
| /* | | /* |
| | |
| int lost_a_stat; | | int lost_a_stat; |
| int lose_this_stat; | | int lose_this_stat; |
| int this_stat; | | int this_stat; |
| | | int killed_script_rtn; /* GROS: For script return value */ |
| | | |
| if(save_life(op)) | | if(save_life(op)) |
| return; | | return; |
| | |
| return; | | return; |
| } | | } |
| | | |
| | | /* GROS: Handle the Death script */ |
| | | |
| | | if (op->script_death != NULL) |
| | | { |
| | | killed_script_rtn = guile_call_event(NULL, op ,NULL, 0, NULL, 0,0, op->script_death, SCRIPT_FIX_ALL); |
| | | if (killed_script_rtn) |
| | | return; |
| | | } |
| | | else |
| | | { |
| | | if (op->script_str_death != NULL) |
| | | { |
| | | killed_script_rtn = guile_call_event_str(NULL, op ,NULL, 0, NULL, 0,0, op->script_str_death, SCRIPT_FIX_ALL); |
| | | if (killed_script_rtn) |
| | | return; |
| | | }; |
| | | }; |
| | | |
| if(op->stats.food<0) { | | if(op->stats.food<0) { |
| #ifdef EXPLORE_MODE | | #ifdef EXPLORE_MODE |
| if (op->contr->explore) { | | if (op->contr->explore) { |