Bash functions for Fighting
This function library contains bash shell functions mainly related to melee skills.
Though it had been tested with the busybox ash shell, some functions might only work correctly in bash ( or the other way around ).
The functions use code from
These client side scripting files are suggested to be installed
inside the user's “HOME/.crossfire/s/” folder,
with a shortcut link cf → to the .crossfire directory,
to do have not much typing to do in the client's commandline.
Functions are usually named _function(){ ;} , functions named _ _function and _ _ _function are usually alternatives to the _function.
Noteworthy the _brace and _unbrace functions, which I had implemented before I had read about the braced drawbacks.
In general, there are two ways to kill monsters :
1.) To move into them by _kill_monster_move, making it possible, that the character may
start to move onto tiles, which are unoccupied by monsters.
2.) To fire one of the fighter skills into a direction by _kill_monster_fire,
making it possible, that the character hurts himself.
The functions named _skill_around were firstly written for players standing inside some
“Training Center” being surrounded by monsters.
But they accept a variable named DIRECTION_OPT, which would not make them turning around.
This option can be used to fight stronger monsters, when the character is being protected by the other seven directions by earth walls for example.
290 lines of code without much explanations…
#!/bin/ash [ "$HAVE_FUNCS_FIGHT" ] && return 0 # depends : [ "$HAVE_FUNCS_COMMON" ] || . cf_funcs_common.sh [ "$HAVE_FUNCS_MOVE" ] || . cf_funcs_move.sh [ "$HAVE_FUNCS_SKILLS" ] || . cf_funcs_skills.sh [ "$HAVE_FUNCS_FOOD" ] || . cf_funcs_food.sh _kill_monster_move(){ _debug "_kill_monster_move:$*" _log "_kill_monster_move:$*" local lATTACKS=${*:-$ATTACK_ATTEMPTS_DEF} # TODO: #*'You withhold your attack'*) _set_next_direction; break 1;; #*'You avoid attacking '*) _set_next_direction; break 1;; for i in `seq 1 1 ${lATTACKS:-1}`; do _is 1 1 $DIRECTION done _empty_message_stream } _kill_monster_fire(){ _debug "_kill_monster_fire:$*" _log "_kill_monster_fire:$*" local lATTACKS=${*:-$ATTACK_ATTEMPTS_DEF} # TODO: #*'You withhold your attack'*) _set_next_direction; break 1;; #*'You avoid attacking '*) _set_next_direction; break 1;; _watch $DRAWINFO for i in `seq 1 1 ${lATTACKS:-1}`; do _is 1 1 fire $DIRN _is 1 1 fire_stop if test "$NROF_ITEM_ATTACK" ; then NROF_ITEM_ATTACK=$((NROF_ITEM_ATTACK-1)) test "$NROF_ITEM_ATTACK" -le 0 && break 1 fi done _unwatch $DRAWINFO _empty_message_stream } _brace(){ _debug "_brace:$*" _log "_brace:$*" _watch $DRAWINFO while : do _is 1 1 brace while :; do unset REPLY read -t $TMOUT _log "_brace:$REPLY" _debug "$REPLY" case $REPLY in *'You are braced.'*) break 2;; *'Not braced.'*) break 1;; *scripttell*break*) break ${REPLY##*?break};; *scripttell*exit*) _exit 1 $REPLY;; *'YOU HAVE DIED.'*) _just_exit;; '') _warn "_brace:Still waiting for message ...";; *) :;; esac sleep 0.01 done sleep 0.1 done _unwatch $DRAWINFO _empty_message_stream } _unbrace(){ _debug "_unbrace:$*" _log "_unbrace:$*" _watch $DRAWINFO while : do _is 1 1 brace while :; do unset REPLY read -t $TMOUT _log "_unbrace:$REPLY" _debug "$REPLY" case $REPLY in *'You are braced.'*) break 1;; *'Not braced.'*) break 2;; *scripttell*break*) break ${REPLY##*?break};; *scripttell*exit*) _exit 1 $REPLY;; *'YOU HAVE DIED.'*) _just_exit;; '') _warn "_unbrace:Still waiting for message ...";; *) :;; esac sleep 0.01 done sleep 0.1 done _unwatch $DRAWINFO _empty_message_stream } _melee_around(){ _debug "_melee_around:$*" _log "_melee_around:$*" while :; do one=$((one+1)) [ "$DIRECTION_OPT" ] && _number_to_direction $DIRECTION_OPT || _set_next_direction _kill_monster_fire $ATTACKS_SPOT case $NUMBER in $one) break;; esac #case $MELEE_ATTEMPTS in $MELEE_ATTEMPTS_DONE) break;; esac if _check_counter; then _check_food_level _check_hp _check_hp_and_return_home $HP _check_skill_available "$SKILL_MELEE" || return 1 fi _say_script_time done } _karate_around(){ _debug "_karate_around:$*" _log "_karate_around:$*" while :; do one=$((one+1)) [ "$DIRECTION_OPT" ] && _number_to_direction $DIRECTION_OPT || _set_next_direction _kill_monster_fire $ATTACKS_SPOT case $NUMBER in $one) break;; esac #case $KARATE_ATTEMPTS in $KARATE_ATTEMPTS_DONE) break;; esac if _check_counter; then _check_food_level _check_hp _check_hp_and_return_home $HP _check_skill_available "karate" || return 1 fi _say_script_time done } _claw_around(){ _debug "_claw_around:$*" _log "_claw_around:$*" while :; do one=$((one+1)) [ "$DIRECTION_OPT" ] && _number_to_direction $DIRECTION_OPT || _set_next_direction _kill_monster_fire $ATTACKS_SPOT case $NUMBER in $one) break;; esac #case $CLAW_ATTEMPTS in $CLAW_ATTEMPTS_DONE) break;; esac if _check_counter; then _check_food_level _check_hp _check_hp_and_return_home $HP _check_skill_available "clawing" || return 1 fi _say_script_time done } _flame_touch_around(){ _debug "_flame_touch_around:$*" _log "_flame_touch_around:$*" while :; do one=$((one+1)) [ "$DIRECTION_OPT" ] && _number_to_direction $DIRECTION_OPT || _set_next_direction _kill_monster_fire $ATTACKS_SPOT case $NUMBER in $one) break;; esac #case $FLAME_TOUCH_ATTEMPTS in $FLAME_TOUCH_ATTEMPTS_DONE) break;; esac if _check_counter; then _check_food_level _check_hp _check_hp_and_return_home $HP _check_skill_available "flame touch" || return 1 fi _say_script_time done } _punch_around(){ _debug "_punch_around:$*" _log "_punch_around:$*" while :; do one=$((one+1)) [ "$DIRECTION_OPT" ] && _number_to_direction $DIRECTION_OPT || _set_next_direction _kill_monster_fire $ATTACKS_SPOT case $NUMBER in $one) break;; esac #case $PUNCH_ATTEMPTS in $PUNCH_ATTEMPTS_DONE) break;; esac if _check_counter; then _check_food_level _check_hp _check_hp_and_return_home $HP _check_skill_available "punching" || return 1 fi _say_script_time done } _throw_around(){ _log "_throw_around:$*" _debug "_throw_around:$*" while :; do one=$((one+1)) [ "$DIRECTION_OPT" ] && _number_to_direction $DIRECTION_OPT || _set_next_direction _kill_monster_fire $ATTACKS_SPOT test "${NROF_ITEM_ATTACK:-1}" -le 0 && break 1 case $NUMBER in $one) break 1;; esac #case $PUNCH_ATTEMPTS in $PUNCH_ATTEMPTS_DONE) break;; esac if _check_counter; then _check_food_level _check_hp _check_hp_and_return_home $HP _check_skill_available "throwing" || return 1 fi _say_script_time done } ###END### HAVE_FUNCS_FIGHT=1
