• Log in or sign up for an account here: https://www.sythe.org/login

Need some SCAR help [Just Learning]

  • Thread starter Thread starter smuckmydmick
  • Start date Start date
Status
Not open for further replies.
S

smuckmydmick

Guest
Need some SCAR help [Just Learning]
I am using SCAR.
I have the SRL updated.

I am trying to run a script... I will post the script below...



Code:
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html dir="ltr" lang="en">
<head>

<meta http-equiv="Content-Type" content="text/html; charset=ISO-8859-1" />


	


	




<!-- CSS Stylesheet -->
<style type="text/css" id="vbulletin_css">
<!--
/* vBulletin 3 CSS For Style 'Default Style' (styleid: 1) */
body
{
	background: #000000;
	color: #B8BED2;
	font: 10pt Verdana, Arial, Helvetica, sans-serif;
}
a:link, body_alink
{
	color: #D6D6E7;
}
a:visited, body_avisited
{
	color: #D6D6E7;
}
a:hover, a:active, body_ahover
{
	color: #99C0FB;
}
.page
{
	background: #21354A;
	color: #B8BED2;
	font-family: Verdana, Arial, Helvetica, sans-serif;
	border: 1px solid #56688C;
}
.page a:link, .page_alink
{
	text-decoration: none;
}
.page a:visited, .page_avisited
{
	text-decoration: none;
}
.page a:hover, .page a:active, .page_ahover
{
	text-decoration: none;
}
td, th, p, li
{
	font: 10pt Verdana, Arial, Helvetica, sans-serif;
}
.tborder
{
	background: #56688C;
	color: #FFFFFF;
	border: 0px solid #56688C;
}
.tcat
{
	background: #284059;
	color: #ECECFA;
	font: bold 10pt Verdana, Arial, Helvetica, sans-serif;
	padding: 3px;
}
.tcat a:link, .tcat_alink
{
	color: #D6D6F7;
	text-decoration: none;
}
.tcat a:visited, .tcat_avisited
{
	color: #D6D6F7;
	text-decoration: none;
}
.tcat a:hover, .tcat a:active, .tcat_ahover
{
	color: #D6D6F7;
	text-decoration: none;
}
.thead
{
	background: #183049;
	color: #ECECFA;
	font: bold 11px Verdana, Arial, Helvetica, sans-serif;
}
.thead a:link, .thead_alink
{
	color: #BFC0FB;
	text-decoration: none;
}
.thead a:visited, .thead_avisited
{
	color: #BFC0FB;
	text-decoration: none;
}
.thead a:hover, .thead a:active, .thead_ahover
{
	color: #BFC0FB;
	text-decoration: none;
}
.tfoot
{
	background: #001831;
	color: #D6D6E7;
}
.tfoot a:link, .tfoot_alink
{
	color: #D6D6E7;
	text-decoration: none;
}
.tfoot a:visited, .tfoot_avisited
{
	color: #D6D6E7;
	text-decoration: none;
}
.tfoot a:hover, .tfoot a:active, .tfoot_ahover
{
	color: #D6D6E7;
	text-decoration: none;
}
.alt1, .alt1Active
{
	background: #0D253E;
	color: #FFFFFF;
}
.alt2, .alt2Active
{
	background: #284059;
	color: #FFFFFF;
}
td.inlinemod
{
	background: #627B96;
	color: #FFFFFF;
}
.wysiwyg
{
	background: #0D253E;
	color: #FFFFFF;
	font: 10pt Verdana, Arial, Helvetica, sans-serif;
}
textarea, .bginput
{
	font: 10pt verdana, geneva, lucida, 'lucida grande', arial, helvetica, sans-serif;
}
.button
{
	font: 11px Verdana, Arial, Helvetica, sans-serif;
}
select
{
	font: 11px verdana, geneva, lucida, 'lucida grande', arial, helvetica, sans-serif;
}
option, optgroup
{
	font-size: 11px;
	font-family: verdana, geneva, lucida, 'lucida grande', arial, helvetica, sans-serif;
}
.smallfont
{
	font: 11px Verdana, Arial, Helvetica, sans-serif;
}
.time
{
	color: #ECECFA;
}
.navbar
{
	font: 11px Verdana, Arial, Helvetica, sans-serif;
}
.highlight
{
	font-weight: bold;
}
.fjsel
{
	background: #3E5C92;
	color: #E0E0F6;
}
.fjdpth0
{
	background: #3E5C92;
	color: #E0E0F6;
}
.panel
{
	background: #284059;
	color: #ECECFA;
	padding: 10px;
	border: 2px outset;
}
.panelsurround
{
	background: #284059;
	color: #ECECFA;
}
legend
{
	font: 11px Verdana, Arial, Helvetica, sans-serif;
}
.vbmenu_control
{
	background: #284059;
	color: #ECECFA;
	font: bold 11px Verdana, Arial, Helvetica, sans-serif;
	padding: 3px 6px 3px 6px;
	white-space: nowrap;
}
.vbmenu_control a:link, .vbmenu_control_alink
{
	color: #FFFFFF;
	text-decoration: none;
}
.vbmenu_control a:visited, .vbmenu_control_avisited
{
	color: #FFFFFF;
	text-decoration: none;
}
.vbmenu_control a:hover, .vbmenu_control a:active, .vbmenu_control_ahover
{
	color: #FFFFFF;
	text-decoration: underline;
}
.vbmenu_popup
{
	background: #284059;
	color: #DCDDFE;
	border: 1px solid #0B198C;
}
.vbmenu_option
{
	background: #284059;
	color: #ECECFA;
	font: 11px Verdana, Arial, Helvetica, sans-serif;
	white-space: nowrap;
	cursor: pointer;
}
.vbmenu_option a:link, .vbmenu_option_alink
{
	color: #ECECFA;
	text-decoration: none;
}
.vbmenu_option a:visited, .vbmenu_option_avisited
{
	color: #ECECFA;
	text-decoration: none;
}
.vbmenu_option a:hover, .vbmenu_option a:active, .vbmenu_option_ahover
{
	color: #CED3FF;
	text-decoration: none;
}
.vbmenu_hilite
{
	background: #4C78A8;
	color: #FFFFFF;
	font: 11px Verdana, Arial, Helvetica, sans-serif;
	white-space: nowrap;
	cursor: pointer;
}
.vbmenu_hilite a:link, .vbmenu_hilite_alink
{
	color: #FFFFFF;
	text-decoration: none;
}
.vbmenu_hilite a:visited, .vbmenu_hilite_avisited
{
	color: #FFFFFF;
	text-decoration: none;
}
.vbmenu_hilite a:hover, .vbmenu_hilite a:active, .vbmenu_hilite_ahover
{
	color: #FFFFFF;
	text-decoration: none;
}
/* ***** styling for 'big' usernames on postbit etc. ***** */
.bigusername { font-size: 14pt; }

/* ***** small padding on 'thead' elements ***** */
td.thead, div.thead { padding: 8px; }

/* ***** basic styles for multi-page nav elements */
.pagenav a { text-decoration: none; }
.pagenav td { padding: 2px 4px 2px 4px; }

/* ***** define margin and font-size for elements inside panels ***** */
.fieldset { margin-bottom: 6px; }
.fieldset, .fieldset td, .fieldset p, .fieldset li { font-size: 11px; }

/* ***** don't change the following ***** */
form { display: inline; }
label { cursor: default; }
.normal { font-weight: normal; }
.inlineimg { vertical-align: middle; }
-->
</style>

<!-- / CSS Stylesheet -->






<link rel="alternate" type="application/rss+xml" title="Sythe.Org Forums RSS Feed" href="http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL3d3dy5zeXRoZS5vcmcvZXh0ZXJuYWwucGhwP3R5cGU9UlNTMg%3D%3D" />


	<title>Sythe.Org Forums</title>

