1 package org
.sevenchan
.dongs
.creature
4 import org
.sevenchan
.dongs
.*;
5 import org
.sevenchan
.dongs
.bodyparts
.*;
6 import org
.sevenchan
.dongs
.items
.*;
7 import org
.sevenchan
.dongs
.screens
.*;
8 import org
.sevenchan
.dongs
.bodyparts
.Build
;
9 import org
.sevenchan
.dongs
.Creature
;
10 import org
.sevenchan
.dongs
.enchantment
.Corruption
;
11 import org
.sevenchan
.dongs
.screens
.WitchShopScreen
;
14 * A travelling merchant who sell body modifications and potions.
16 * Some are also hostile.
19 public class Witch
extends Creature
21 registerClassAlias
("EWitch", Witch
);
22 public var SKIN
:Skin
= new Skin
("human", "pale", "wrinkled and covered in boils");
24 public function Witch
()
26 trace
("Witch.init()");
28 this.addEnchantment
(new Corruption
(90));
29 height
= Math.random
()*1.5 + 5;
30 this.gender
= Gender
.FEMALE
;
31 this.build
= Build
.MALNOURISHED
;
32 this.hair
= new Hair
();
34 BodyPartRegistry
.human_arm
,
35 BodyPartRegistry
.human_arm
38 BodyPartRegistry
.human_leg
,
39 BodyPartRegistry
.human_leg
42 BodyPartRegistry
.human_green_eye
,
43 BodyPartRegistry
.human_green_eye
48 override public function addBreast
():Breast
50 var boob
:Breast
= BodyPartRegistry
.human_breast
;
51 boob
.size
= MathUtils
.rand
(0, 3);
56 override public function initialGenderSetup
():void
59 BodyPartRegistry
.human_breast
,
60 BodyPartRegistry
.human_breast
63 BodyPartRegistry
.human_anus
67 BodyPartRegistry
.human_testicle
,
68 BodyPartRegistry
.human_testicle
71 BodyPartRegistry
.human_penis
78 BodyPartRegistry
.human_vagina
80 breasts
[0].size
=breasts
[1].size
=MathUtils
.rand
(0,5);
85 override public function getTypeName
():String
90 override public function onEncounter
(ply
:Creature
):Boolean
93 WitchShopScreen
.push
();
97 override public function getHostile
(subj
:Creature
):Boolean
102 override public function getInterested
(subj
:Creature
):Boolean