>fight_prog 70~
if hitprcnt($n) < 30
if rand(70)
    thrust
endif
  else
    if rand(30)
      c blindness
    else
      if rand(40)
        shielddisarm
      else
        if rand(45)
          c blasphemy
        else
          if rand(50)
            c silence
          else
            trip
          endif
        endif
      endif
    endif
endif
~
|