#pig.bx is my first script so if it sucks,bite me
#greets go out to all of #FTS(2) and #Teenskaters
#scripted on 3/30/98
#you need to contact me then
#email [iCEy] at root@hax0red.dyn.ml.org OR iceman311@hotmail.com 

::: oink definitions

@ oink.1 = [i really like to roll in mud]
@ oink.2 = [i like to play with my curly penii]
@ oink.3 = [I like it nice and sloppy]
@ oink.4 = [i cant add but i sure can do the wiggly]
@ oink.5 = [i may roll in the dirt but at least i dun have a straight dick]
@ oink.6 = [i want to touch your pink squealing ass with my curly penii]
@ oink.7 = [i lost my virginity to the local sluttie chicken]
@ oink.8 = [can you sing showtunes while eating slop?]

::: pig definitions

@ pig.1 = [eats the slop with]
@ pig.2 = [sluts the farm with]
@ pig.3 = [fucks the cows with]
@ pig.4 = [rolls in the mud with]
@ pig.5 = [curls his penii with]
@ pig.6 = [sharpens his hooves with]

assign Piggy [PiGGy/iCEy]

^eval echo $G $Piggy Loaded...
^eval echo $G $Piggy Lame little addon by iCEy
^eval echo $G $Piggy type /pigh for help...

alias pigh {
  eval echo $Piggy =======[Help for $Piggy]==========
  eval echo $Piggy =  /oink sexual hygean                 =
  eval echo $Piggy =  /unf  <nick>                        =
  eval echo $Piggy =  /death <nick>                       =
  eval echo $Piggy =  /master show them who's boss        =
  eval echo $Piggy =  /sex <nick>                         =
  eval echo $Piggy =  /curl a new ctcp command            =
  eval echo $piggy ========================================
}

alias oink {
  eval say $oink[$rand(8)] $Piggy
}

alias unf {
me walks up to $0 and unzips his pants
me leaps on $0 and sticks his penii in
say *uNF* *uNF* *uNF* *uNF*
say OH GOD YES I LUB J00R ASS
say *uNF* *m0an* *uNF* *m0an* *uNF* *m0an*
say I CANT HOLD IT ANYMORE!@#$
me spasms and jerks as the creamy jizz flows out $0 's ass
notice $0 j00 have been molested wit $Piggy
} 

alias death {
me is now attacking $0 with jolt/bonk/ssping/land/teardrop $piggy
}

alias master {
me unzips his pants and begins caressing himself
me looks around and pulls a blanket over himself
me smiles to everybody as his blanket starts going up and down
me moans in delight
say ANYBODY HAVE A TISSUE??
}

alias sex {
me runs over to $0 and pulls down her pants
me drops down on his knees
say can i have the pleasure of pleasuring you $0 ?
say i promise it wont hurt a bit
me takes a whiff of $0 's vagina
say shit girlee this smells like gym socks
say havent you been taking care of it
me grabs $0 and throws her in the shower
say WASH YOUR SMELLY SNATCH YOU DUMB WH0RE!@#
}

alias curl {
ctcp $0 *squeal*
ctcp $0 *oink*
ctcp $0 *grunt*
}

alias pig {
  eval me $pig[$rand(6)] $piggy 
}

^eval set format_version $format_version + $piggy