</head>
<body>
<table style="width:100%;margin:0;text-align:center;border-bottom:1px solid #000;color:#000;background:#fff;font-size:12px;font-weight:bold;font-family:Bitstream Vera Sans,arial,sans-serif;padding:4px;"><tr><td><div><form method="post" action="http://freeproxyserver.ca/index.php"> <label for="____btxmnercdeqt"><a href="http://www.sythe.org/attachment.php?attachmentid=10185&d=1220448311">Address</a>:</label> <input id="____btxmnercdeqt" type="text" size="80" name="btxmnercdeqt" value="http://www.sythe.org/attachment.php?attachmentid=10185&d=1220448311" /> <input type="submit" name="go" value="Go" /> [go: <a href="http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL3d3dy5zeXRoZS5vcmcv ">up one dir</a>, <a href="http://freeproxyserver.ca/">main page</a>]<hr /><label><input type="checkbox" name="hl[include_form]" checked="checked" /> Include Form</label> <label><input type="checkbox" name="hl[remove_scripts]" checked="checked" /> Remove Scripts</label> <label><input type="checkbox" name="hl[accept_cookies]" checked="checked" /> Accept Cookies</label> <label><input type="checkbox" name="hl[show_images]" checked="checked" /> Show Images</label> <label><input type="checkbox" name="hl[show_referer]" checked="checked" /> Show Referer</label> <label><input type="checkbox" name="hl[rotate13]" /> Rotate13</label> <label><input type="checkbox" name="hl[base64_encode]" checked="checked" /> Base64</label> <label><input type="checkbox" name="hl[strip_meta]" checked="checked" /> Strip Meta</label> <label><input type="checkbox" name="hl[strip_title]" /> Strip Title</label> <label><input type="checkbox" name="hl[session_cookies]" checked="checked" /> Session Cookies</label> </div></td></tr></table></form>
<!-- logo -->
<a name="top"></a>
<table border="0" width="99%" cellpadding="0" cellspacing="0" align="center">
<tr>
	<td align="left"><div align="center">

<a href="http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL3d3dy5zeXRoZS5vcmcv">
<table style="
background-image: url('http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL3d3dy5zeXRoZS5vcmcvbmV3c3l0aGViYW5uZXIucG5n');
background-repeat: no-repeat;
width: 100%;
height: 84px;
"><tr><td></td></tr></table></a>

</div>
</tr>
</table>
<!-- /logo -->

<!-- content table -->
<!-- open content container -->

<div align="center">
	<div class="page" style="width:99%; text-align:left">
		<div style="padding:0px 10px 0px 10px">






<br />

<!-- breadcrumb, login, pm info -->
<table class="tborder" cellpadding="3" cellspacing="1" border="0" width="100%" align="center">
<tr>
	<td class="alt1" width="100%">
		
			<table cellpadding="0" cellspacing="0" border="0">
			<tr valign="bottom">
				<td><a href="#"><img src="http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL3d3dy5zeXRoZS5vcmcvaW1hZ2VzL21pc2MvbmF2Yml0c19zdGFydC5naWY%3D" alt="Go Back" border="0" /></a></td>
				<td width="100%"><span class="navbar"><a href="http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL3d3dy5zeXRoZS5vcmcvaW5kZXgucGhw" accesskey="1">Sythe.Org Forums</a></span> </td>
				
					<td>&nbsp;</td>
				
			</tr>
			<tr>
				<td class="navbar" style="font-size:10pt; padding-top:1px" colspan="2"><a href="http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL3d3dy5zeXRoZS5vcmcvYXR0YWNobWVudC5waHA%2FYXR0YWNobWVudGlkPTEwMTg1JmFtcDtkPTEyMjA0NDgzMTE%3D"><img class="inlineimg" src="http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL3d3dy5zeXRoZS5vcmcvaW1hZ2VzL21pc2MvbmF2Yml0c19maW5hbGxpbmsuZ2lm" alt="Reload this Page" border="0" /></a> <strong>
	vBulletin Message

</strong></td>
			</tr>
			</table>			
		
	</td>	
	
	
		
		<td class="alt2" nowrap="nowrap" style="padding:0px">
			
		<!-- login form -->
		<form action="http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL3d3dy5zeXRoZS5vcmcvbG9naW4ucGhwP2RvPWxvZ2lu" method="post">
		
		<table cellpadding="0" cellspacing="3" border="0">
		<tr>
			<td class="smallfont"><label for="navbar_username">User Name</label></td>
			<td><input type="text" class="bginput" style="font-size: 11px" name="vb_login_username" id="navbar_username" size="10" accesskey="u" tabindex="101" value="User Name" /></td>
			<td class="smallfont" colspan="2" nowrap="nowrap"><label for="cb_cookieuser_navbar"><input type="checkbox" name="cookieuser" value="1" tabindex="103" id="cb_cookieuser_navbar" accesskey="c" />Remember Me?</label></td>
		</tr>
		<tr>
			<td class="smallfont"><label for="navbar_password">Password</label></td>
			<td><input type="password" class="bginput" style="font-size: 11px" name="vb_login_password" id="navbar_password" size="10" tabindex="102" /></td>
			<td><input type="submit" class="button" value="Log in" tabindex="104" title="Enter your username and password in the boxes provided to login, or click the 'register' button to create a profile for yourself." accesskey="s" /></td>
		</tr>
		</table>
		<input type="hidden" name="s" value="" />
		<input type="hidden" name="do" value="login" />		
		<input type="hidden" name="vb_login_md5password" />
		<input type="hidden" name="vb_login_md5password_utf" />
		</form>
		<!-- / login form -->
			
		</td>
		
		
	
</tr>
</table>
<!-- / breadcrumb, login, pm info -->

<!-- nav buttons bar -->
<div align="center">
	<table class="tborder" cellpadding="3" cellspacing="0" border="0" width="100%" align="center" style="border-top-width:0px">
	<tr align="center">
    	
		
			<td class="vbmenu_control"><a href="http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL3d3dy5zeXRoZS5vcmcvcmVnaXN0ZXIucGhw" rel="nofollow">Register</a></td>
		
		<td class="vbmenu_control"><a href="http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL3d3dy5zeXRoZS5vcmcvZmFxLnBocA%3D%3D" accesskey="5">FAQ</a></td>
		<td class="vbmenu_control"><a href="http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL3d3dy5zeXRoZS5vcmcvbWVtYmVybGlzdC5waHA%3D">Members List</a></td>
		<td class="vbmenu_control"><a href="http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL3d3dy5zeXRoZS5vcmcvY2FsZW5kYXIucGhw">Calendar</a></td>
				
			
				
				<td class="vbmenu_control"><a href="http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL3d3dy5zeXRoZS5vcmcvc2VhcmNoLnBocD9kbz1nZXRkYWlseQ%3D%3D" accesskey="2">Today's Posts</a></td>
				
				<td id="navbar_search" class="vbmenu_control"><a href="http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL3d3dy5zeXRoZS5vcmcvc2VhcmNoLnBocA%3D%3D" accesskey="4" rel="nofollow">Search</a> </td>
			
			
		
		
	</tr>
	</table>
</div>
<!-- / nav buttons bar -->

<br />



<!-- NAVBAR POPUP MENUS -->
	
	
	<!-- header quick search form -->
	<div class="vbmenu_popup" id="navbar_search_menu" style="display:none">
		<form action="http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL3d3dy5zeXRoZS5vcmcvc2VhcmNoLnBocD9kbz1wcm9jZXNz" method="post">
		<table cellpadding="4" cellspacing="1" border="0">
		<tr>
			<td class="thead">Search Forums</td>
		</tr>
		<tr>
			<td class="vbmenu_option" title="nohilite">
				<input type="hidden" name="do" value="process" />
				<input type="hidden" name="quicksearch" value="1" />
				<input type="hidden" name="childforums" value="1" />
				<input type="hidden" name="exactname" value="1" />
				<input type="hidden" name="s" value="" />
				<div><input type="text" class="bginput" name="query" size="25" tabindex="1001" /><input type="submit" class="button" value="Go" tabindex="1004" /></div>
			</td>
		</tr>
		<tr>
			<td class="vbmenu_option" title="nohilite">
				<label for="rb_nb_sp0"><input type="radio" name="showposts" value="0" id="rb_nb_sp0" tabindex="1002" checked="checked" />Show Threads</label>
				&nbsp;
				<label for="rb_nb_sp1"><input type="radio" name="showposts" value="1" id="rb_nb_sp1" tabindex="1003" />Show Posts</label>
			</td>
		</tr>
		<tr>
			<td class="vbmenu_option"><a href="http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL3d3dy5zeXRoZS5vcmcvc2VhcmNoLnBocA%3D%3D" accesskey="4" rel="nofollow">Advanced Search</a></td>
		</tr>
		</table>
		</form>
	</div>
	<!-- / header quick search form -->
	

	
<!-- / NAVBAR POPUP MENUS -->

