SphereCommunity
Stripper (who doesnt want one?) - Printable Version

+- SphereCommunity (https://forum.spherecommunity.net)
+-- Forum: Sphere 0.56d (/Forum-Sphere-0-56d)
+--- Forum: Script Submissions (/Forum-Script-Submissions)
+--- Thread: Stripper (who doesnt want one?) (/Thread-Stripper-who-doesnt-want-one)



Stripper (who doesnt want one?) - Ultima One - 05-16-2013 01:22 AM

Add her, talk to her, give her stuff.

Code:
[CHARDEF C_STRIPPER]
NAME=#NAMES_STRIPPER the Stripper
ID=C_WOMAN

DAM=15,30
ARMOR=40

CAN=MT_WALK|MT_EQUIP|MT_FEMALE
DESIRES=i_gold,e_notoriety,c_man,c_woman
AVERSIONS=t_TRAP,t_eerie_stuff

TEVENTS=e_stripper
TEVENTS=e_Human_Scavenge

TSPEECH=jobstripper


ON=@Create
COLOR=colors_skin
STR={86 90}
DEX={91 100}
INT={71 85}

WRESTLING=(100.0)
MAGICRESISTANCE=(100.0)
TACTICS=(100.0)

NPC=brain_Human
NEED=i_gold
NEED=i_bottle_ale
NEED=i_bottle_wine
NEED=i_bottle_liquor
NEED=i_mug_ale
NEED=i_altbier
NEED=i_starkbier
NEED=i_pils
NEED=i_vesper_ale
NEED=i_minocer_bier
NEED=i_jungbier
NEED=i_zwergenbier
NEED=i_ale_amber
NEED=i_ale_honey
NEED=i_ale_brown
NEED=i_ale_spiced
NEED=i_ale_smoked
NEED=i_ale_stout
NEED=i_ale_oktoberfest
NEED=i_cover_wein
NEED=i_glass_of_liquor
NEED=i_glass_of_wine
NEED=i_jug_cider
NEED=t_drink

KARMA=(100)
FAME=(2000)

ITEMNEWBIE=i_hair_buns
COLOR=colors_red
ITEMNEWBIE=i_show_timer
TIMER=10
ITEMNEWBIE=i_backpack

ON=@NPCRestock
ITEM=i_earrings_gold
COLOR=colors_all
ITEM=i_ring_gold
COLOR=colors_all
ITEM=i_bracelet_gold
COLOR=colors_all
ITEM=i_necklace_gold
COLOR=colors_all

ON=@Death
loot_strip_clothes

CATEGORY=Haendler
SUBSECTION=Kuenstler & Barden
DESCRIPTION=Stripper

[SPEECH jobstripper]
ON=*bravo*
ON=*super*
ON=*ingenious*
ON=*more*
   DORAND 3
   SAY Wow, thanks you liked my performance <SRC.sex mylord/mylady> Would you mind buying me a drink?
   SAY Thanks, many thanks. Next performance starts in 5 minutes.
   SAY Don't just talk - how about a drink for a hard working girl?
   ENDDO
ON=*gold*
ON=*money*
ON=*tip*
ON=*pqy*
   DORAND 3
   SAY Tip is always welcome, <SRC.sex mylord/mylady>
   EMOTE smiling happily
   SAY You're a cavalier who knows what are a girl's best friend, <SRC.TAG.NAME>
   ENDDO

ON=*love*
ON=*come*
   SAY Indeed my heart belongs just to you, <src.sex myloed/mylady>, but unfortunately I have to stay a while.

ON=*show*
ON=*undress*
ON=*strip*
ON=*dance*
   ANIM 01e
   DORAND 2
   SAY My next performance will start soon, <SRC.SEX mylord/mylady> Until then: How about a drink?
   EMOTE smiles smuggishly towards<SRC.TAG.NAME>  
   ENDDO
ON=*drink*
ON=*ale*
ON=*wine*
ON=*liquor*
ON=*beer*
on=*wine*
on=*drink*
on=*booze*
   DORAND 3
   SAY Oh thanks, that would be nice
   SAY Oh, I'll take what you're taking, <SRC.sex mylord/mylady>
   SAY Ohhh pleaaaase <SRC.sex mylord/mylady>! I'm so thirsty.
   ENDDO

ON=*fuck*
ON=*bang*
  SAY Watch your language next time - out with ye!!
  SRC.P=<src.region.p>
  src.update

ON=*whore*
ON=*hooker*
   DORAND 3
   SAY Such words towards a lady? Only an asshole like you would do that!
   EMOTE shows <SRC.TAG.NAME> the middle finger
   BEGIN
     SAY Hey, boss, throw this <SRC.SEX idiot/rabid cow> out!
     SRC.P=<src.region.p>
     src.update
   END
   ENDDO

ON=*tits*
ON=*breast*
ON=*ass*
ON=*butt*
   DORAND 3
   SAY Some gold would bring you along, darling.
   SAY What about a drink beforehand, <SRC.TAG.NAME>
   EMOTE shaking her breasts
   EMOTE jiggling with her butt
   ENDDO

[ITEMDEF i_strip_timer]
ID= i_memory
TYPE= t_eq_script
NAME=stripper
ON=@CREATE
   TIMER=10
   MORE=19

ON=@TIMER
IF (<MORE>==19)
   CONT.FINDLAYER(21).EMPTY
   CONT.ANIM 020
   MORE=<eval <MORE>-1>
   TIMER=2
   RETURN 1

ELSEIF (<MORE>==18)
   CONT.ANIM 011
   MORE=<eval <MORE>-1>
   TIMER=2
   RETURN 1

ELSEIF (<MORE>==17)
   CONT.ANIM 01e
   CONT.EMOTE smiling seductively
   CONT.FINDLAYER(6).remove //hat
   MORE=<eval <MORE>-1>
   TIMER=2
   RETURN 1

ELSEIF (<MORE>==16)
   CONT.ANIM 010
   MORE=<eval <MORE>-1>
   TIMER=2
   RETURN 1

ELSEIF (<MORE>==15)
   CONT.ANIM 0c
   CONT.FINDLAYER(7).remove //gloves
   MORE=<eval <MORE>-1>
   TIMER=2
   RETURN 1

ELSEIF (<MORE>==14)
   CONT.ANIM 01e
   MORE=<eval <MORE>-1>
   TIMER=2
   RETURN 1

ELSEIF (<MORE>==13)
   CONT.ANIM 0d
   CONT.FINDLAYER(20).remove //cape
   MORE=<eval <MORE>-1>
   TIMER=2
   RETURN 1

ELSEIF (<MORE>==12)
   CONT.ANIM 01e
   MORE=<eval <MORE>-1>
   TIMER=2
   RETURN 1

ELSEIF (<MORE>==11)
   CONT.ANIM 013
   CONT.FINDLAYER(23).remove //skirt
   MORE=<eval <MORE>-1>
   TIMER=2
   RETURN 1

ELSEIF (<MORE>==10)
   CONT.ANIM 01e
   CONT.EMOTE blushing
   MORE=<eval <MORE>-1>
   TIMER=2
   RETURN 1

ELSEIF (<MORE>==9)
   CONT.ANIM 0c
   CONT.FINDLAYER(3).remove //shoes
   MORE=<eval <MORE>-1>
   TIMER=2
   RETURN 1

ELSEIF (<MORE>==8)
   CONT.ANIM 01e
   MORE=<eval <MORE>-1>
   TIMER=2
   RETURN 1

ELSEIF (<MORE>=7)
   CONT.ANIM 0e
   CONT.FINDLAYER(5).remove //shirt
   MORE=<eval <MORE>-1>
   TIMER=2
   RETURN 1

ELSEIF (<MORE>==6)
   CONT.FINDLAYER(11).remove
   CONT.NEWITEM=i_hair_long
   CONT.ACT.COLOR=colors_red
   CONT.ACT.CONT=<CONT.UID>
   CONT.ACT.EQUIP
   CONT.ANIM 01e
   MORE=<eval <MORE>-1>
   TIMER=2
   RETURN 1

ELSEIF (<MORE>==5)
   CONT.ANIM 0d
   CONT.FINDLAYER(17).remove //corset
   MORE=<eval <MORE>-1>
   TIMER=2
   RETURN 1

ELSEIF (<MORE>==4)
   CONT.ANIM 01e
   MORE=<eval <MORE>-1>
   TIMER=2
   RETURN 1

ELSEIF (<MORE>==3)
   CONT.ANIM 01f
   CONT.EMOTE throwing kisses
   CONT.FINDLAYER(4).remove //shorts
   MORE=<eval <MORE>-1>
   TIMER=2
   RETURN 1

ELSEIF (<MORE>==2)
   CONT.ANIM 01e
   MORE=<eval <MORE>-1>
   TIMER=2
   RETURN 1

ELSEIF (<MORE>==1)
   CONT.ANIM 011
   MORE=<eval <MORE>-1>
   TIMER=2
   RETURN 1

ELSEIF (<MORE>==0)
   CONT.ANIM 020
CONT.NEWITEM=i_studded_gloves_new
CONT.ACT.COLOR=colors_stripper
   CONT.ACT.CONT=<CONT.UID>
   CONT.ACT.EQUIP
CONT.NEWITEM=i_hat_feather
   CONT.ACT.COLOR=colors_stripper
   CONT.ACT.CONT=<CONT.UID>
   CONT.ACT.EQUIP
CONT.NEWITEM=i_shirt_fancy
   CONT.ACT.COLOR=colors_stripper
   CONT.ACT.CONT=<CONT.UID>
   CONT.ACT.EQUIP
CONT.NEWITEM=i_shoes_plain
   CONT.ACT.COLOR=colors_stripper
   CONT.ACT.CONT=<CONT.UID>
   CONT.ACT.EQUIP
CONT.NEWITEM=i_doublet
   CONT.ACT.COLOR=colors_stripper
   CONT.ACT.CONT=<CONT.UID>
   CONT.ACT.EQUIP
CONT.NEWITEM=i_armor_female_shorts
   CONT.ACT.COLOR=colors_stripper
   CONT.ACT.CONT=<CONT.UID>
   CONT.ACT.EQUIP
CONT.NEWITEM=i_skirt_long
   CONT.ACT.COLOR=colors_stripper
   CONT.ACT.CONT=<CONT.UID>
   CONT.ACT.EQUIP
CONT.NEWITEM=i_cape
   CONT.ACT.COLOR=colors_stripper
   CONT.ACT.CONT=<CONT.UID>
   CONT.ACT.EQUIP
CONT.FINDLAYER(11).remove
CONT.NEWITEM=i_hair_buns
   CONT.ACT.COLOR=colors_red
   CONT.ACT.CONT=<CONT.UID>
   CONT.ACT.EQUIP
   REMOVE
   RETURN 1
ENDIF

[TEMPLATE loot_strip_clothes]
CATEGORY=Item Templates
SUBSECTION=Loot Templates
DESCRIPTION=Stripper Clothes

ITEM=i_hat_feather
COLOR=colors_stripper
ITEM=i_shirt_fancy
COLOR=colors_stripper
ITEM=i_cape
COLOR=colors_stripper
ITEM=i_armor_female_shorts
COLOR=colors_stripper
ITEM=i_skirt_long
COLOR=colors_stripper
ITEM=i_doublet
COLOR=colors_stripper
ITEM=i_sandals
COLOR=colors_stripper

[DEFNAME HUES_STRIPPER]
colors_stripper {{1 201}}

[ITEMDEF i_show_timer]
ID=i_memory
TYPE=t_eq_script
NAME=show timer
ON=@CREATE
   TIMER=300
ON=@TIMER
IF !(<CONT.RESTEST 1 i_strip_timer>)
   CONT.NEWITEM=i_strip_timer
   CONT.ACT.CONT=<CONT.UID>
   CONT.ACT.EQUIP
   TIMER=300
   CONT.EMOTE starting to dance
   RETURN 1
ELSE
TIMER=300
RETURN 1
ENDIF

[EVENTS e_stripper]
ON=@NPCSeeNewPlayer
   DORAND 3
   SAY Hi, shall I dance for you?
   SAY Would you buy a girl like me a drink?
   SAY Hey - where have you been hiding recently?
   ENDDO
ON=@PersonalSpace
   DORAND 3
   SAY Careful <SRC.SEX big boy/little lady> don't touch!
   SAY Not. So. Near!
   SAY Son't stomp on my feet, redneck!
   ENDDO

[NAMES NAMES_STRIPPER]
26
Anita
Velvet
Molly
Aurora
Cherry
Kitty
Venus
Silver
Scarlet
Sapphire
Ivy
Alexa
Summer
Pandora
Katy
Flame
Skye
Hayley
Crystal
Angel
Amber
Jasmine
Phoenix
Brittney
Lola
Ivory



RE: Stripper (who doesnt want one?) - amonvangrell - 05-16-2013 06:38 AM

LOL I HAD ONE ONCE THAT ALSO DANCE AND GO STRIPPING... AHAHAH ;D PLUS HER NAME WAS BRITNEY SPEARS... USHAUSHAUSHUAHSA