# pirat
gs'stat'
if piratfrend<10:
'<center><img src="qwest/gadukino/pirat.jpg" ></center>'
'Purebred dog named Pirate indifferently sitting near the barn.'
end
if piratfrend>=10:
     if piratHorny<10:
     
     'Purebred dog named Pirate wags his tail when your appearance.'
     end
     if piratHorny>=10 and piratHorny<20:
     if piratsuka<3:'Purebred dog named Pirate revolves around you wagging his tail and sniffing.'
     if piratsuka>=3:'<center><img src="qwest/gadukino/sniff.jpg" ></center>'
     if piratsuka>=3:'Purebred dog named Pirate revolves around you wagging his tail and nuzzle you between the legs.'
     end
     if piratHorny>=20:
     pirand=rand(0,1)
         if piratsuka<3 or piratsuka>=3 and pirand=0:
		 'Purebred dog named Pirate pounces on your leg and rubs against her.'
		 
			 act'push Pirate':
			 cls
			 piratHorny-=1
			 minut+=15
			 dom+=1
			 gs'stat'
			 !'<center><img src="qwest/gadukino/dog.jpg" ></center>'
			 'You pushed Pirate dropping him with legs.'
			 act'Get_Away':gt $curloc
			 end
			 
			 act'endure':
			 cls
			 piratHorny=0
			 minut+=15
			 manna=manna/2
			 piratsuka+=1
			 sub+=1
			 gs'stat'
			 '<center><img src="qwest/gadukino/leghump.jpg" ></center>'
			 'You were not moving until Pirate rub against your leg. Suddenly she poured some sort of hot white liquid, Pirate immediately jumped to the side and began chesatsya but nothing had happened.'
			 act'Get_Away':gt $curloc
			 end
		 end
		 if piratsuka>=3 and pirand=1:
		 'Purebred dog named pirate stands on his hind legs and puts his front paws on your shoulder. You chustvuete like you in the ass rests like an awl member of the Pirate.'
		 	 act'push Pirate':
			 cls
			 piratHorny-=1
			 minut+=15
			 dom+=1
			 gs'stat'
			 !'<center><img src="qwest/gadukino/dog.jpg" ></center>'
			 'You pushed Pirate dropping him off his back.'
			 act'Get_Away':gt $curloc
			 end
			 
			 act'stand':
			 cls
			 !piratHorny=0
			 minut+=15
			 manna=manna/2
			 piratsuka+=1
			 sub+=1
			 !cumfrot+=1
			 gs'stat'
			 !'<center><img src="qwest/gadukino/dog.jpg" ></center>'
			 'You froze and became hard Pirate tykatsya his cock you in the ass. Pirate angry and growling jumps from you'
			 act'Get_Away':gt $curloc
			 end
			 
			 act'Stand on all fours':
			 cls
			 piratHorny=0
			 minut+=15
			 manna=manna/2
			 piratsuka+=3
			 sub+=5
			 cumfrot+=1
			 gs'stat'
			 '<center><img src="qwest/gadukino/hump.jpg" ></center>'
			 'You got up on all fours and substituting ass dog Pirate became intensely tykatsya his cock you in the ass. Soon.'
			 act'Get_Away':gt $curloc
			 end
		 end
     exit
     end
end

act'Get_Away':minut+=5&gt $loc

act'pat the Pirate':
cls
if piratfrend<10:piratfrend+=1
minut+=15
if piratsuka>0:piratHorny+=1

gs'stat'
'<center><img src="qwest/gadukino/dog.jpg" ></center>'
'You pat on the back Pirate.'
act'Get_Away':gt $curloc
end




--- pirat ---------------------------------