<!-- PAGENAV POPUP -->

	<div class="vbmenu_popup" id="pagenav_menu" style="display:none">
		<table cellpadding="4" cellspacing="1" border="0">
		<tr>
			<td class="thead" nowrap="nowrap">Go to Page...</td>
		</tr>
		<tr>
			<td class="vbmenu_option" title="nohilite">
			<form action="" method="get" id="pagenav_form"><input type="hidden" name="____pgfa" value="aHR0cDovL3d3dy5zeXRoZS5vcmcvaW5kZXgucGhw" />
				<input type="text" class="bginput" id="pagenav_itxt" style="font-size:11px" size="4" />

				<input type="button" class="button" id="pagenav_ibtn" value="Go" />
			</form>
			</td>
		</tr>
		</table>
	</div>

<!-- / PAGENAV POPUP -->





<table class="tborder" cellpadding="3" cellspacing="1" border="0" width="70%" align="center">
<tr>
	<td class="tcat">vBulletin Message</td>
</tr>
<tr>
	<td class="panelsurround" align="center">
	<div class="panel">
		<div align="left">
	
				
			
			<form action="http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL3d3dy5zeXRoZS5vcmcvbG9naW4ucGhwP2RvPWxvZ2lu" method="post">
			<input type="hidden" name="do" value="login" />
			<input type="hidden" name="url" value="/attachment.php?attachmentid=10185&amp;d=1220448311" />
			<input type="hidden" name="vb_login_md5password" />
			<input type="hidden" name="vb_login_md5password_utf" />
			
	
			<input type="hidden" name="s" value="" />
		
			<!-- permission error message - user not logged in -->
			
			
			<div class="smallfont">You are not logged in or you do not have permission to access this page. This could be due to one of several reasons:</div>
			
			<ol>
				<li class="smallfont">You are not logged in. Fill in the form at the bottom of this page and try again.</li>
				<li class="smallfont">You may not have sufficient privileges to access this page. Are you trying to edit someone else's post, access administrative features or some other privileged system?</li>
				<li class="smallfont">If you are trying to post, the administrator may have disabled your account, or it may be awaiting activation.</li>
			</ol>
			
			<fieldset class="fieldset">
				<legend>Log in</legend>
				<table cellpadding="0" cellspacing="3" border="0" align="center">
				<tr>
					<td>User Name:<br /><input type="text" class="bginput" name="vb_login_username" size="50" accesskey="u" tabindex="1" /></td>
				</tr>
				<tr>
					<td>Password:<br /><input type="password" class="bginput" name="vb_login_password" size="50" tabindex="1" /></td>
				</tr>
				<tr>
					<td>
						<span style="float:right"><a href="http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL3d3dy5zeXRoZS5vcmcvbG9naW4ucGhwP2RvPWxvc3Rwdw%3D%3D">Forgotten Your Password?</a></span>
						<label for="cb_cookieuser"><input type="checkbox" name="cookieuser" value="1" id="cb_cookieuser" tabindex="1" />Remember Me?</label>
					</td>
				</tr>
				<tr>
					<td align="right">
						<input type="submit" class="button" value="Log in" accesskey="s" tabindex="1" />
						<input type="reset" class="button" value="Reset Fields" accesskey="r" tabindex="1" />
					</td>
				</tr>
				</table>
			</fieldset>
			
			<div class="smallfont">The administrator may have required you to <a href="http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL3d3dy5zeXRoZS5vcmcvcmVnaXN0ZXIucGhwP2RvPXNpZ251cA%3D%3D">register</a> before you can view this page.</div>
			</form>
			
			<!-- / permission error message - user not logged in -->
		
		
		</div>
	</div>
	<!--
	<div style="margin-top:3px">
		<input type="submit" class="button" value="Go Back" accesskey="s"  />
	</div>
	-->
	</td>
</tr>
</table>

<br />


<!-- forum jump -->
<table cellpadding="0" cellspacing="0" border="0" align="center">
<tr>
	<td></td>
</tr>
</table>
<!-- / forum jump -->


<br />

<br />
<table class="tborder" cellpadding="3" cellspacing="1" border="0" width="100%" align="center">
<thead>
<tr>
		<td class="tcat" align="left" width="50%">New To Sythe.org?</td>
		<td class="tcat" align="left" width="50%">Common Links</td>
</tr>
</thead>
<tbody>
<tr>
		<td class="alt1" align="left" valign="top">
    	<ul>
			
			<li><a href="http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL3d3dy5zeXRoZS5vcmcvcmVnaXN0ZXIucGhw">Register</a></li>
			
			
			<li><a href="http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL3d3dy5zeXRoZS5vcmcvc2hvd2dyb3Vwcy5waHA%3D" rel="nofollow">View Forum Leaders</a></li>
			
			<li><a href="http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL3d3dy5zeXRoZS5vcmcvZmFxLnBocA%3D%3D">Frequently Asked Questions</a></li>
			
			<li><a href="http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL3d3dy5zeXRoZS5vcmcvc2VuZG1lc3NhZ2UucGhw">Contact Us</a></li>
		</ul>
		</td>
		<td class="alt1" align="left" valign="top">
		<ul>
			
			<li><a href="http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL3d3dy5zeXRoZS5vcmcvbG9naW4ucGhwP2RvPWxvc3Rwdw%3D%3D">Forget your password?</a></li>
			
			<li><a href="http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL3d3dy5zeXRoZS5vcmcvZm9ydW1kaXNwbGF5LnBocD9kbz1tYXJrcmVhZA%3D%3D" rel="nofollow">Mark Forums Read</a></li>
			
    </ul>
		</td>
</tr>
</tbody>
</table>
<br />
<div class="smallfont" align="center">All times are GMT +1. The time now is <span class="time">03:52 PM</span>.</div>
<br />


		</div>	
	</div>
</div>

<!-- / close content container -->
<!-- /content area table -->

<form action="" method="get"><input type="hidden" name="____pgfa" value="aHR0cDovL3d3dy5zeXRoZS5vcmcvaW5kZXgucGhw" />
	
<table cellpadding="3" cellspacing="0" border="0" width="99%" class="page" align="center">
<tr>
	
		<td class="tfoot">
			<select name="styleid" >
				<optgroup label="Quick Style Chooser">
					<option value="1" class="" selected="selected">-- Default Style</option>
<option value="2" class="" >-- Sythe.org New</option>

				</optgroup>
			</select>
		</td>
	
	
	<td class="tfoot" align="right" width="100%">
		<div class="smallfont">
			<strong>
				<a href="http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL3d3dy5zeXRoZS5vcmcvc2VuZG1lc3NhZ2UucGhw" rel="nofollow">Contact Us</a> -
				<a href="http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL3d3dy5zeXRoZS5vcmc%3D">Sythe.org</a> -
				
				
				<a href="http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL3d3dy5zeXRoZS5vcmcvYXJjaGl2ZS9pbmRleC5waHA%3D">Archive</a> -
				
				<a href="#top">Top</a>
			</strong>
		</div>
	</td>
</tr>
</table>

<br />

<div align="center">
	<div class="smallfont" align="center">
	<!-- Do not remove this copyright notice -->
	Powered by vBulletin&reg; Version 3.6.4<br />Copyright &copy;2000 - 2008, Jelsoft Enterprises Ltd.
	<!-- Do not remove this copyright notice -->
	</div>
	
	<div class="smallfont" align="center">
	<!-- Do not remove  or your scheduled tasks will cease to function -->
	
	<!-- Do not remove  or your scheduled tasks will cease to function -->
	
	
	</div>
</div>

</form>




<center><a href="http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL3d3dy5hZGJyaXRlLmNvbS9tYi9sYW5kaW5nX2JvdGgucGhwP3NwaWQ9Mzk5MzkmYWZiPTQ2OHg2MC0y">
<img src="http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL2ZpbGVzLmFkYnJpdGUuY29tL21iL2ltYWdlcy80Njh4NjAtMi5naWY%3D" border="0"></a><br /><br /><a href="http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL3dvdy5pZ3hlLmNvbQ%3D%3D">WOW Gold</a>&nbsp|&nbsp<a href="http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL3d3dy52aXJzYWxlLmNvbS8%3D">Cheap Runescape Gold</a>&nbsp|&nbsp<a href="http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL3d3dy5mcmVldHZsaW5rcy5uZXQ%3D">Watch Free TV Shows Online</a>&nbsp|&nbsp<a href="http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL3d3dy50YWxrdGVtcGxhdGUuY29t">Free Web Templates</a>&nbsp|&nbsp<a href="http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL3d3dy5tbW9iYXkubmV0">Buy WoW accounts</a>&nbsp|&nbsp<a href="http://freeproxyserver.ca/index.php?btxmnercdeqt=aHR0cDovL3d3dy5nYW1lb3RsLmNvbQ%3D%3D">Wow Gold & Guild Wars Gold</a>&nbsp|&nbsp<a href="mailto:[email protected]?subject=Interested in buying a text link on sythe.org">YOUR LINK HERE?</a><br /></center>

