#!/usr/bin/perl -T
######################
#¡¡author:glisten
#  http://www.dsl-speed.org
######################
&get_form_data;
&emptyid unless $FORM{'sid'};
$afid=$FORM{'sid'};
&gencode;

sub emptyid{
$login_page="http://www.adultworldmedia.com";
# Replace to your affiliate program url
print "Content-Type: text/html\n\n";
   print <<"~EOT~";
<HTML>
<HEAD>
   <TITLE>Generator error</TITLE>
<META HTTP-EQUIV=Refresh CONTENT="2; URL=index.shtml">
</HEAD>
<BODY>Please input Your affiliate ID <a href=\"$login_page\">Try again.</a></BODY>
</HTML>

~EOT~
exit;
}

sub gencode{
print "Content-Type: text/html\n\n";
   print <<"~EOT~";


<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<HTML>
<HEAD>
<TITLE>Kya Tropic :: Eve Mayfair :: Emma Luvgood :: Horror Sex</TITLE>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
<link href="../horror-vamp1/horror.css" rel="stylesheet" type="text/css">
</head>

<body>

<table width="804" border="1" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td width="800" valign="top"><a href="http://tracker.zombaio.com/?$afid.7876929"><img src="../../TGP/header/XxxHorrorTheBest.jpg" alt="Horror Sex bondage video" width="800" height="360" border="0"></a></td>
  </tr>

  <tr> <td><TABLE width="100%" border=0  align="center">
    <TR>
      <TD align="center"><h2>Kya Tropic Vampire Schoolgirl in THE BODY BAG</h2>  
        As night fell on the haunted graveyard the gravedigger was dragging a body bag.   Overwhelmed by curiosity, the digger unzipped the bag to find a hot dead   catholic schoolgirl Kya Tropic. The dirty pervert ripped open her shirt to try   and fuck the still warm pussy, only to find that he had woken the undead.   Furious, horny and starving for blood the <a href="http://tracker.zombaio.com/?$afid.7876929">vampire schoolgirl</a> proceeds to take   out her revenge. Her thirst is only quenched after she feeds and finds a bible   and rosary lying on the coffin, waiting for her burial scheduled for the   following day. Kinky vampire blasphemous whore Kya Tropic, stops at nothing to   take out her revenge and satisfy her hunger!<BR></TD>
      </TR>
    <TR>
      <TD align="center"><a href="KyaTropicTheBodyBag.wmv"><img src="kyaTropicVampSchoolgirl.jpg" alt="Kya Tropic as horror sex schoolgirl vampire" width="790" height="525"></a><br>
/ <a href="KyaTropicTheBodyBag.mp4">MP4 VIDEO</a> /</TD>
      </TR>
    <TR>
      <TD align="center"><hr></TD>
    </TR>
    <TR>
      <TD align="center"><h1>Eve Mayfair Horrorsex Nun</h1>
        Innocent virgin black nun Eve Mayfair was praying on Easter eve. She was calm   and strong with the faith. As she went deeper into her faith she began to   believe that she was chosen by the lord. Unable to control her desires, she   began to pour the holy wine and the body of Christ inside of her pussy to quench   her passion. As she let herself fall pray to the Holy Spirit, she began shoving   pieced of the bible inside her Virgin Pussy and masturbating with the cross   yelling for the lord to come please her. Watch her blasphemous Easter Prayer on   XxxHorror.com and stay tuned for what comes next!</TD>
      </TR>
    <TR>
      <TD align="center"><a href="EveMayfairImmaculateConception.wmv"><img src="EveMayfairHorrorNun.jpg" alt="Evie Mayfair as innocent black nun turning to horror sex vamp" width="790" height="525"></a><br>
        / <a href="EveMayfairImmaculateConception.mp4">MP4 VIDEO</a> /</TD>
      </TR>
    <TR>
      <TD align="center"><hr></TD>
    </TR>
    <TR>
      <TD align="center"><h1>Emma Luvgood in the Unholy One</h1>
        Strong in the faith Father Angelino was walking before sunrise in the graveyard   when he saw Emma Luvgood laying on the ground. He came close trying to help her.   Emma was turned into nasty vampire freak and jumped trying to bite him. Father   Angelino scared her a way using the cross hanging on his neck. He called GOD for   help, but it was too late. Restraining Emma was not in his hands anymore. He ran   a way to seek help!</TD>
      </TR>
    <TR>
      <TD align="center"><a href="EmmaLuvgoodVamp.wmv"><img src="EmmaLuvgoodVampire.jpg" alt="Emma Luvgood Vampire Maiden" width="790" height="525"></a><br>
        / <a href="EmmaLuvgoodVamp.mp4">MP4 VIDEO</a> /</TD>
      </TR>
    

  </TABLE></td>
  </tr>
</table>
<br>
<div align="center">
  <span class="XxxHorror"><a href="http://tracker.zombaio.com/?$afid.7876929">CLICK HERE TO BROWSE XXX HORROR</a></span>

  
</div>
<br>



<div align="center">
  <p><font face="Verdana, Arial, Helvetica, sans-serif"><strong><font size="2">xxxHorror&#8482;<br>
    <font face="Verdana, Arial, Helvetica, sans-serif"><strong>18 U.S.C. 2257
    Record-Keeping Requirements Compliance Statement</strong></font> at:<br>
    http://xxxspacegirls.us/18-statement/18-statement.html </font></strong></font></p>
</div>
</body>
</html>




~EOT~
exit;
}

# Get form data
sub get_form_data {
	read(STDIN,$buffer,$ENV{'CONTENT_LENGTH'});
	if ($ENV{'QUERY_STRING'}) {
		$buffer = "$buffer\&$ENV{'QUERY_STRING'}"
	}
	@pairs = split(/&/,$buffer);
	foreach $pair (@pairs) {
		($name,$value) = split(/=/,$pair);
		$value =~ tr/+/ /;
		$value =~ s/\t//g;
		$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C",hex($1))/eg;
		$FORM{$name} = $value
	}
}

