#############################################################################################
### Common Routines to build the header and menu structure
### This should be the same in every routine which is called
#############################################################################################
$baseurl ="http://www.danvillelive.com";
$db_user = "agentrobin_01_";
$db_pass = "J0shKr1s";
$dsn_name = 'dbi:mysql:dreamhome_01_:dobrooks.ipowermysql.com:3306';
sub place_heading() {
# $bimage = "Maroon1.png";
$bimage = "bluebanner.png";
print "<DIV style=\"position: absolute; left: 0px; top: 11px; width: 100%; height: 99px; border: 0px solid black; float: right;\">\n";
# print " <IMG BORDER=0 SRC='$baseurl/Img/$bimage' WIDTH=100% HEIGHT=100%>\n";
print " <DIV style='position: absolute; left: 0px; top: 0px;'>\n";
print " <IMG BORDER=0 SRC='$baseurl/Img/ARLogo3.jpg'>\n";
print " </DIV>\n";
#### If authroized user then put the graphics as VIP else put the sigup graphic.
goto SKIPVIP;
if ($auth_status eq "yes") {
print " <DIV style='position: absolute; left: 800px; top: 10px;'>\n";
print " <IMG BORDER=0 SRC='$baseurl/Img/vip_signup_back.png'>\n";
print " </DIV>\n";
} else {
print " <DIV style='position: absolute; left: 800px; top: 14px;'>\n";
print " <IMG BORDER=0 SRC='$baseurl/Img/guest_signup_back.png'>\n";
print " </DIV>\n";
}
SKIPVIP:
#### If authroized user then put user email address as the logined in user
print " <DIV style='position: absolute; left: 865px; top: 18px;'>\n";
print " <SPAN style='font-family: Segoe UI; font-size: .8em; color: rgb(255,255,255);'>$User_ID</SPAN>\n";
print " </DIV>\n";
#### If authroized user then put the right functions.
if ($auth_status eq "yes") {
print " <DIV style='position: absolute; left: 860px; top: 50px;'>\n";
print " <SPAN style='font-family: Segoe UI; font-size: .7em; color: rgb(255,255,255);'>Logout</SPAN>\n";
print " </DIV>\n";
} else {
print " <DIV style='position: absolute; left: 860px; top: 50px;'>\n";
print " <SPAN style='font-family: Segoe UI; font-size: .7em; color: rgb(255,255,255);'>Login</SPAN><SPAN style='font-family: Segoe UI; font-size: .7em; color: rgb(255,255,255);'>VIP Sign Up (What's this?)</SPAN>\n";
print " </DIV>\n";
}
# print " <DIV style='position: absolute; left: 100px; top: 5px;'><SPAN style='font-family: century; font-size: 2.2em; color: rgb(255,255,255);'> AgentRobin.com</SPAN></DIV>\n";
# print " <DIV style='position: absolute; left: 100px; top: 50px;'><SPAN style='font-family: Segoe UI; font-size: 1.0em; color: rgb(255,255,255);'>\#1 San Ramon Valley Real Estate Source</SPAN></DIV>\n";
search_bar();
print "</DIV>\n";
}
sub place_heading_wo() {
# $bimage = "Maroon1.png";
$bimage = "bluebanner.png";
print "<DIV style=\"position: absolute; left: 0px; top: 0px; width: 100%; height: 80px; border: 1px solid black; float: right;\">\n";
# print " <IMG BORDER=0 SRC='$baseurl/Img/$bimage' WIDTH=100% HEIGHT=100%>\n";
print " <DIV style='position: absolute; left: 0px; top: 0px;'>\n";
print " <IMG BORDER=0 SRC='$baseurl/Img/ARLogo2.jpg'>\n";
print " </DIV>\n";
#### If authroized user then put the graphics as VIP else put the sigup graphic.
goto SKIPVIP1;
if ($auth_status eq "yes") {
print " <DIV style='position: absolute; left: 800px; top: 10px;'>\n";
print " <IMG BORDER=0 SRC='$baseurl/Img/vip_signup_back.png'>\n";
print " </DIV>\n";
} else {
print " <DIV style='position: absolute; left: 800px; top: 14px;'>\n";
print " <IMG BORDER=0 SRC='$baseurl/Img/guest_signup_back.png'>\n";
print " </DIV>\n";
}
SKIPVIP1:
#### If authroized user then put user email address as the logined in user
print " <DIV style='position: absolute; left: 865px; top: 18px;'>\n";
print " <SPAN style='font-family: Segoe UI; font-size: .8em; color: rgb(255,255,255);'>$User_ID</SPAN>\n";
print " </DIV>\n";
#### If authroized user then put the right functions.
if ($auth_status eq "yes") {
print " <DIV style='position: absolute; left: 860px; top: 50px;'>\n";
print " <SPAN style='font-family: Segoe UI; font-size: .7em; color: rgb(255,255,255);'>Logout</SPAN>\n";
print " </DIV>\n";
} else {
print " <DIV style='position: absolute; left: 860px; top: 50px;'>\n";
print " <SPAN style='font-family: Segoe UI; font-size: .7em; color: rgb(255,255,255);'>Login</SPAN><SPAN style='font-family: Segoe UI; font-size: .7em; color: rgb(255,255,255);'>VIP Sign Up (What's this?)</SPAN>\n";
print " </DIV>\n";
}
print " <DIV style='position: absolute; left: 100px; top: 5px;'><SPAN style='font-family: century; font-size: 2.2em; color: rgb(255,255,255);'> AgentRobin.com</SPAN></DIV>\n";
print " <DIV style='position: absolute; left: 100px; top: 50px;'><SPAN style='font-family: Segoe UI; font-size: 1.0em; color: rgb(255,255,255);'>\#1 San Ramon Valley Real Estate Source</SPAN></DIV>\n";
print "</DIV>\n";
}
sub make_menu() {
#### This is the top horizontal Menu Code
print " <div style=\"position: absolute; top: 108px; left:0px; width: 1425px; height: 33px; z-index:100000; border: 0px solid black; text-align: right; padding: 0px;\">\n";
print " <div style=\"position: absolute; top: -1px; left:0px; width: 1425px; height: 25px; z-index:101000; border: 0px solid black; text-align: right; padding: 0px;\">\n";
insert_hor_menu();
print " </div>\n";
print " <div style=\"z-index: 5000; position: absolute; top: 0px; left:1040px; width: 0px; height: 25px; z-index:101001; border: 0px solid black; text-align: right; padding: 0px; overflow: hidden;\">\n";
print "<iframe NAME=RESULTS ID=RESULTS src=''></iframe> \n";
print " </div>\n";
print " </div>\n";
}
## <dd><span class='qmtitle'>Internet Options</span></dd>
sub insert_hor_menu() {
print "<!-- NodeFire Structure [Menu 0] -->
<ul id='qm0' class='qmmc qm-horizontal-c'>
<li><a class='qmitem-m qmparent' href='$baseurl/home.pl'>home</a>
<ul class='qmsub qm-fixedwidth' style='width:300px;height:163px;'>
<li><dl class='qmmulti qmml0' style='width:172px;'>
<dd><a class='qmitem-s' href=''><IMG SRC='$baselurl/Img/AR_menu_icon.png'></a></dd>
<dd><a class='qmitem-s' href='$baseurl/home.pl'>AgentRobin Home</a></dd>
<dd><a class='qmitem-s' href='$baseurl/sitemap.pl' title='Complete SIte Listing'>Sitemap</a></dd>
<dd><a class='qmitem-s' href='$baseurl/display_contact.pl'>Contact Me</a></dd>
<dd><a class='qmitem-s' href='$baseurl/display_profile.pl'>About Me</a></dd>
</dl></li>
</ul></li>
<li><a class='qmitem-m qmparent' href='javascript:void(0)'>properties</a>
<ul class='qmsub'>
<li><span class='qmtitle'>Industries</span></li>
<li><a class='qmitem-s' href='javascript:void(0)'>Property Search</a></li>
<li><a class='qmitem-s qmparent' href='$baseurl/communities.pl'>Communities</a>
<ul class='qmsub'>
<li><a class='qmitem-s' href='$baseurl/display_comm.pl?c=danville'>Danville</a></li>
<li><a class='qmitem-s' href='$baseurl/display_comm.pl?c=blackhawk'>Blackhawk</a></li>
<li><a class='qmitem-s' href='$baseurl/display_comm.pl?c=san ramon'>San Ramon</a></li>
<li><a class='qmitem-s' href='$baseurl/display_comm.pl?c=alamo'>Alamo</a></li>
<li><a class='qmitem-s' href='$baseurl/display_comm.pl?c=dublin'>Dublin</a></li>
<li><a class='qmitem-s' href='$baseurl/display_comm.pl?c=pleasanton'>Pleasanton</a></li>
<li><a class='qmitem-s' href='$baseurl/display_comm.pl?c=walnut creek'>Walnut Creek</a></li>
<li><a class='qmitem-s' href='$baseurl/display_comm.pl?c=lafayette'>Lafayette</a></li>
<li><a class='qmitem-s' href='$baseurl/display_comm.pl?c=livermore'>Livermore</a></li>
</ul></li>
<li><a class='qmitem-s' href='javascript:void(0)'>Investment Properties</a></li>
<li><a class='qmitem-s' href='javascript:void(0)'>Quick Search</a></li>
</ul></li>
<li><a class='qmitem-m qmparent' href='javascript:void(0)'>services</a>
<ul class='qmsub'>
<li><dl class='qmmulti qmml0' >
<dd><span class='qmtitle'>Internet Options</span></dd>
<dd><a class='qmitem-s' href='javascript:void(0)'>For Buyers</a></dd>
<dd><a class='qmitem-s' href='javascript:void(0)'>For Sellers</a></dd>
<dd><a class='qmitem-s' href='javascript:void(0)'>For Investors</a></dd>
<dd><a class='qmitem-s' href='javascript:void(0);'>Property Questionaire</a></dd>
<dd><a class='qmitem-s' href='javascript:void(0);'>Refferals</a></dd>
</dl></li>
</ul></li>
<li><a class='qmitem-m qmparent' href='javascript:void(0)'>videos</a>
<ul class='qmsub'>
<li><span class='qmtitle'>By User</span></li>
<li><a class='qmitem-s' href='javascript:void(0)'>Latest Videos</a></li>
<li><a class='qmitem-s' href='javascript:void(0)'>For Buyers</a></li>
<li><a class='qmitem-s' href='javascript:void(0)'>For Sellers</a></li>
<li><a class='qmitem-s' href='javascript:void(0)'>Finance / Loans</a></li>
<li><a class='qmitem-s' href='javascript:void(0)'>General</a></li>
<li><a class='qmitem-s' href='javascript:void(0)'>AgentRobin's Corner</a></li>
</ul></li>
<li><a class='qmitem-m qmparent' href='javascript:void(0);'>tools</a>
<ul class='qmsub'>
<li><a class='qmitem-s' href='javascript:void(0);'>Calculators</a></li>
<li><a class='qmitem-s' href='javascript:void(0);'>Amortization Schedule</a></li>
<li><a class='qmitem-s' href='javascript:void(0);'>Comparative Market Analysis</a></li>
<li><a class='qmitem-s' href='javascript:void(0);'>Real Estate Glossary</a></li>
<li><a class='qmitem-s' href='javascript:void(0);'>Links</a></li>
<li><a class='qmitem-s qmparent' href='javascript:void(0);'>Community Concierge</a>
<ul class='qmsub'>
<li><a class='qmitem-s' href='javascript:void(0);'>Danville</a></li>
<li><a class='qmitem-s' href='javascript:void(0);'>Blackhawk</a></li>
<li><a class='qmitem-s' href='javascript:void(0);'>San Ramon</a></li>
<li><a class='qmitem-s' href='javascript:void(0);'>Alamo</a></li>
<li><a class='qmitem-s' href='javascript:void(0);'>Pleasanton</a></li>
<li><a class='qmitem-s' href='javascript:void(0);'>Walnut Creek</a></li>
<li><a class='qmitem-s' href='javascript:void(0);'>Lafayette</a></li>
<li><a class='qmitem-s' href='javascript:void(0);'>Dublin</a></li>
</ul></li>
<li><a class='qmitem-s' href='javascript:void(0);'>Events</a></li>
</ul></li>
<li><a class='qmitem-m qmparent' href='javascript:void(0);'>myAgent</a>
<ul class='qmsub' style='width:300px;height:163px;>
<li><a class='qmitem-s' href='javascript:void(0);'>Login</a></li>
<li><a class='qmitem-s' href='javascript:void(0);'>My Listings</a></li>
</ul></li>
</ul>
<!-- Create Menu Settings: (Int Menu ID, Object Literal Settings - {showDelay:int, hideDelay:int, interaction:string}) [interaction options... 'hover', 'all-always-open', 'click-all', 'all', 'all-always-open', 'main')] -->
<script type='text/javascript'>qm_create(0,{showDelay:200,hideDelay:200,interaction:'hover',autoResize:false});</script><!--[END-QM0]-->";
}
###################################################################################################
## These are the block module routines
###################################################################################################
########################## This is the Robin Brooks contact Pane
sub build_about() {
$ps_left = @_[0];
$ps_top = @_[1];
$ps_width = @_[2];
$ps_height = @_[3];
$ps_border = @_[4];
$ps_bordercolor = @_[5];
$ps_background = @_[6];
$ps_title = @_[7];
$ps_titleback = @_[8];
print "<DIV style='position: absolute; left: $ps_left; top: $ps_top; width: $ps_width; height: $ps_height; border-style:dotted; border-color: $ps_bordercolor; border-width: $ps_border; text-align: center; vertical-align: top; background: url(\"$baseurl/Img/$ps_background\");'>\n";
## This is the informaiton of Robin
print " <DIV style='position: absolute; left: -1px; top: -1px; width: $ps_width; height: 38px; border-style:solid; border-width: 0px; text-align: center; vertical-align: top;'><SPAN class='topical'><IMG BORDER=0 SRC='http://agentrobin.com/Img/maroon_back.png' WIDTH=100% HEIGHT=100%></SPAN></DIV>\n";
print " <DIV style='position: absolute; left: 0px; top: 0px; width: $ps_width; height: 38px; border-style:solid; border-width: 0px; text-align: center; vertical-align: top;'><SPAN style='font-family: Segoe UI Light; font-size: 15pt; color: Black;'>$ps_title</SPAN></DIV>\n";
print " <DIV style='position: absolute; left: 0px; top: 60px; width: $ps_width; height: 220px; border-style:solid; border-width: 0px; text-align: center;'><IMG SRC='http://agentrobin.com/Images/Robin01.jpg'></DIV>\n";
print " <DIV style='position: absolute; left: 0px; top: 220px; width: $ps_width; height: 50px; border-style:solid; border-width: 0px; text-align: center; vertical-align: top; overflow: hidden;'><SPAN class='medsize_txt'>Real Estate Professional</SPAN></DIV>\n";
print " <DIV style='position: absolute; left: 0px; top: 240px; width: $ps_width; height: 50px; border-style:solid; border-width: 0px; text-align: center; vertical-align: top; overflow: hidden;'><SPAN class='topical1'><A HREF='http://www.remaxaccord.com/HOME'>RE / MAX Accord Realty</A></SPAN></DIV>\n";
print " <DIV style='position: absolute; left: 0px; top: 262px; width: $ps_width; height: 50px; border-style:solid; border-width: 0px; text-align: center; vertical-align: top; overflow: hidden;'><SPAN class='topical_sm'><A HREF='$baseurl/Home.htm'>CA DRE 01349122</A></SPAN></DIV>\n";
print " <DIV style='position: absolute; left: 0px; top: 432px; width: $ps_width; height: 50px; border-style:solid; border-width: 0px; text-align: center; vertical-align: top; overflow: hidden;'><SPAN class='topical1'>Trusted Real Estate Professional</SPAN></DIV>\n";
print " <DIV style='position: absolute; left: 0px; top: 452px; width: $ps_width; height: 50px; border-style:solid; border-width: 0px; text-align: center; vertical-align: top; overflow: hidden;'><SPAN class='topical1'>Since 2001</SPAN></DIV>\n";
print " <DIV style='position: absolute; left: 0px; top: 290px; width: $ps_width; height: 50px; border-style:solid; border-width: 0px; text-align: center; vertical-align: top; overflow: hidden;'><SPAN class='topical1'>Cell- : (925) 212-2446</SPAN></DIV>\n";
print " <DIV style='position: absolute; left: 0px; top: 310px; width: $ps_width; height: 50px; border-style:solid; border-width: 0px; text-align: center; vertical-align: top; overflow: hidden;'><SPAN class='topical1'>Office: (925) 833-8555</SPAN></DIV>\n";
print " <DIV style='position: absolute; left: 0px; top: 340px; width: $ps_width; height: 50px; border-style:solid; border-width: 0px; text-align: center; vertical-align: top; overflow: hidden;'><SPAN class='topical1'><A HREF='mailto:Robin\@AgentRobin.com'>Robin\@AgentRobin.com</A></SPAN></DIV>\n";
print " <DIV style='position: absolute; left: 0px; top: 488px; width: $ps_width; height: 53px; border-style:solid; border-width: 0px; text-align: center; vertical-align: top; overflow: hidden;'><A HREF='http://danville.yourkwoffice.com/mcj/user/AgentProfileGetAction.do?personId=342918'><IMG BORDER=0 SRC='http://agentrobin.com/Img/kw.png'></A></DIV>\n";
print "</DIV>\n";
}
sub header_img() {
print " <DIV style='position: absolute; margin: 0 auto; left: -1px; top: 0px; width: 1024px; height: 128px; border-style:dotted; border-color: rgb(0,0,0); border-width: 0px; text-align: center; vertical-align: top; '>\n";
print " <DIV style='position: absolute; left: 0px; top: 0px; width: 1024px; height: 128px; border-style:solid; border-width: 0px; text-align: right;'><IMG SRC='$baseurl/Img/sm_house.jpg'></DIV>\n";
print " </DIV>\n";
}
sub under_image() {
$u_top = @_[0];
$u_topx = $u_top . "px";
print "<DIV style='position: relative; margin: 0 auto; left: 0px; top: $u_topx; width: 100%; height: 300px; border-style:dotted; border-color: rgb(0,0,0); border-width: 0px; text-align: center; vertical-align: top; background: rgb(197,168,126) url(\"$baseurl/Img/under_img.jpg\") repeat-x;'>\n";
print " <DIV style='position: relative; margin: 0 auto; top: 0px; width: 1024px; height: 300px; border-style:dotted; border-color: rgb(0,0,0); border-width: 0px; text-align: center; vertical-align: top; background: rgb(197,168,126) url(\"$baseurl/Img/under_img.jpg\");'>\n";
print " </DIV>\n";
print "</DIV>\n";
}
sub under_image_gra() {
$u_top = @_[0];
$u_topx = $u_top . "px";
print "<DIV style='position: relative; margin: 0 auto; left: 0px; top: $u_topx; width: 100%; height: 300px; border-style:dotted; border-color: rgb(0,0,0); border-width: 0px; text-align: center; vertical-align: top; background: rgb(197,168,126) url(\"$baseurl/Img/under_img_gra.jpg\") repeat-x;'>\n";
print " <DIV style='position: relative; margin: 0 auto; top: 0px; width: 1024px; height: 300px; border-style:dotted; border-color: rgb(0,0,0); border-width: 0px; text-align: center; vertical-align: top; background: rgb(197,168,126) url(\"$baseurl/Img/under_img_gra.jpg\");'>\n";
print " </DIV>\n";
print "</DIV>\n";
}
sub footer_info() {
$ps_left = @_[0];
$ps_top = @_[1];
$ps_width = @_[2];
$ps_height = @_[3];
$ps_border = @_[4];
$ps_bordercolor = @_[5];
$ps_background = @_[6];
$ps_title = @_[7];
$ps_titleback = @_[8];
$ucolor = "rgb(215,200,175)";
print "<DIV style='position: relative; margin: 0 auto; left: 0px; top: $ps_top; width: 100%; height: 350px; border-style:dotted; border-color: rgb(0,0,0); border-width: 0px; text-align: center; vertical-align: top; background: rgb(197,168,126) url(\"$baseurl/Img/bg-foot.jpg\") repeat-x;'>\n";
print " <DIV style='position: relative; margin: 0 auto; top: 0px; width: 1024px; height: 350px; border-style:dotted; border-color: rgb(0,0,0); border-width: 0px; text-align: center; vertical-align: top; background: rgb(197,168,126) url(\"$baseurl/Img/bg-foot.jpg\");'>\n";
## This is the informaiton of Robin
print " <DIV style='position: absolute; left: 0px; top: 70px; width: 170px; height: 160px; border-style:solid; border-width: 0px; text-align: center;'><IMG SRC='$baseurl/Img/robin_brooks1.jpg'></DIV>\n";
print " <DIV style='position: absolute; left: 190px; top: 80px; width: 150px; height: 38px; border-style:solid; border-width: 0px; text-align: left; vertical-align: top;'><SPAN style='font-family: Book Antigua; font-size: 15pt; color: rgb(124,78,0);'>MEET ROBIN</SPAN></DIV>\n";
print " <DIV style='position: absolute; left: 190px; top: 100px; width: 150px; height: 38px; border-style:solid; border-width: 0px; text-align: left; vertical-align: top;'><SPAN style='font-family: Book Antigua; font-size: 13pt; color: rgb(124,78,0);'>AgentRobin</SPAN></DIV>\n";
print " <DIV style='position: absolute; left: 190px; top: 130px; width: 400px; height: 200px; border-style:solid; border-width: 0px; text-align: left; vertical-align: top;'><SPAN style='font-family: Segoe UI Light; font-size: 9pt; color: black;'>As a bay area native I pride myself on my detailed knowledge of the San Francisco bay and it\'s widely diverse communities. Having left a highly succesful high tech career in 2001 to pursue a more \"friendly\" people focused industry such as real estate. I bring the same energetic work ethic and real estate has become my passion which is shown in my highly successful real estate career </SPAN></DIV>\n";
print " <DIV style='position: absolute; left: 0px; top: 245px; width: 170px; height: 120px; border-style:solid; border-width: 0px; text-align: center;'><IMG SRC='$baseurl/Img/remax_footer.jpg'></DIV>\n";
print " <DIV style='position: absolute; left: 190px; top: 245px; width: 400px; height: 200px; border-style:solid; border-width: 0px; text-align: left; vertical-align: top;'><SPAN style='font-family: Segoe UI Light; font-size: 11pt; color: black;'>RE/MAX - America's #1 Real Estate Agency - By Far!</SPAN></DIV>\n";
print " <DIV style='position: absolute; left: 190px; top: 265px; width: 400px; height: 200px; border-style:solid; border-width: 0px; text-align: left; vertical-align: top;'><SPAN style='font-family: Segoe UI Light; font-size: 9pt; color: black;'>Experience, Dependability and Impecable Client Services is the difference!</SPAN></DIV>\n";
## This is the community list
print " <DIV style='position: absolute; left: 660px; top: 80px; width: 150px; height: 38px; border-style:solid; border-width: 0px; text-align: left; vertical-align: top;'><SPAN style='font-family: Book Antigua; font-size: 15pt; color: rgb(124,78,0);'>COMMUNITIES</SPAN></DIV>\n";
print " <DIV style='position: absolute; left: 652px; top: 110px; width: 150px; height: 18px; border-style:solid; border-color: $ucolor; border-width: 1px 0px 1px 0px; text-align: left; vertical-align: top;'><IMG SRC='$baseurl/Img/brown_bullet.png'><A HREF='$baseurl/'><SPAN style='font-family: Segoe UI Light; font-size: 10pt; color: rgb(124,78,0);'>Alamo</SPAN></A></DIV>\n";
print " <DIV style='position: absolute; left: 652px; top: 129px; width: 150px; height: 18px; border-style:solid; border-color: $ucolor; border-width: 0px 0px 1px 0px; text-align: left; vertical-align: top;'><IMG SRC='$baseurl/Img/brown_bullet.png'><A HREF='$baseurl/'><SPAN style='font-family: Segoe UI Light; font-size: 10pt; color: rgb(124,78,0);'>Blackhawk</SPAN></A></DIV>\n";
print " <DIV style='position: absolute; left: 652px; top: 148px; width: 150px; height: 18px; border-style:solid; border-color: $ucolor; border-width: 0px 0px 1px 0px; text-align: left; vertical-align: top;'><IMG SRC='$baseurl/Img/brown_bullet.png'><A HREF='$baseurl/'><SPAN style='font-family: Segoe UI Light; font-size: 10pt; color: rgb(124,78,0);'>Danville</SPAN></A></DIV>\n";
print " <DIV style='position: absolute; left: 652px; top: 167px; width: 150px; height: 18px; border-style:solid; border-color: $ucolor; border-width: 0px 0px 1px 0px; text-align: left; vertical-align: top;'><IMG SRC='$baseurl/Img/brown_bullet.png'><A HREF='$baseurl/'><SPAN style='font-family: Segoe UI Light; font-size: 10pt; color: rgb(124,78,0);'>Diablo</SPAN></A></DIV>\n";
print " <DIV style='position: absolute; left: 652px; top: 186px; width: 150px; height: 18px; border-style:solid; border-color: $ucolor; border-width: 0px 0px 1px 0px; text-align: left; vertical-align: top;'><IMG SRC='$baseurl/Img/brown_bullet.png'><A HREF='$baseurl/'><SPAN style='font-family: Segoe UI Light; font-size: 10pt; color: rgb(124,78,0);'>Dublin</SPAN></A></DIV>\n";
print " <DIV style='position: absolute; left: 652px; top: 205px; width: 150px; height: 18px; border-style:solid; border-color: $ucolor; border-width: 0px 0px 1px 0px; text-align: left; vertical-align: top;'><IMG SRC='$baseurl/Img/brown_bullet.png'><A HREF='$baseurl/'><SPAN style='font-family: Segoe UI Light; font-size: 10pt; color: rgb(124,78,0);'>Lafayette</SPAN></A></DIV>\n";
print " <DIV style='position: absolute; left: 652px; top: 224px; width: 150px; height: 18px; border-style:solid; border-color: $ucolor; border-width: 0px 0px 1px 0px; text-align: left; vertical-align: top;'><IMG SRC='$baseurl/Img/brown_bullet.png'><A HREF='$baseurl/'><SPAN style='font-family: Segoe UI Light; font-size: 10pt; color: rgb(124,78,0);'>Livermore</SPAN></A></DIV>\n";
print " <DIV style='position: absolute; left: 652px; top: 243px; width: 150px; height: 18px; border-style:solid; border-color: $ucolor; border-width: 0px 0px 1px 0px; text-align: left; vertical-align: top;'><IMG SRC='$baseurl/Img/brown_bullet.png'><A HREF='$baseurl/'><SPAN style='font-family: Segoe UI Light; font-size: 10pt; color: rgb(124,78,0);'>Pleasanton</SPAN></A></DIV>\n";
print " <DIV style='position: absolute; left: 652px; top: 262px; width: 150px; height: 18px; border-style:solid; border-color: $ucolor; border-width: 0px 0px 1px 0px; text-align: left; vertical-align: top;'><IMG SRC='$baseurl/Img/brown_bullet.png'><A HREF='$baseurl/'><SPAN style='font-family: Segoe UI Light; font-size: 10pt; color: rgb(124,78,0);'>San Ramon</SPAN></A></DIV>\n";
print " <DIV style='position: absolute; left: 652px; top: 281px; width: 150px; height: 18px; border-style:solid; border-color: $ucolor; border-width: 0px 0px 1px 0px; text-align: left; vertical-align: top;'><IMG SRC='$baseurl/Img/brown_bullet.png'><A HREF='$baseurl/'><SPAN style='font-family: Segoe UI Light; font-size: 10pt; color: rgb(124,78,0);'>Walnut Creek</SPAN></A></DIV>\n";
## This is the service list
print " <DIV style='position: absolute; left: 880px; top: 80px; width: 150px; height: 38px; border-style:solid; border-width: 0px; text-align: left; vertical-align: top;'><SPAN style='font-family: Book Antigua; font-size: 15pt; color: rgb(124,78,0);'>SERVICES</SPAN></DIV>\n";
print " <DIV style='position: absolute; left: 852px; top: 110px; width: 150px; height: 18px; border-style:solid; border-color: $ucolor; border-width: 1px 0px 1px 0px; text-align: left; vertical-align: middle;'><IMG SRC='$baseurl/Img/brown_bullet.png'><A HREF='$baseurl/'><SPAN style='font-family: Segoe UI Light; font-size: 10pt; color: rgb(124,78,0);'>Buyer Information</SPAN></A></DIV>\n";
print " <DIV style='position: absolute; left: 852px; top: 129px; width: 150px; height: 18px; border-style:solid; border-color: $ucolor; border-width: 0px 0px 1px 0px; text-align: left; vertical-align: middle;'><IMG SRC='$baseurl/Img/brown_bullet.png'><A HREF='$baseurl/'><SPAN style='font-family: Segoe UI Light; font-size: 10pt; color: rgb(124,78,0);'>Seller Information</SPAN></A></DIV>\n";
print " <DIV style='position: absolute; left: 852px; top: 148px; width: 150px; height: 18px; border-style:solid; border-color: $ucolor; border-width: 0px 0px 1px 0px; text-align: left; vertical-align: top;'><IMG SRC='$baseurl/Img/brown_bullet.png'><A HREF='$baseurl/'><SPAN style='font-family: Segoe UI Light; font-size: 10pt; color: rgb(124,78,0);'>Investors</SPAN></A></DIV>\n";
print " <DIV style='position: absolute; left: 852px; top: 167px; width: 150px; height: 18px; border-style:solid; border-color: $ucolor; border-width: 0px 0px 1px 0px; text-align: left; vertical-align: top;'><IMG SRC='$baseurl/Img/brown_bullet.png'><A HREF='$baseurl/'><SPAN style='font-family: Segoe UI Light; font-size: 10pt; color: rgb(124,78,0);'>Relocation</SPAN></A></DIV>\n";
print " <DIV style='position: absolute; left: 852px; top: 186px; width: 150px; height: 18px; border-style:solid; border-color: $ucolor; border-width: 0px 0px 1px 0px; text-align: left; vertical-align: top;'><IMG SRC='$baseurl/Img/brown_bullet.png'><A HREF='$baseurl/'><SPAN style='font-family: Segoe UI Light; font-size: 10pt; color: rgb(124,78,0);'>Short Sales</SPAN></A></DIV>\n";
print " <DIV style='position: absolute; left: 852px; top: 205px; width: 150px; height: 18px; border-style:solid; border-color: $ucolor; border-width: 0px 0px 1px 0px; text-align: left; vertical-align: top;'><IMG SRC='$baseurl/Img/brown_bullet.png'><A HREF='$baseurl/'><SPAN style='font-family: Segoe UI Light; font-size: 10pt; color: rgb(124,78,0);'>Market Analysis</SPAN></A></DIV>\n";
print " <DIV style='position: absolute; left: 852px; top: 224px; width: 150px; height: 18px; border-style:solid; border-color: $ucolor; border-width: 0px 0px 1px 0px; text-align: left; vertical-align: top;'><IMG SRC='$baseurl/Img/brown_bullet.png'><A HREF='$baseurl/'><SPAN style='font-family: Segoe UI Light; font-size: 10pt; color: rgb(124,78,0);'>Voice PAD</SPAN></A></DIV>\n";
print " <DIV style='position: absolute; margin: 0 auto; top: 330px; width: 1024px; height: 15px; border-style:dotted; border-color: rgb(0,0,0); border-width: 0px; text-align: center; vertical-align: top; '>\n";
print " <SPAN style='font-family: Segoe UI Light; font-size: 10pt; color: rgb(124,78,0);'>Robin Brooks - REMAX Accord - 517 Sycamore Valley Road West - Danville, CA 94526 - (925) 212-2446</SPAN>\n";
print " </DIV>\n";
print " </DIV>\n";
###### This is the contact information
print " </DIV>\n";
}
sub footer_info_ab() {
$ps_left = @_[0];
$ps_top = @_[1];
$ps_width = @_[2];
$ps_height = @_[3];
$ps_border = @_[4];
$ps_bordercolor = @_[5];
$ps_background = @_[6];
$ps_title = @_[7];
$ps_titleback = @_[8];
$ucolor = "rgb(215,200,175)";
print "<DIV style='position: absolute; margin: 0 auto; left: 0px; top: $ps_top; width: 100%; height: 350px; border-style:dotted; border-color: rgb(0,0,0); border-width: 0px; text-align: center; vertical-align: top; background: rgb(197,168,126) url(\"$baseurl/Img/bg-foot.jpg\") repeat-x;'>\n";
print " <DIV style='position: relative; margin: 0 auto; top: 0px; width: 1024px; height: 350px; border-style:dotted; border-color: rgb(0,0,0); border-width: 0px; text-align: center; vertical-align: top; background: rgb(197,168,126) url(\"$baseurl/Img/bg-foot.jpg\");'>\n";
## This is the informaiton of Robin
print " <DIV style='position: absolute; left: 0px; top: 70px; width: 170px; height: 160px; border-style:solid; border-width: 0px; text-align: center;'><IMG SRC='$baseurl/Img/robin_brooks1.jpg'></DIV>\n";
print " <DIV style='position: absolute; left: 190px; top: 80px; width: 150px; height: 38px; border-style:solid; border-width: 0px; text-align: left; vertical-align: top;'><SPAN style='font-family: Book Antigua; font-size: 15pt; color: rgb(124,78,0);'>MEET ROBIN</SPAN></DIV>\n";
print " <DIV style='position: absolute; left: 190px; top: 100px; width: 150px; height: 38px; border-style:solid; border-width: 0px; text-align: left; vertical-align: top;'><SPAN style='font-family: Book Antigua; font-size: 13pt; color: rgb(124,78,0);'>AgentRobin</SPAN></DIV>\n";
print " <DIV style='position: absolute; left: 190px; top: 130px; width: 400px; height: 200px; border-style:solid; border-width: 0px; text-align: left; vertical-align: top;'><SPAN style='font-family: Segoe UI Light; font-size: 9pt; color: black;'>As a bay area native I pride myself on my detailed knowledge of the San Francisco bay and it\'s widely diverse communities. Having left a highly succesful high tech career in 2001 to pursue a more \"friendly\" people focused industry such as real estate. I bring the same energetic work ethic and real estate has become my passion which is shown in my highly successful real estate career </SPAN></DIV>\n";
print " <DIV style='position: absolute; left: 0px; top: 245px; width: 170px; height: 120px; border-style:solid; border-width: 0px; text-align: center;'><IMG SRC='$baseurl/Img/remax_footer.jpg'></DIV>\n";
print " <DIV style='position: absolute; left: 190px; top: 245px; width: 400px; height: 200px; border-style:solid; border-width: 0px; text-align: left; vertical-align: top;'><SPAN style='font-family: Segoe UI Light; font-size: 11pt; color: black;'>RE/MAX - America's #1 Real Estate Agency - By Far!</SPAN></DIV>\n";
print " <DIV style='position: absolute; left: 190px; top: 265px; width: 400px; height: 200px; border-style:solid; border-width: 0px; text-align: left; vertical-align: top;'><SPAN style='font-family: Segoe UI Light; font-size: 9pt; color: black;'>Experience, Dependability and Impecable Client Services is the difference!</SPAN></DIV>\n";
## This is the community list
print " <DIV style='position: absolute; left: 660px; top: 80px; width: 150px; height: 38px; border-style:solid; border-width: 0px; text-align: left; vertical-align: top;'><SPAN style='font-family: Book Antigua; font-size: 15pt; color: rgb(124,78,0);'>COMMUNITIES</SPAN></DIV>\n";
print " <DIV style='position: absolute; left: 652px; top: 110px; width: 150px; height: 18px; border-style:solid; border-color: $ucolor; border-width: 1px 0px 1px 0px; text-align: left; vertical-align: top;'><IMG SRC='$baseurl/Img/brown_bullet.png'><A HREF='$baseurl/'><SPAN style='font-family: Segoe UI Light; font-size: 10pt; color: rgb(124,78,0);'>Alamo</SPAN></A></DIV>\n";
print " <DIV style='position: absolute; left: 652px; top: 129px; width: 150px; height: 18px; border-style:solid; border-color: $ucolor; border-width: 0px 0px 1px 0px; text-align: left; vertical-align: top;'><IMG SRC='$baseurl/Img/brown_bullet.png'><A HREF='$baseurl/'><SPAN style='font-family: Segoe UI Light; font-size: 10pt; color: rgb(124,78,0);'>Blackhawk</SPAN></A></DIV>\n";
print " <DIV style='position: absolute; left: 652px; top: 148px; width: 150px; height: 18px; border-style:solid; border-color: $ucolor; border-width: 0px 0px 1px 0px; text-align: left; vertical-align: top;'><IMG SRC='$baseurl/Img/brown_bullet.png'><A HREF='$baseurl/'><SPAN style='font-family: Segoe UI Light; font-size: 10pt; color: rgb(124,78,0);'>Danville</SPAN></A></DIV>\n";
print " <DIV style='position: absolute; left: 652px; top: 167px; width: 150px; height: 18px; border-style:solid; border-color: $ucolor; border-width: 0px 0px 1px 0px; text-align: left; vertical-align: top;'><IMG SRC='$baseurl/Img/brown_bullet.png'><A HREF='$baseurl/'><SPAN style='font-family: Segoe UI Light; font-size: 10pt; color: rgb(124,78,0);'>Diablo</SPAN></A></DIV>\n";
print " <DIV style='position: absolute; left: 652px; top: 186px; width: 150px; height: 18px; border-style:solid; border-color: $ucolor; border-width: 0px 0px 1px 0px; text-align: left; vertical-align: top;'><IMG SRC='$baseurl/Img/brown_bullet.png'><A HREF='$baseurl/'><SPAN style='font-family: Segoe UI Light; font-size: 10pt; color: rgb(124,78,0);'>Dublin</SPAN></A></DIV>\n";
print " <DIV style='position: absolute; left: 652px; top: 205px; width: 150px; height: 18px; border-style:solid; border-color: $ucolor; border-width: 0px 0px 1px 0px; text-align: left; vertical-align: top;'><IMG SRC='$baseurl/Img/brown_bullet.png'><A HREF='$baseurl/'><SPAN style='font-family: Segoe UI Light; font-size: 10pt; color: rgb(124,78,0);'>Lafayette</SPAN></A></DIV>\n";
print " <DIV style='position: absolute; left: 652px; top: 224px; width: 150px; height: 18px; border-style:solid; border-color: $ucolor; border-width: 0px 0px 1px 0px; text-align: left; vertical-align: top;'><IMG SRC='$baseurl/Img/brown_bullet.png'><A HREF='$baseurl/'><SPAN style='font-family: Segoe UI Light; font-size: 10pt; color: rgb(124,78,0);'>Livermore</SPAN></A></DIV>\n";
print " <DIV style='position: absolute; left: 652px; top: 243px; width: 150px; height: 18px; border-style:solid; border-color: $ucolor; border-width: 0px 0px 1px 0px; text-align: left; vertical-align: top;'><IMG SRC='$baseurl/Img/brown_bullet.png'><A HREF='$baseurl/'><SPAN style='font-family: Segoe UI Light; font-size: 10pt; color: rgb(124,78,0);'>Pleasanton</SPAN></A></DIV>\n";
print " <DIV style='position: absolute; left: 652px; top: 262px; width: 150px; height: 18px; border-style:solid; border-color: $ucolor; border-width: 0px 0px 1px 0px; text-align: left; vertical-align: top;'><IMG SRC='$baseurl/Img/brown_bullet.png'><A HREF='$baseurl/'><SPAN style='font-family: Segoe UI Light; font-size: 10pt; color: rgb(124,78,0);'>San Ramon</SPAN></A></DIV>\n";
print " <DIV style='position: absolute; left: 652px; top: 281px; width: 150px; height: 18px; border-style:solid; border-color: $ucolor; border-width: 0px 0px 1px 0px; text-align: left; vertical-align: top;'><IMG SRC='$baseurl/Img/brown_bullet.png'><A HREF='$baseurl/'><SPAN style='font-family: Segoe UI Light; font-size: 10pt; color: rgb(124,78,0);'>Walnut Creek</SPAN></A></DIV>\n";
## This is the service list
print " <DIV style='position: absolute; left: 880px; top: 80px; width: 150px; height: 38px; border-style:solid; border-width: 0px; text-align: left; vertical-align: top;'><SPAN style='font-family: Book Antigua; font-size: 15pt; color: rgb(124,78,0);'>SERVICES</SPAN></DIV>\n";
print " <DIV style='position: absolute; left: 852px; top: 110px; width: 150px; height: 18px; border-style:solid; border-color: $ucolor; border-width: 1px 0px 1px 0px; text-align: left; vertical-align: middle;'><IMG SRC='$baseurl/Img/brown_bullet.png'><A HREF='$baseurl/'><SPAN style='font-family: Segoe UI Light; font-size: 10pt; color: rgb(124,78,0);'>Buyer Information</SPAN></A></DIV>\n";
print " <DIV style='position: absolute; left: 852px; top: 129px; width: 150px; height: 18px; border-style:solid; border-color: $ucolor; border-width: 0px 0px 1px 0px; text-align: left; vertical-align: middle;'><IMG SRC='$baseurl/Img/brown_bullet.png'><A HREF='$baseurl/'><SPAN style='font-family: Segoe UI Light; font-size: 10pt; color: rgb(124,78,0);'>Seller Information</SPAN></A></DIV>\n";
print " <DIV style='position: absolute; left: 852px; top: 148px; width: 150px; height: 18px; border-style:solid; border-color: $ucolor; border-width: 0px 0px 1px 0px; text-align: left; vertical-align: top;'><IMG SRC='$baseurl/Img/brown_bullet.png'><A HREF='$baseurl/'><SPAN style='font-family: Segoe UI Light; font-size: 10pt; color: rgb(124,78,0);'>Investors</SPAN></A></DIV>\n";
print " <DIV style='position: absolute; left: 852px; top: 167px; width: 150px; height: 18px; border-style:solid; border-color: $ucolor; border-width: 0px 0px 1px 0px; text-align: left; vertical-align: top;'><IMG SRC='$baseurl/Img/brown_bullet.png'><A HREF='$baseurl/'><SPAN style='font-family: Segoe UI Light; font-size: 10pt; color: rgb(124,78,0);'>Relocation</SPAN></A></DIV>\n";
print " <DIV style='position: absolute; left: 852px; top: 186px; width: 150px; height: 18px; border-style:solid; border-color: $ucolor; border-width: 0px 0px 1px 0px; text-align: left; vertical-align: top;'><IMG SRC='$baseurl/Img/brown_bullet.png'><A HREF='$baseurl/'><SPAN style='font-family: Segoe UI Light; font-size: 10pt; color: rgb(124,78,0);'>Short Sales</SPAN></A></DIV>\n";
print " <DIV style='position: absolute; left: 852px; top: 205px; width: 150px; height: 18px; border-style:solid; border-color: $ucolor; border-width: 0px 0px 1px 0px; text-align: left; vertical-align: top;'><IMG SRC='$baseurl/Img/brown_bullet.png'><A HREF='$baseurl/'><SPAN style='font-family: Segoe UI Light; font-size: 10pt; color: rgb(124,78,0);'>Market Analysis</SPAN></A></DIV>\n";
print " <DIV style='position: absolute; left: 852px; top: 224px; width: 150px; height: 18px; border-style:solid; border-color: $ucolor; border-width: 0px 0px 1px 0px; text-align: left; vertical-align: top;'><IMG SRC='$baseurl/Img/brown_bullet.png'><A HREF='$baseurl/'><SPAN style='font-family: Segoe UI Light; font-size: 10pt; color: rgb(124,78,0);'>Voice PAD</SPAN></A></DIV>\n";
print " <DIV style='position: absolute; margin: 0 auto; top: 330px; width: 1024px; height: 15px; border-style:dotted; border-color: rgb(0,0,0); border-width: 0px; text-align: center; vertical-align: top; '>\n";
print " <SPAN style='font-family: Segoe UI Light; font-size: 10pt; color: rgb(124,78,0);'>Robin Brooks - REMAX Accord - 517 Sycamore Valley Road West - Danville, CA 94526 - (925) 212-2446</SPAN>\n";
print " </DIV>\n";
print " </DIV>\n";
###### This is the contact information
print " </DIV>\n";
}
sub buyer_service() {
$ps_left = @_[0];
$ps_top = @_[1];
$ps_width = @_[2];
$ps_height = @_[3];
$ps_border = @_[4];
$ps_bordercolor = @_[5];
$ps_background = @_[6];
$ps_title = @_[7];
$ps_titleback = @_[8];
print "<DIV style='position: absolute; left: $ps_left; top: $ps_top; width: $ps_width; height: $ps_height; border-style:dotted; border-color: $ps_bordercolor; border-width: $ps_border; text-align: center; vertical-align: top; background: url(\"$baseurl/Img/$ps_background\");'>\n";
## This is the informaiton of Robin
print " <DIV style='position: absolute; left: -1px; top: -1px; width: $ps_width; height: 38px; border-style:solid; border-width: 0px; text-align: center; vertical-align: top;'><SPAN class='topical'><IMG BORDER=0 SRC='http://agentrobin.com/Img/maroon_back.png' WIDTH=100% HEIGHT=100%></SPAN></DIV>\n";
print " <DIV style='position: absolute; left: 0px; top: 0px; width: $ps_width; height: 38px; border-style:solid; border-width: 0px; text-align: center; vertical-align: top;'><SPAN style='font-family: Segoe UI Light; font-size: 15pt; color: Black;'>$ps_title</SPAN></DIV>\n";
##### Actual Box Contents
# print " <DIV style='position: absolute; left: 0px; top: 60px; width: $ps_width; height: 220px; border-style:solid; border-width: 0px; text-align: center;'><IMG SRC='http://agentrobin.com/Images/Robin01.jpg'></DIV>\n";
print " <DIV style='position: absolute; left: 0px; top: 60px; width: $ps_width; height: 50px; border-style:solid; border-width: 0px; text-align: center; vertical-align: top; overflow: hidden;'><SPAN class='medsize_txt'>ROBIN BROOKS</SPAN></DIV>\n";
print " <DIV style='position: absolute; left: 0px; top: 90px; width: $ps_width; height: 50px; border-style:solid; border-width: 0px; text-align: center; vertical-align: top; overflow: hidden;'><SPAN class='medsize_txt'>Real Estate Professional</SPAN></DIV>\n";
print " <DIV style='position: absolute; left: 0px; top: 110px; width: $ps_width; height: 50px; border-style:solid; border-width: 0px; text-align: center; vertical-align: top; overflow: hidden;'><SPAN class='topical1'><A HREF='http://www.remaxaccord.com/HOME'>RE / MAX Accord Realty</A></SPAN></DIV>\n";
print " <DIV style='position: absolute; left: 0px; top: 130px; width: $ps_width; height: 50px; border-style:solid; border-width: 0px; text-align: center; vertical-align: top; overflow: hidden;'><SPAN class='topical_sm'><A HREF='$baseurl/Home.htm'>CA DRE 01349122</A></SPAN></DIV>\n";
print " <DIV style='position: absolute; left: 0px; top: 160px; width: $ps_width; height: 50px; border-style:solid; border-width: 0px; text-align: center; vertical-align: top; overflow: hidden;'><SPAN class='topical1'>Cell- : (925) 212-2446</SPAN></DIV>\n";
print " <DIV style='position: absolute; left: 0px; top: 180px; width: $ps_width; height: 50px; border-style:solid; border-width: 0px; text-align: center; vertical-align: top; overflow: hidden;'><SPAN class='topical1'>Office: (925) 833-8555</SPAN></DIV>\n";
print " <DIV style='position: absolute; left: 0px; top: 230px; width: $ps_width; height: 220px; border-style:solid; border-width: 0px; text-align: center;'><A HREF='$baseurl/pba.pl'><IMG SRC='$baseurl/Img/BYO1.png'></A></DIV>\n";
print " <DIV style='position: absolute; left: 0px; top: 270px; width: $ps_width; height: 220px; border-style:solid; border-width: 0px; text-align: center;'><A HREF='$baseurl/relo.pl'><IMG SRC='$baseurl/Img/BYO2.png'></A></DIV>\n";
print " <DIV style='position: absolute; left: 0px; top: 311px; width: $ps_width; height: 220px; border-style:solid; border-width: 0px; text-align: center;'><A HREF='$baseurl/ssfc.pl'><IMG SRC='$baseurl/Img/BYO3.png'></A></DIV>\n";
print " <DIV style='position: absolute; left: 0px; top: 352px; width: $ps_width; height: 220px; border-style:solid; border-width: 0px; text-align: center;'><A HREF='$baseurl/RI.pl'><IMG SRC='$baseurl/Img/BYO4.png'></A></DIV>\n";
print " <DIV style='position: absolute; left: 0px; top: 490px; width: $ps_width; height: 50px; border-style:solid; border-width: 0px; text-align: center; vertical-align: top; overflow: hidden;'><SPAN class='topical1'>Trusted Real Estate Professional</SPAN></DIV>\n";
print " <DIV style='position: absolute; left: 0px; top: 510px; width: $ps_width; height: 50px; border-style:solid; border-width: 0px; text-align: center; vertical-align: top; overflow: hidden;'><SPAN class='topical1'>Since 2001</SPAN></DIV>\n";
# print " <DIV style='position: absolute; left: 0px; top: 340px; width: $ps_width; height: 50px; border-style:solid; border-width: 0px; text-align: center; vertical-align: top; overflow: hidden;'><SPAN class='topical1'><A HREF='mailto:Robin\@AgentRobin.com'>Robin\@AgentRobin.com</A></SPAN></DIV>\n";
print " <DIV style='position: absolute; left: 0px; top: 540px; width: $ps_width; height: 53px; border-style:solid; border-width: 0px; text-align: center; vertical-align: top; overflow: hidden;'><A HREF='http://danville.yourkwoffice.com/mcj/user/AgentProfileGetAction.do?personId=342918'><IMG BORDER=0 SRC='http://agentrobin.com/Img/kw.png'></A></DIV>\n";
##### End actual box contents
print "</DIV>\n";
}
sub search_bar() {
print "<FORM Action='$baseurl/QSRCH.pl' Method=PUT Name=sform>\n";
print "<DIV style='z-index: 10000; position: absolute; left: 640px; top: 70px; height: 25px;'><SPAN style='font-family: Segoe UI Light; font-size: .9em; color: rgb(255,255,255);'><INPUT style='background:rgb(242,242,242); color: black;' TYPE=Text Size=40 Name=SCRIT></SPAN></DIV>\n";
print "<DIV style='z-index: 10001; position: absolute; left: 926px; top: 70px;'><SPAN style='font-family: Segoe UI Light; font-size: .9em; color: rgb(255,255,255);'><IMG SRC='$baseurl/Img/search_button.jpg' onclick=\"document.sform.submit();\"></SPAN></DIV>\n";
print "</FORM>\n";
}
sub bread_crumb() {
$bid = @_[0];
$special=@_[1];
$font = "Segoe UI Light";
print " <DIV style='position: absolute; left: 10px; top: 145px; height: 15px; width: 1100px; border-style: inset; border-width: 0px; text-align: left;'>\n";
print " <SPAN style='font-family: $font; font-size: 10pt; color: white;'>You are here -> </SPAN>\n";
if ($bid eq "1") {
print " <SPAN style='font-family: $font; font-size: 10pt; color: white;'><A style='color: white;' HREF='http://www.agentrobin.com/'>home</A></SPAN>\n";
}
if ($bid eq "2") {
print " <SPAN style='font-family: $font; font-size: 10pt; color: white;'><A style='color: white;' HREF='http://www.danvillelive.com/'>home</A></SPAN>\n";
print " <SPAN style='font-family: $font; font-size: 10pt; color: white;'><A style='color: white;' HREF='http://www.danvillelive.com/'>>> services</A></SPAN>\n";
print " <SPAN style='font-family: $font; font-size: 10pt; color: white;'><A style='color: white;' HREF='http://www.danvillelive.com/home.pl?MF=V1&Vid=1000000'>>> buyer</A></SPAN>\n";
}
if ($bid eq "3") {
print " <SPAN style='font-family: $font; font-size: 10pt; color: white;'><A style='color: white;' HREF='http://www.danvillelive.com/'>home</A></SPAN>\n";
print " <SPAN style='font-family: $font; font-size: 10pt; color: white;'><A style='color: white;' HREF='http://www.danvillelive.com/home.pl?MF=10'>>> site map</A></SPAN>\n";
}
if ($bid eq "cma") {
print " <SPAN style='font-family: $font; font-size: 10pt; color: white;'>tools</SPAN>\n";
print " <SPAN style='font-family: $font; font-size: 10pt; color: white;'><A style='color: white;' HREF='http://www.danvillelive.com/cma.pl?'>>> cma</A></SPAN>\n";
}
if ($bid eq "comm1") {
print " <SPAN style='font-family: $font; font-size: 10pt; color: white;'>properties</SPAN>\n";
print " <SPAN style='font-family: $font; font-size: 10pt; color: white;'><A style='color: white;' HREF='http://www.danvillelive.com/community.pl?'>>> communities</A></SPAN>\n";
}
if ($bid eq "comm2") {
print " <SPAN style='font-family: $font; font-size: 10pt; color: white;'>properties</SPAN>\n";
print " <SPAN style='font-family: $font; font-size: 10pt; color: white;'><A style='color: white;' HREF='http://www.danvillelive.com/community.pl?'>>> communities</A></SPAN>\n";
print " <SPAN style='font-family: $font; font-size: 10pt; color: white;'><A style='color: white;' HREF='http://www.danvillelive.com/community_info.pl?$special'>>> $special</A></SPAN>\n";
}
if ($bid eq "gloss") {
print " <SPAN style='font-family: $font; font-size: 10pt; color: white;'>tools</SPAN>\n";
print " <SPAN style='font-family: $font; font-size: 10pt; color: white;'><A style='color: white;' HREF='http://www.danvillelive.com/display_glossary.pl?'>>> Real Estate Glossary</A></SPAN>\n";
}
if ($bid eq "about") {
print " <SPAN style='font-family: $font; font-size: 10pt; color: white;'><A style='color: white;' HREF='http://www.danvillelive.com/home.pl'>home</A></SPAN>\n";
print " <SPAN style='font-family: $font; font-size: 10pt; color: white;'><A style='color: white;' HREF='http://www.danvillelive.com/display_profile.pl?'>>> About me</A></SPAN>\n";
# print " <SPAN style='font-family: $font; font-size: 10pt; color: white;'><A style='color: white;' HREF='http://www.danvillelive.com/community_info.pl?$special'>>> $special</A></SPAN>\n";
}
print " </DIV>\n";
}
sub getmlsdate() {
$SQLMLS="SELECT * FROM Dates";
open_db($SQLMLS);
@data=$sth->fetchrow_array();
$position = 1;
$rcount=0;
$mlsupdated = $data[1];
close_db();
}
sub open_db() {
$SQL = @_[0];
$dbh = DBI->connect('dbi:mysql:dreamhome_01_:dobrooks.ipowermysql.com:3306','agentrobin_01_','J0shKr1s') or die("Couldn't connect");
$sth = $dbh->prepare($SQL);
$sth->execute;
}
sub close_db() {
$sth->finish();
$dbh->disconnect();
}
1;