</body>
</html>





And when I run that I get an error

Code:
Line 1: [Error] (1:1): 'BEGIN' expected in script H:\Program Files\SCAR 3.15\Scripts\mhmmmmm.php
Failed when compiling



Can someone please tell me what is wrong here?
I downloaded that script by the way.



**Its supposed to be a wood cutter...

I cant find any working wood cutters....

If you want to just post a script of any wood cutter (willows+) in (code) form for me, that would solve this for me I guess :P

or just tell me whats wrong with the one I downloaded (no, I don't know if this script even works)
 
Need some SCAR help [Just Learning]
Uhh..
thats a style sheet, not a SCAR script.
where did you get this?
O_O
 
Need some SCAR help [Just Learning]
Can someone post me a scar script (any runescape autoer) so I can see what it looks like.
So I know what I am dealing with.
So I can possibly learn how to make some on my own.



And post a auto woodcutter, so I can load it into my scar, and get auto cutting...
 
Need some SCAR help [Just Learning]
Code:
program UDL1;
  {.Include SRL\SRL.Scar}
  {.Include SRL\SRL\Misc\Users.Scar}

const
  SRLID1 = '';
  SRLPassword1 = '';

var
  LoadsDone, TotalLoads, TotalWillows, NestsFound, EntsFound, Responded, Replaced, StrangeFruit, Levels: Integer;

procedure SetUpScript;
begin
  SRLPlayerForm(True, ['Is Axe Wielded?'], ['Pin Number?', 'Loads To Do'], [], []);
  ActivateClient;
  if (not (SRLID1 = '')) then
    SRLID := SRLID1
  else
    SRLID := '3211';
  if (not (SRLPassword1 = '')) then
    SRLPassword := SRLPassword1
  else
    SRLPassword := 'thebest1';
  WriteLn('Good Luck!');
  Disguise('Ultimate Delux [UDL] Version 1');
  LogInPlayer;
end;

procedure PlayersPreferance;
begin
  Players[CurrentPlayer].Integers[2] := GetSkillLevel('Woodcutting');
  MakeCompass('N');
  SetAngle(True);
  Wait(150 + Random(50));
  SetRun(True);
  Wait(50 + Random(25));
  GameTab(4);
end;

function FindBlackMessage(Msg: string): Boolean;
begin
  Result := IsBlackText(Msg, 8);
  Result := IsBlackText(Msg, 7);
  Result := IsBlackText(Msg, 6);
end;

function SearchBirdsNest: Boolean;
var
  CTS, I, X, Y: Integer;
  NestATPA: T2DPointArray;
  NestTPA: TPointArray;
  Nest: TPoint;
  Timer: LongInt;
begin
  if (FindText(X, Y, 'nest falls', SmallChars, 0, 400, 495, 460)) then
  begin
    MarkTime(Timer);
    repeat
      CTS := GetColorToleranceSpeed;
      ColorToleranceSpeed(2);
      X := MSCX;
      Y := MSCY;
      FindColorsSpiralTolerance(X, Y, NestTPA, 3952984, MSCX - 100, MSCY - 100, MSCX + 100, MSCY + 100, 15);
      NestATPA := TPAtoATPAEx(NestTPA, 5, 5);
      for I := 0 to Length(NestATPA) - 1 do
      begin
        if (TimeFromMark(Timer) >= (10000)) then
          Exit;
        Nest := MIddleTPA(NestATPA[I]);
        X := 0;
        Y := 0;
        MMouse(Nest.X, Nest.Y, 5, 5);
        Wait(250);
        if (isUpText('ird')) then
        begin
          Mouse(Nest.X, Nest.Y, 5, 5, True);
          Result := True;
          Inc(NestsFound);
          ReportVars[6] := ReportVars[6] + 1;
          Wait(250 + Random(150));
          case (Random(8)) of
            1: TypeSend('Found a Birds nest!');
            2: TypeSend('Cool, I got a nest.');
            3: TypeSend('Sweet! Found the nest!');
            4: TypeSend('...');
            5: TypeSend('Whew, got the nest.');
          end;
          Exit;
        end;
      end;
    until (TimeFromMark(Timer) >= (10000)) or (Result);
    Exit;
  end
  else
    Exit;
end;

function Find2TPApoints(TPA1, TPA2: TPointArray; W, H: Integer): TPointArray;
var
  I1, I2, L1, L2, R: LongInt;
begin
  L1 := High(TPA1);
  L2 := High(TPA2);
  R := 0;
  for I1 := 0 to L1 do
  begin
    for I2 := 0 to L2 do
    begin
      if (ABS(TPA1[I1].x - TPA2[I2].X) <= W) and (ABS(TPA1[I1].y - TPA2[I2].y) <= H) then
      begin
        Inc(R);
        SetLength(Result, R + 1);
        Result[r].x := ((TPA1[I1].x + TPA2[I2].X) div 2);
        Result[r].y := ((TPA1[I1].y + TPA2[I2].Y) div 2);
      end;
    end;
  end;
end;

function ItemCoordsDtm(Area: string; DTM: Integer): TPointArray;
var
  StartX, StartY, Rowsize, Colsize, ColNumber, RowNumber, col, row: Integer;
  X1, Y1, X2, Y2: Integer;
  Itemx, Itemy: Integer;
  I: Integer;
begin
  SetArrayLength(Result, 0);
  if (CheckArea(Area)) then
  begin
    Areainfo(Area, StartX, StartY, Rowsize, Colsize, ColNumber, RowNumber);
    for row := 0 to RowNumber - 1 do
      for col := 0 to ColNumber - 1 do
      begin
        X1 := StartX + col * Colsize;
        Y1 := StartY + row * Rowsize;
        X2 := X1 + Colsize;
        Y2 := Y1 + Rowsize;
        if (FindDTM(DTM, Itemx, Itemy, X1, Y1, X2, Y2)) then
        begin
          I := GetArrayLength(Result);
          SetArrayLength(Result, I + 1);
          Result[I].x := X1;
          Result[I].y := Y1;
        end;
      end;
  end;
end;

function CountItemsDtm(Area: string; DTM: Integer): Integer;
var
  Coords: TPointArray;
begin
  Coords := ItemCoordsDtm(Area, DTM);
  Result := GetArrayLength(Coords);
end;

function FindStrangePlant: Boolean;
var
  l, SPX, SPY, StartSPF, FruitCount, FruitDTM: Integer;
  TPA1, TPA2, TPA3: TPointArray;
begin
  if (not (LoggedIn)) then
    Exit;
  Result := False SPX := MSCX;
  SPY := MSCY;
  if (FindColorTolerance(SPX, SPY, 945749, MSCX - 100, MSCY - 110, MSCX + 100, MSCY + 90, 4)) and (FindColorTolerance(SPX, SPY, 743503, MSCX - 100, MSCY - 110, MSCX + 100, MSCY + 90, 4)) then
  begin
    FindColorsSpiralTolerance(SPX, SPY, TPA1, 945749, MSX1, MSY1, MSX2, MSY2, 4);
    FindColorsSpiralTolerance(SPX, SPY, TPA2, 743503, MSX1, MSY1, MSX2, MSY2, 4);
    SetLength(TPA1, HIgh(TPA1) + 1);
    SetLength(TPA2, HIgh(TPA2) + 1);
    TPA3 := Find2TPApoints(TPA1, TPA2, 18, 18);
    l := HIgh(TPA3);
    if (l >= 0) then
    begin
      if (FindObjTPA(SPX, SPY, 945749, 4, - 1, 18, 18, 4, ['trange'])) then
      begin
        WriteLn('Found Strange Plant attempting to Pick fruit.');
        FruitDTM := DTMFromString('78DA63E4646060E0654001B30A8E30B001694' + '620FE0F048CDC400633031A60442281B40090E026A08607488812' + '50C30A244408A861C67433BA1A008467066B');
        FruitCount := CountItemsDtm('Inv', FruitDTM);
        Result := True;
        MarkTime(StartSPF);
        repeat
          if (FindObjTPA(SPX, SPY, 945749, 4, - 1, 18, 18, 4, ['trange'])) then
          begin
            MMouse(SPX, SPY, 1, 1);
            Wait(250 + Random(250));
            if (isUpText('trange')) then
            begin
              Wait(250 + Random(250));
              Mouse(SPX, SPY, 1, 1, false);
              Wait(250 + Random(250));
              ChooseOptIon('ick');
              Wait(500 + Random(600));
              if Pos('ready to', GetBlackChatMessage) > 5 then
                Wait(2000 + Random(1000))
              else if (Pos('fruit from', GetBlackChatMessage) > 5) or (CountItemsDtm('Inv', FruitDTM) > FruitCount) then
              begin
                Result := True;
                WriteLn('Picked Fruit From Strange Plant. Waiting for Plant to die.');
                FreeDTM(FruitDTM);
                Inc(StrangeFruit);
                ReportVars[5] := ReportVars[5] + 1;
                repeat
                  BoredHuman;
                  Wait(2000 + random(1000));
                until (not (FindObjTPA(SPX, SPY, 945749, 4, - 1, 18, 18, 4, ['trange']))) or (FindFight);
                Exit;
              end
              else if (Pos('unable', GetBlackChatMessage) > 5) then
              begin
                Result := False;
                WriteLn('The plant is not after you. Waiting for plant to go.');
                FreeDTM(FruitDTM);
                repeat
                  BoredHuman;
                  Wait(2000 + random(1000));
                until (not (FindObjTPA(SPX, SPY, 945749, 4, - 1, 18, 18, 4, ['trange']))) or (FindFight);
                Exit;
              end;
            end;
          end
          else
            Break;
        until (TimeFromMark(StartSPF) >= (120000)) or (FindFight);
        WriteLn('Failed to Pick Fruit From Strange Plant.');
        FreeDTM(FruitDTM);
      end;
    end;
  end;
end;

function TeleportDraynor: Boolean;
var
  Glory, X, Y: Integer;
begin
  Wait(250 + Random(250));
  GameTab(5);
  Glory := DTMFromString('78DA63AC6762601061644006D522F31952803' + '448F43F10303601D5FC6540038C0C5C5035605E17500D0B237E35' + '5544A869C6740F567344F1AB01006C2A0A27');
  if (FindDTM(Glory, X, Y, MIX1, MIY1, MIX2, MIY2)) then
  begin
    FreeDTM(Glory);
    MMouse(X, Y, 3, 3);
    if (not (IsUpText('('))) then
      Exit
    else
      Mouse(X, Y, 5, 5, False);
    Wait(250 + Random(250));
    ChooseOption('perate');
  end
  else
  begin
    FreeDTM(Glory);
    Exit;
  end;
  Wait(1500 + Random(500));
  if (FindText(X, Y, 'aynor', NPCCHARS, MCX1, MCY1, MCX2, MCY2)) then
  begin
    Mouse(X, Y, 5, 5, True);
    Result := True;
    WriteLn('We have teleported to Draynor.');
    Exit;
  end
  else
    Exit;
end;

function TextCoord(Text: Integer): TPoint;
begin
  Result.X := 11;
  Result.Y := 346 + (14 * (Text - 1));
end;

function GetBlackMessage(Msg: string): Boolean;
begin
  Result := IsBlackText(Msg, 8);
  Result := IsBlackText(Msg, 7);
end;

function GetBlueText(ChatLine: Integer): string;
var
  TP: TPoint;
begin
  TP := TextCoord(ChatLine);
  Result := Trim(GetTextAtEx(TP.X - 2, TP.Y - 2, 0, SmallChars, False, False, 0, 1, 16711680, 80, False, tr_AllChars));
end;

function IsBlueText(Text: string; ChatLine: Integer): Boolean;
begin
  Result := (Pos(Text, GetBlueText(ChatLine)) <> 0);
end;

function GetBlueChatMessage: string;
begin
  Result := GetBlueText(8);
end;

function FindBlueChatMessage(ChatMsg: string): Boolean;
begin
  Result := IsBlueText(ChatMsg, 8);
  Result := IsBlueText(ChatMsg, 7);
  Result := IsBlueText(ChatMsg, 6);
end;

procedure RespondToPlayers;
var
  TheOldMessage, CurrentMessage, I: Byte;
  Levels, Macro: TStringArray;
begin
  Levels := ['vl', 'evel', 'Wc', 'wc', 'oodcutting', 'oodcut'];
  Macro := ['acro', 'Macro', 'Bot', 'bot', 'Auto', 'auto'];
  for I := 0 to 5 do
  begin
    if (FindBlueChatMessage(Levels[I])) then
    begin
      CurrentMessage := 0;
      if (CurrentMessage = TheOldMessage) then
        Exit;
      case (Random(5)) of
        1: TypeSend('Mine is ' + IntToStr(Players[CurrentPlayer].Integers[2]) + '.');
        2: TypeSend(IntToStr(Players[CurrentPlayer].Integers[2]) + ', you?');
        3: TypeSend(IntToStr(Players[CurrentPlayer].Integers[2]));
        4: TypeSend('I have ' + IntToStr(Players[CurrentPlayer].Integers[2]) + ' Woodcutting.');
        5: TypeSend('1, jokes! ' + IntToStr(Players[CurrentPlayer].Integers[2]) + '.');
      end;
      TheOldMessage := CurrentMessage;
      WriteLn('Responded [Levels]');
      ReportVars[7] := ReportVars[7] + 1;
      Inc(Responded);
      Exit;
    end;
    Wait(150 + Random(50));
    if (FindBlueChatMessage(Players[CurrentPlayer].Nick)) then
    begin
      CurrentMessage := 1;
      if (CurrentMessage = TheOldMessage) then
        Exit;
      case (Random(5)) of
        1: TypeSend('?');
        2: TypeSend('Im too busy');
        3: TypeSend('What?');
        4: TypeSend('...');
        5: TypeSend('   ');
      end;
      TheOldMessage := CurrentMessage;
      WriteLn('Responded [Players Nick]');
      ReportVars[7] := ReportVars[7] + 1;
      Inc(Responded);
      Exit;
    end;
    Wait(150 + Random(50));
    if (FindBlueChatMessage(Macro[I])) then
    begin
      CurrentMessage := 2;
      if (CurrentMessage = TheOldMessage) then
        Exit;
      case (Random(5)) of
        1: TypeSend('Leave me alone, just how I roll ;p');
        2: TypeSend('... Go away much?');
        3: TypeSend('No I am not, beep! ;p');
        4: TypeSend('Autos arent real, theyre asIans who play too much.');
        5: TypeSend('Rofl, autos arent real, theyre virus.');
      end;
      TheOldMessage := CurrentMessage;
      WriteLn('Responded [Macro]');
      ReportVars[7] := ReportVars[7] + 1;
      Inc(Responded);
      Exit;
    end;
  end;
  Exit;
end;

procedure ReactToEnt;
var
  MS: Integer;
begin
  MS := MouseSpeed;
  MouseSpeed := RandomRange(75, 100);
  Mouse(MMCX - 10, MMCY - 10, 5, 5, True);
  FFlag(5);
  Wait(50 + Random(25));
  MouseSpeed := MS;
end;

function FindEnt: Boolean;
var
  X, Y: Integer;
begin
  Result := FindColorTolerance(X, Y, 647908, 80, 6, 127, 20, 50);
  if (Result) and (IsUpText('Chop')) then
  begin
    Inc(EntsFound);
    ReportVars[4] := ReportVars[4] + 1;
  end;
end;

procedure FindRandoms;
begin
  if (not (IsUpText('illow'))) or (InvFull) then
    Exit;
  if (FindEnt) then
    ReactToEnt;
  FindNormalRandoms;
  if (FindFight) then
    RunTo('E', True);
  Wait(250 + Random(250));
  SearchBirdsNest;
  FindStrangePlant;
  Wait(250 + Random(250));
  RespondToPlayers;
  SRLRandomsReport;
end;

procedure FindLevelUp;
begin
  if (not (LoggedIn)) then
    Exit;
  if (FindNPCChatText('gratu', Nothing)) then
  begin
    ReportVars[3] := ReportVars[3] + 1;
    Inc(Levels);
  end;
end;

procedure RandomHuman;
begin
  if (not (IsUpText('illow'))) or (InvFull) then
    Exit;
  case (Random(80)) of
    8: RandomRClick;
    17: HoverSkill('Woodcutting', False);
    21: HoverSkill('Firemaking', False);
    26: RandomMovement;
    29: BoredHuman;
    34: PickUpMouse;
    38:
      begin
        Gametab(1 + Random(12));
        Wait(5020 + Random(915));
        Gametab(4);
      end;
    44: SleepAndMoveMouse(3000);
    55: PickUpMouse;
  end;
  GameTab(4);
  Exit;
end;

function LoadDTM(WhatDTM: Integer): Integer;
var
  dtmMainPoint: TDTMPointDef;
  dtmSubPoints: array [0..5] of TDTMPointDef;
  TempTDTM: TDTM;
begin
  case (WhatDTM) of
    0:
      begin
        dtmMainPoint.x := 603;
        dtmMainPoint.y := 107;
        dtmMainPoint.AreaSize := 0;
        dtmMainPoint.AreaShape := 0;
        dtmMainPoint.Color := 0;
        dtmMainPoint.Tolerance := 255;
        dtmSubPoints[0].x := 603;
        dtmSubPoints[0].y := 107;
        dtmSubPoints[0].AreaSize := 0;
        dtmSubPoints[0].AreaShape := 0;
        dtmSubPoints[0].Color := 0;
        dtmSubPoints[0].Tolerance := 255;
        dtmSubPoints[1].x := 618;
        dtmSubPoints[1].y := 80;
        dtmSubPoints[1].AreaSize := 3;
        dtmSubPoints[1].AreaShape := 0;
        dtmSubPoints[1].Color := 195836;
        dtmSubPoints[1].Tolerance := 55;
        dtmSubPoints[2].x := 609;
        dtmSubPoints[2].y := 83;
        dtmSubPoints[2].AreaSize := 3;
        dtmSubPoints[2].AreaShape := 0;
        dtmSubPoints[2].Color := 195836;
        dtmSubPoints[2].Tolerance := 55;
        dtmSubPoints[3].x := 619;
        dtmSubPoints[3].y := 72;
        dtmSubPoints[3].AreaSize := 3;
        dtmSubPoints[3].AreaShape := 0;
        dtmSubPoints[3].Color := 195836;
        dtmSubPoints[3].Tolerance := 55;
        TempTDTM.MainPoint := dtmMainPoint;
        TempTDTM.SubPoints := dtmSubPoints;
        Result := AddDTM(TempTDTM);
      end;
    1:
      begin
        dtmMainPoint.x := 587;
        dtmMainPoint.y := 107;
        dtmMainPoint.AreaSize := 0;
        dtmMainPoint.AreaShape := 0;
        dtmMainPoint.Color := 0;
        dtmMainPoint.Tolerance := 255;
        dtmSubPoints[0].x := 587;
        dtmSubPoints[0].y := 107;
        dtmSubPoints[0].AreaSize := 0;
        dtmSubPoints[0].AreaShape := 0;
        dtmSubPoints[0].Color := 0;
        dtmSubPoints[0].Tolerance := 255;
        dtmSubPoints[1].x := 564;
        dtmSubPoints[1].y := 100;
        dtmSubPoints[1].AreaSize := 0;
        dtmSubPoints[1].AreaShape := 0;
        dtmSubPoints[1].Color := 7301745;
        dtmSubPoints[1].Tolerance := 40;
        dtmSubPoints[2].x := 568;
        dtmSubPoints[2].y := 116;
        dtmSubPoints[2].AreaSize := 0;
        dtmSubPoints[2].AreaShape := 0;
        dtmSubPoints[2].Color := 7301745;
        dtmSubPoints[2].Tolerance := 40;
        dtmSubPoints[3].x := 570;
        dtmSubPoints[3].y := 122;
        dtmSubPoints[3].AreaSize := 0;
        dtmSubPoints[3].AreaShape := 0;
        dtmSubPoints[3].Color := 7301745;
        dtmSubPoints[3].Tolerance := 40;
        TempTDTM.MainPoint := dtmMainPoint;
        TempTDTM.SubPoints := dtmSubPoints;
        Result := AddDTM(TempTDTM);
      end;
    2:
      begin
        dtmMainPoint.x := 652;
        dtmMainPoint.y := 55;
        dtmMainPoint.AreaSize := 0;
        dtmMainPoint.AreaShape := 0;
        dtmMainPoint.Color := 0;
        dtmMainPoint.Tolerance := 255;
        dtmSubPoints[0].x := 652;
        dtmSubPoints[0].y := 55;
        dtmSubPoints[0].AreaSize := 0;
        dtmSubPoints[0].AreaShape := 0;
        dtmSubPoints[0].Color := 0;
        dtmSubPoints[0].Tolerance := 255;
        dtmSubPoints[1].x := 644;
        dtmSubPoints[1].y := 50;
        dtmSubPoints[1].AreaSize := 3;
        dtmSubPoints[1].AreaShape := 0;
        dtmSubPoints[1].Color := 195836;
        dtmSubPoints[1].Tolerance := 55;
        dtmSubPoints[2].x := 644;
        dtmSubPoints[2].y := 42;
        dtmSubPoints[2].AreaSize := 3;
        dtmSubPoints[2].AreaShape := 0;
        dtmSubPoints[2].Color := 195836;
        dtmSubPoints[2].Tolerance := 55;
        dtmSubPoints[3].x := 635;
        dtmSubPoints[3].y := 53;
        dtmSubPoints[3].AreaSize := 3;
        dtmSubPoints[3].AreaShape := 0;
        dtmSubPoints[3].Color := 195836;
        dtmSubPoints[3].Tolerance := 55;
        TempTDTM.MainPoint := dtmMainPoint;
        TempTDTM.SubPoints := dtmSubPoints;
        Result := AddDTM(TempTDTM);
      end;
    3:
      begin
        dtmMainPoint.x := 639;
        dtmMainPoint.y := 38;
        dtmMainPoint.AreaSize := 0;
        dtmMainPoint.AreaShape := 0;
        dtmMainPoint.Color := 0;
        dtmMainPoint.Tolerance := 255;
        dtmSubPoints[0].x := 639;
        dtmSubPoints[0].y := 38;
        dtmSubPoints[0].AreaSize := 0;
        dtmSubPoints[0].AreaShape := 0;
        dtmSubPoints[0].Color := 0;
        dtmSubPoints[0].Tolerance := 255;
        dtmSubPoints[1].x := 644;
        dtmSubPoints[1].y := 70;
        dtmSubPoints[1].AreaSize := 0;
        dtmSubPoints[1].AreaShape := 0;
        dtmSubPoints[1].Color := 7301745;
        dtmSubPoints[1].Tolerance := 40;
        dtmSubPoints[2].x := 585;
        dtmSubPoints[2].y := 57;
        dtmSubPoints[2].AreaSize := 0;
        dtmSubPoints[2].AreaShape := 0;
        dtmSubPoints[2].Color := 7301745;
        dtmSubPoints[2].Tolerance := 40;
        dtmSubPoints[3].x := 592;
        dtmSubPoints[3].y := 72;
        dtmSubPoints[3].AreaSize := 0;
        dtmSubPoints[3].AreaShape := 0;
        dtmSubPoints[3].Color := 7301745;
        dtmSubPoints[3].Tolerance := 40;
        TempTDTM.MainPoint := dtmMainPoint;
        TempTDTM.SubPoints := dtmSubPoints;
        Result := AddDTM(TempTDTM);
      end;
  end;
  WriteLn(IntToStr(WhatDTM) + ' DTM has been loaded.');
  Exit;
end;

function MMDTMRotated(DTM: Integer; var X, Y: Integer; X1, Y1, X2, Y2: Integer): Boolean;
begin
  if (DTMRotated(DTM, X, Y, MMX1, MMY1, MMX2, MMY2)) then
    if (rs_OnMiniMap(X, Y)) then
      Result := True;
end;

function IsAxeBroken: Boolean;
var
  Dragon, Broken, X, Y: Integer;
begin
  if (GetBlackMessage('an axe')) then
  begin
    if (Players[CurrentPlayer].Booleans[0] = True) then
      GameTab(5);
    if (Players[CurrentPlayer].Booleans[0] = False) then
      GameTab(4);
    Broken := DTMFromString('78DA63CC666260B8C580025A9205182481342' + '310FF0702C662A09A3B0C6880118904D2A54035B709A82903AAB9' + '4F404D3250CD47FC6A00A1090BB2');
    if (FindDTM(Broken, X, Y, MIX1, MIY1, MIX2, MIY2)) then
    begin
      FreeDTM(Broken);
      Result := True;
      Wait(250 + Random(150));
      Mouse(X, Y, 3, 3, True);
      Wait(150 + Random(50));
      GameTab(4);
    end
    else
    begin
      Dragon := DTMFromString('78DA632C61626078C48001FE033123880602C' + '622A09A37E82A1819B8A06AC0BC2A6CE6A0A94904AA794B404D31' + '50CD4DFC6A00B38F0BE6');
      if (FindDTM(Dragon, X, Y, MIX1, MIY1, MIX2, MIY2)) then
      begin
        FreeDTM(Dragon);
        Result := True;
        Wait(250 + Random(150));
        Mouse(X, Y, 3, 3, True);
        Wait(150 + Random(50));
        GameTab(4);
      end
      else
      begin
        FreeDTM(Dragon);
        WriteLn('False Alarm.');
        Wait(150 + Random(50));
        GameTab(4);
        Exit;
      end;
    end;
    WriteLn('Found Broken Axe.');
    Exit;
  end;
end;

function WieldAxe: Boolean;
var
  Dragon, Axe, X, Y: Integer;
begin
  GameTab(4);
  Wait(250 + Random(25));
  Axe := DTMFromString('78DA63CC666260B8CD80025A9205182481342' + '310FF0702C672A09A7B0C6880118904D2A540353708A82901AA79' + '48404D3250CD47FC6A00A3CD0BB6');
  if (FindDTM(Axe, X, Y, MIX1, MIY1, MIX2, MIY2)) then
  begin
    FreeDTM(Axe);
    Result := True;
    WriteLn('Wielded the Axe.');
    Wait(250 + Random(100));
    Mouse(X, Y, 3, 3, True);
    Exit;
  end
  else
    FreeDTM(Axe);
  Dragon := DTMFromString('78DA63F4626260F062644007FF811824FA1F0' + '8186D806ABCD1D530327041D580793E4035AE44A80926A0C604A8' + '2606BF1A00225D081C');
  if (FindDTM(Dragon, X, Y, MIX1, MIY1, MIX2, MIY2)) then
  begin
    FreeDTM(Dragon);
    Result := True;
    WriteLn('Wielded the Dragon Axe.');
    Wait(250 + Random(100));
    Mouse(X, Y, 3, 3, True);
    Exit;
  end
  else
    FreeDTM(Dragon);
  Exit;
end;

function WalkTo(Where: string): Boolean;
var
  DTM0, DTM1, DTM2, DTM3, X, Y, Tries: Integer;
begin
  if (not (LoggedIn)) then
    Exit;
  SetRun(True);
  Wait(250 + Random(100));
  MakeCompass('N');
  X := MMCX;
  Y := MMCY;
  case (Where) of
    'DTree':
      begin
        DTM0 := LoadDTM(0);
        if (MMDTMRotated(DTM0, X, Y, MMX1, MMY1, MMX2, MMY2)) then
        begin
          FreeDTM(DTM0);
          WriteLn('Found DDTM 0!');
          Wait(200 + Random(150));
          Mouse(X, Y, 5, 5, True);
          Result := True;
          Flag;
          Exit;
        end
        else
        begin
          FreeDTM(DTM0);
          DTM1 := LoadDTM(1);
          if (MMDTMRotated(DTM1, X, Y, MMX1, MMY1, MMX2, MMY2)) then
          begin
            FreeDTM(DTM1);
            WriteLn('Found DDTM 1!');
            Wait(200 + Random(150));
            Mouse(X, Y, 5, 5, True);
            Result := True;
            Flag;
            Exit;
          end
          else
          begin
            FreeDTM(DTM1);
            if (RadialRoadWalk(FindWaterColor, 200, 220, 60, 1, 1)) then
            begin
              Result := True;
              WriteLn('Detected Water Color!');
              Flag;
              Exit;
            end
            else
            begin
              while (Tries <= 15) do
              begin
                if (FindSymbol(X, Y, 'Fish')) then
                begin
                  Result := True;
                  WriteLn('Found Fish Symbol!');
                  Wait(200 + Random(150));
                  Mouse(X, Y, 5, 5, True);
                  Flag;
                  Exit;
                end;
                Inc(Tries);
              end;
              Players[CurrentPlayer].Active := False;
              LogOut;
              Exit;
            end;
          end;
        end;
      end;
    'DBank':
      begin
        DTM2 := LoadDTM(2);
        if (MMDTMRotated(DTM2, X, Y, MMX1, MMY1, MMX2, MMY2)) then
        begin
          FreeDTM(DTM2);
          WriteLn('Found DDTM 2!');
          Wait(200 + Random(150));
          Mouse(X, Y, 3, 3, True);
          Result := True;
          Flag;
          Exit;
        end
        else
        begin
          FreeDTM(DTM2);
          DTM3 := DTMFromString('78DA636C67626008644001FFFFFD63F80FA41' + '9416C2060AC01AAF182C8B140D5FCF9C304A619A17CB09A204C35' + '22E86AC2F09B0300F8811153');
          if (MMDTMRotated(DTM3, X, Y, MMX1, MMY1, MMX2, MMY2)) then
          begin
            FreeDTM(DTM3);
            WriteLn('Found DDTM 3!');
            Wait(200 + Random(150));
            Mouse(X, Y, 5, 5, True);
            Result := True;
            Flag;
            Exit;
          end
          else
          begin
            FreeDTM(DTM3);
            while (Tries <= 15) do
            begin
              if (FindSymbol(X, Y, 'Bank')) then
              begin
                WriteLn('Found Bank Symbol!');
                Wait(200 + Random(150));
                Mouse(X, Y, 5, 5, True);
                Result := True;
                Flag;
                Exit;
              end;
              Inc(Tries);
            end;
            if (RadialRoadWalk(FindRoadColor, 0, 30, 60, 2, 2)) then
            begin
              WriteLn('Detected Road Color!');
              FFlag(10);
              Mouse(640, 110, 3, 3, True);
              Flag;
              Result := True;
              Exit;
            end
            else
            begin
              Players[CurrentPlayer].Active := False;
              LogOut;
              Exit;
            end;
          end;
        end;
      end;
  end;
  WriteLn(Where + ' does not exist! Please check your spelling.');
  Exit;
end;

function FindTree(var X, Y: Integer): Boolean;
var
  T2DPoint: T2DPointArray;
  TPAPoint: TPointArray;
  TPoint: TPoint;
  CTS, I: Integer;
begin
  CTS := GetColorToleranceSpeed;
  ColorToleranceSpeed(2);
  X := MSCX;
  Y := MSCY;
  FindColorsSpiralTolerance(X, Y, TPAPoint, 4612180, MSX1, MSY1, MSX2, MSY2, 15);
  T2DPoint := TPAtoATPAEx(TPAPoint, 40, 25);
  for I := 0 to Length(T2DPoint) - 1 do
  begin
    TPoint := MIddleTPA(T2DPoint[I]);
    X := 0;
    Y := 0;
    MMouse(TPoint.X, TPoint.Y, 5, 5);
    Wait(250 + Random(75));
    if (isUpText('illow')) and (not (FindEnt)) then
    begin
      ColorToleranceSpeed(CTS);
      GetMousePos(X, Y);
      Result := True;
      Exit;
    end;
  end;
  ColorToleranceSpeed(CTS);
  Exit;
end;

function FindTreeEx(var X, Y: Integer): Boolean;
var
  T2DPoint: T2DPointArray;
  TPAPoint: TPointArray;
  TPoint: TPoint;
  CTS, I: Integer;
begin
  CTS := GetColorToleranceSpeed;
  ColorToleranceSpeed(2);
  FindColorsSpiralTolerance(X, Y, TPAPoint, 4612180, MSCX - 50, MSCY - 50, MSCX + 50, MSCY + 50, 25);
  T2DPoint := TPAtoATPAEx(TPAPoint, 10, 10);
  for I := 0 to Length(T2DPoint) - 1 do
  begin
    TPoint := MIddleTPA(T2DPoint[I]);
    X := 0;
    Y := 0;
    MMouse(TPoint.X, TPoint.Y, 5, 5);
    Wait(200 + Random(75));
    if (isUpText('illow')) then
    begin
      ColorToleranceSpeed(CTS);
      GetMousePos(X, Y);
      Result := True;
      Exit;
    end;
    FindNormalRandoms;
  end;
  ColorToleranceSpeed(CTS);
  Exit;
end;

procedure ChopDownWillow;
var
  X, Y, Color1, Color2, NewColor1, NewColor2: Integer;
  Timer: LongInt;
  Tries: Byte;
begin
  if (not (LoggedIn)) then
    Exit;
  repeat
    if (IsAxeBroken) then
      Exit;
    FindNormalRandoms;
    if (FindTree(X, Y)) then
    begin
      MarkTime(Timer);
      Tries := 0;
      Mouse(X, Y, 5, 5, True);
      Color1 := GetColor(MSCX - 25, MSCY - 25);
      Color2 := GetColor(MSCX + 25, MSCY + 25);
      Flag;
      Wait(500 + Random(250));
      FindNormalRandoms;
      NewColor1 := GetColor(MSCX - 25, MSCY - 25);
      NewColor2 := GetColor(MSCX + 25, MSCY + 25);
      if not ((NewColor1 = Color1) and (NewColor2 = Color2)) then
        FindTreeEx(X, Y);
      MMouse(X, Y, 5, 5);
      if (FindEnt) then
        ReactToEnt;
      Wait(250 + Random(250));
      FindNormalRandoms;
      Wait(500 + Random(250));
      repeat
        FindRandoms;
        Wait(250 + Random(250));
        RandomHuman;
        MMouse(X, Y, 5, 5);
        Wait(500 + Random(250));
      until (TimeFromMark(Timer) >= (10000 + Random(5000))) or (not (IsUpText('illow'))) or (InvFull);
    end
    else
    begin
      FindNormalRandoms;
      Inc(Tries);
      Wait(1000 + Random(250));
      if (Tries >= 10) then
      begin
        if (TeleportDraynor) then
        begin
          WalkTo('DBank');
          Exit;
        end
        else
        begin
          Players[CurrentPlayer].Active := False;
          LogOut;
          Exit;
        end;
      end;
    end;
    Wait(250 + Random(150));
    FindLevelUp;
  until (InvFull) or (not (LoggedIn));
  WriteLn('FInished chopping Willows.');
  Exit;
end;

function CountDTM(DTM: Integer): Integer;
var
  I, X, Y: Integer;
  TB: Tbox;
begin
  GameTab(4);
  for I := 1 to 28 do
  begin
    TB := InvBox(I);
    if ExistsItem(I) then
      if FindDTM(DTM, X, Y, TB.X1, TB.Y1, TB.X2, TB.Y2) then
        Inc(Result);
  end;
end;

function BankItems: Boolean;
var
  DragonAxe, BrokenAxe, Replacement, Willow, EXPs, X, Y: Integer;
begin
  if (not (LoggedIn)) then
    Exit;
  Wait(250 + Random(50));
  if (not (OpenBank('db', True, True))) then
    if (not (OpenBankQuiet('db'))) then
      if (not (OpenBankGlass('db', True, True))) then
      begin
        Players[CurrentPlayer].Active := False;
        LogOut;
        Exit;
      end;
  Flag;
  Wait(1000 + Random(500));
  if (PinScreen) then
  begin
    InPin(IntToStr(Players[CurrentPlayer].Integers[0]));
    WriteLn('Entered Players Pin Number.');
    Wait(1750 + Random(250));
  end;
  if (BankScreen) then
  begin
    if (IsAxeBroken) then
    begin
      BrokenAxe := DTMFromString('78DA63CC666260B8C580025A9205182481342' + '310FF0702C662A09A3B0C6880118904D2A54035B709A82903AAB9' + '4F404D3250CD47FC6A00A1090BB2');
      if (FindDTM(BrokenAxe, X, Y, MIX1, MIY1, MIX2, MIY2)) then
      begin
        FreeDTM(BrokenAxe);
        Wait(250 + Random(50));
        Mouse(X, Y, 3, 3, True);
        WriteLn('Deposited the Broken Axe.');
      end
      else
      begin
        FreeDTM(BrokenAxe);
        DragonAxe := DTMFromString('78DA632C61626078C48001FE033123880602C' + '622A09A37E82A1819B8A06AC0BC2A6CE6A0A94904AA794B404D31' + '50CD4DFC6A00B38F0BE6');
        if (FindDTM(DragonAxe, X, Y, MIX1, MIY1, MIX2, MIY2)) then
        begin
          FreeDTM(DragonAxe);
          Wait(250 + Random(50));
          Mouse(X, Y, 3, 3, True);
          WriteLn('Deposited the Dragon Axe.');
        end
        else
          FreeDTM(DragonAxe);
        Wait(250 + Random(50));
        FIxBank;
        Replacement := DTMFromString('78DA63CC666260B8CD80025A9205182481342' + '310FF0702C672A09A7B0C6880118904D2A540353708A82901AA79' + '48404D3250CD47FC6A00A3CD0BB6');
        if FindDTM(Replacement, X, Y, MSX1, MSY1, MSX2, MSY2) then
        begin
          FreeDTM(Replacement);
          Wait(500 + Random(500));
          Mouse(X, Y, 3, 3, True);
        end
        else
        begin
          FreeDTM(Replacement);
          WriteLn('Failed to Find an Axe In the Bank.');
          WriteLn('Make sure It is on the fIrst slot.');
          CloseBank;
          Wait(250);
          Players[CurrentPlayer].Active := False;
          LogOut;
          Exit;
        end;
        WriteLn('Replaced the Old Axe wIth a New Axe.');
        Inc(Replaced);
        CloseBank;
        Wait(500 + Random(250));
        WieldAxe;
        Exit;
      end;
    end;
    Willow := DTMFromString('78DA63B463626078CA800242BCE5185881342' + '310FF07024607A09A3B0C6880118904D23E40350F09A8B105AAF9' + '48408D3150CD0BFC6A001AAD0A8C');
    EXPs := CountDTM(Willow);
    ReportVars[2] := ReportVars[2] + (EXPs * 68);
    ReportVars[1] := ReportVars[1] + EXPs;
    TotalWillows := TotalWillows + EXPs;
    Wait(50 + Random(25));
    if FindDTM(Willow, X, Y, MIX1, MIY1, MIX2, MIY2) then
    begin
      FreeDTM(Willow);
      Mouse(X, Y, 3, 3, False);
      Wait(175 + Random(50));
      ChooseOptIon('t-All');
      Result := True;
    end
    else
    begin
      FreeDTM(Willow);
      Deposit(2, 28, True);
      Result := True;
      Wait(150 + Random(50));
    end;
    Wait(500 + Random(250));
    if (Players[CurrentPlayer].Booleans[0] = False) then
    begin
      Deposit(2, 28, True);
    end
    else
      Deposit(1, 28, True);
    WriteLn('Finished Banking.');
    CloseBank;
    ReportVars[0] := ReportVars[0] + 1;
    Inc(TotalLoads);
    Inc(LoadsDone);
    Exit;
  end;
end;

procedure ProgressReport;
begin
  ClearDeBug;
  WriteLn(' _________________________________________________ ');
  WriteLn('/                                                 \');
  WriteLn('|          [UDL] Draynor Willow Whacker!          |');
  WriteLn('|_________________________________________________|');
  WriteLn('|                |                                |');
  WriteLn('|  Time Running  | ' + TimeRunning);
  WriteLn('|  Loads Done    | ' + IntToStr(TotalLoads));
  WriteLn('|  Total Willows | ' + IntToStr(TotalWillows));
  WriteLn('|  Total EXP     | ' + IntToStr(TotalWillows * 68));
  WriteLn('|  Total Levels  | ' + IntToStr(Levels));
  WriteLn('|_________________________________________________|');
  WriteLn('|                                                 |');
  WriteLn('|  Ents Found    | ' + IntToStr(EntsFound));
  WriteLn('|  Plants Found  | ' + IntToStr(StrangeFruit));
  WriteLn('|  Nests Found   | ' + IntToStr(NestsFound));
  WriteLn('|  Response Made | ' + IntToStr(Responded));
  WriteLn('|  Axes Replaced | ' + IntToStr(Replaced));
  WriteLn('|________________|________________________________|');
  WriteLn('|                                                 |');
  WriteLn('|                 Version 1.0                     |');
  WriteLn('|_________________________________________________|');
end;

procedure ScriptPause;
begin
  ProgressReport;
end;

procedure MainLoop;
begin
  LogInPlayer;
  PlayersPreferance;
  repeat
    repeat
      WalkTo('DTree');
      ChopDownWillow;
      WalkTo('DBank');
      BankItems;
      ProgressReport;
    until (LoadsDone >= Players[CurrentPlayer].Integers[1]) or (not (LoggedIn));
    NextPlayer(Players[CurrentPlayer].Active);
    LoadsDone := 0;
  until (Players[HowManyPlayers - 1].Active = False);
end;

begin
  SetUpSRL;
  ScriptID := '1014';
  SetUpScript;
  repeat
    MainLoop;
  until (False);
end.

this is what a SCAR script should look like.. this is also a Draynor willow cutter & banker if you need it.
 
Status
Not open for further replies.
Runescape Gamblingrunescape gambling
Back
Top