|
|
| Line 1: |
Line 1: |
| | It sucks. Someone think of something new that it could do, or some way to make it more effective. | | It sucks. Someone think of something new that it could do, or some way to make it more effective. |
| − |
| |
| − | -----------
| |
| − |
| |
| − | [DOV]: I received the thumbs up several months ago to redo the progs so they worked a little better
| |
| − | (currently the bandits attack each other, didn't actually steal, didn't drop any coins taken, etc).
| |
| − | If someone wants to redo the progs for other effects, feel free.
| |
| − |
| |
| − | ----------
| |
| − |
| |
| − | OLD PROGS
| |
| − | >greet_prog 30
| |
| − | steal 1. $n
| |
| − | mpat 12119 drop all
| |
| − |
| |
| − | >rand_prog 20
| |
| − | mpwander
| |
| − |
| |
| − | >rand_prog 15
| |
| − | mploot corpse 1.
| |
| − | mploot corpse 1.
| |
| − | mpat 12119 drop all
| |
| − |
| |
| − | >rand_prog 15
| |
| − |
| |
| − | >entry_prog 50
| |
| − | mprangekill $r
| |
| − |
| |
| − | >greet_prog 50
| |
| − | mprangekill $r
| |
| − |
| |
| − | >rand_prog 20
| |
| − | mprangekill $r
| |
| − |
| |
| − | >rand_prog 10
| |
| − | mpecho The bandit licks his lips and walks away, content with his loot.
| |
| − | mpgoto 9589
| |
| − |
| |
| − |
| |
| − | ---------------------------------------------
| |
| − |
| |
| − |
| |
| − | NEW PROGS (12/11/05)
| |
| − |
| |
| − | prog delete verb_prog dropraiderloot
| |
| − | prog add verb_prog dropraiderloot
| |
| − | if valname($n) == $i
| |
| − | mpget mob $i platinum 1
| |
| − | mpget mob self gold 2
| |
| − | mpget mob self silver 3
| |
| − | mpget mob self copper 4
| |
| − | if value(1) > 0
| |
| − | or value(2) > 0
| |
| − | or value(3) > 0
| |
| − | or value(4) > 0
| |
| − | mpat 12103 mpecho $I drops some pillaged loot as he wanders past.
| |
| − | endif
| |
| − | mpat 12103 drop all
| |
| − | mpat 12103 drop \$1 platinum
| |
| − | mpat 12103 drop \$2 gold
| |
| − | mpat 12103 drop \$3 silver
| |
| − | mpat 12103 drop \$4 copper
| |
| − | mpverbstop
| |
| − | else
| |
| − | mpnextinterp
| |
| − | endif
| |
| − | \@
| |
| − |
| |
| − | prog delete verb_prog raiderbanditwork
| |
| − | prog add verb_prog raiderbanditwork
| |
| − | if valname($n) == $i
| |
| − | if objhere(10)
| |
| − | or objhere(11)
| |
| − | or objhere(116)
| |
| − | get 1. corpse
| |
| − | get 1. corpse
| |
| − | get platinum corpse
| |
| − | get gold corpse
| |
| − | get silver corpse
| |
| − | get copper corpse
| |
| − | dropraiderloot
| |
| − | endif
| |
| − | if rand(50)
| |
| − | if name($f) / banditcall
| |
| − | or inhouse($f) == raider
| |
| − | if rand(1)
| |
| − | pmote grins wickedly at $F.
| |
| − | endif
| |
| − | else
| |
| − | mpget mob level $i 2
| |
| − | mpmath 2 \$2 - 8
| |
| − | if level($f) <= \$2
| |
| − | or level($f) < 11
| |
| − | if rand(2)
| |
| − | if rand(50)
| |
| − | pmote leers wickedly at $F.
| |
| − | else
| |
| − | snort $f
| |
| − | endif
| |
| − | endif
| |
| − | break
| |
| − | endif
| |
| − | if rand(50)
| |
| − | if rand(50)
| |
| − | steal 1. $f
| |
| − | else
| |
| − | steal coins $f
| |
| − | endif
| |
| − | dropraiderloot
| |
| − | else
| |
| − | mpkill $f
| |
| − | endif
| |
| − | mpwander
| |
| − | endif
| |
| − | endif
| |
| − | else
| |
| − | mpnextinterp
| |
| − | endif
| |
| − | \@
| |
| − |
| |
| − |
| |
| − | prog delete rand_prog 100
| |
| − | prog add rand_prog 100
| |
| − | if value(1) == 0
| |
| − | mpvaluerand 1 50 100
| |
| − | mpaddskill $i 199 100
| |
| − | endif
| |
| − | mpvalueup 0
| |
| − | if value(0) == \$1
| |
| − | mpecho $I slinks off, content with $l loot.
| |
| − | mppurge $i
| |
| − | endif
| |
| − | mpfocus $r
| |
| − | raiderbanditwork
| |
| − | if rand(33)
| |
| − | mpwander
| |
| − | endif
| |
| − | \@
| |
| − |
| |
| − | prog delete entry_prog 50
| |
| − | prog add entry_prog 50
| |
| − | mpfocus $r
| |
| − | raiderbanditwork
| |
| − | \@
| |
| − |
| |
| − | prog add greet_prog 50
| |
| − | mpfocus $n
| |
| − | raiderbanditwork
| |
| − | \@
| |
Revision as of 08:52, 3 March 2003
It sucks. Someone think of something new that it could do, or some way to make it more effective.
