Part of patch #1677738: Purple worm (with pythonscript and map), by Mike B.

git-svn-id: svn+ssh://svn.code.sf.net/p/crossfire/code/arch/trunk@8690 282e977c-c81d-0410-88c4-b93c2d0d6712

ground/nimground/Nimground3_purple.arc

@@ -0,0 +1,19 @@
+Object Nimground3_purple
+name purple flesh
+face Nimground3_purple.111
+anim
+Nimground3_purple.111
+Nimground3_purple.112
+Nimground3_purple.113
+Nimground3_purple.114
+Nimground3_purple.111
+Nimground3_purple.111
+Nimground3_purple.111
+mina
+no_pick 1
+editable 8
+is_floor 1
+speed 0.3
+magicmap purple
+end
+

monster/animal/giant_worm/event_attack_purple_worm.arc

@@ -0,0 +1,6 @@
+Object event_attack_purple_worm
+title Python
+slaying /python/misc/swallow_whole.py
+type 116
+subtype 2
+end

monster/animal/giant_worm/purple_worm.arc

@@ -0,0 +1,88 @@
+Object purple_worm
+name Purple Worm
+face purple_worm.x31
+race animal
+anim
+facings 2
+purple_worm.x31
+purple_worm.x71
+mina
+attacktype 1025
+monster 1
+sleep 1
+Str 40
+Pow 30
+Wis 20
+Dex 15
+Con 30
+Int 10
+armour 85
+resist_magic 30
+resist_acid 100
+resist_fire 30
+resist_electricity 50
+resist_poison 100
+resist_paralyze 100
+resist_death 100
+resist_blind 100
+exp 100000
+ac -15
+wc -100
+dam 50
+attacktype 3137
+hp 9000
+maxhp 9000
+sp 80
+maxsp 80
+randomitems purple_worm
+level 116
+alive 1
+speed -0.05
+weight 1800000
+can_cast_spell 1
+can_see_in_dark 1
+see_invisible 1
+editable 1
+color_fg purple
+end
+More
+Object purple_worm_2
+name Purple Worm
+face purple_worm.x31
+anim
+facings 2
+purple_worm.x31
+purple_worm.x71
+mina
+x 1
+alive 1
+color_fg purple
+end
+More
+Object purple_worm_3
+name Purple Worm
+face purple_worm.x31
+anim
+facings 2
+purple_worm.x31
+purple_worm.x71
+mina
+y 1
+alive 1
+color_fg purple
+end
+More
+Object purple_worm_4
+name Purple Worm
+face purple_worm.x31
+anim
+facings 2
+purple_worm.x31
+purple_worm.x71
+mina
+x 1
+y 1
+alive 1
+color_fg purple
+end
+

monster/animal/giant_worm/purple_worm.trs

@@ -0,0 +1,13 @@
+treasure purple_worm
+  arch spell_magic_bullet
+  more
+  arch spell_vitriol
+  more
+  arch abil_slow
+  more
+  arch event_attack_purple_worm
+  more
+  arch gem
+    chance 60
+    nrof 7
+  end