SRL Archive - Archive

t3hl33tn00b - SRL Member Application Form
t3hl33tn00b

What is the meaning to life?


Where you Referred to SRL? If yes, by whom?
no


Programming Knowledge
a little c++,vb, ASM (thats assembly) and scar of course

Other Communitys
sythe, moparisthebest,villu

How Long have You Played Runescape
about 4 years

Are you affilated in anyway with Jagex LTD?
No
—————————————————–
Please write down a paragraph about Yourself.

OK so lets see…
hi I'm t3hl33tn00b, I'm 15, i can spell like a normal person, i can speak english like a normal person. (lol don't worry about that if you didn't get it) Anyways, i know vb, SOME c++, assembly (asm <– great language) and scar. i started playing runescape about 3 years ago, then i quit 2 years ago because my main got banned because i asked some kid for his password as a joke and he reported me so fagex banned me. -.- ok anyways, i recently started back up after learning those languages and now I feel like autoing lol. i started scripting in scar about one and a half weeks ago, now do not think that just because i started only one and a half weeks ago that i am a noob. after learning all those other languages scar was like a 2 day thing for me (seriously -.- ) also, i know how to use SRL and i am constantly reading through your guys' coding to see what you guys have done to srl to make it better. i use srl as much as i can in my scripts and if it doesnt work for me i make my own procedures or functions. also, i have completely learned scar pretty much, i can look at a script and interpret what it does very easily ( i think i could do that before i even tried learning scar because of my previous programming experiences) and i can edit my scripts very will if people have problems with them. Now please don't think that i am insulting you guys by saying that scar is easy to learn, all im saying is that for me personally it was very easy to do. im not advanced enough to make srl includes yet but im working my way up. another thing, please do not judge me by my post count because i only registered here a little bit ago and i am posting here every day and always active. Lastly i'd just like to say that i do NOT want to get into srl community for the scripts, i could care less about them. i would like to be in it because this way i can see how you guys code in scar and (OMG ITS SNOWING HERE YAY) <– sry (the effects of global warming made it not snow here all winter so im kind of exited.. heh ) ok so where was i… oh yeah so i want to see how you guys code in scar and i'd like to learn from it. also im not saying that i didnt learn scar yet, i got it now im just looking for the advanced type of stuff you guys do.

——————————————————
Please Post a Sample of your Work. Only SCAR Scripts Accepted

here is an example of my first script (made this on my second day of scripting and still updating it

{Script Info:
# ScriptName        = PowerChopper
# Author               = t3hl33tn00b
# Description         = a power chopper
# Version              = 2.2
# Original Date      = 12/29/2006
# Comments          = no stealing :)
/Script Info}
program PowerCutter;
{.include srl\srl.scar}
{.include srl\srl\skill\woodcutting.scar}
///////////////////////////////////////////////////////
//                    by T3hl33tn00b                 //
//////////////////////////////////////////////////////////
// Please dont use good armor while running this because//
//    i dont want you to have to lose ur armor :P       //
//    and please keep in mind that this is my first     //
//   script so dont expect it to be perfect ok?         //
//////////////////////////////////////////////////////////
//  WARNING! I AM NOT RESPONSIBLE FOR IF YOU GET BANNED //
//  NOR DO I WANT ANY COMPLAINTS OF YOU GETTING BANNED  //
//////////////////////////////////////////////////////////////////////////////////////////
//                            SETUP                                                     //
//////////////////////////////////////////////////////////////////////////////////////////
const //
  TreeColorr = 2582616; //put the color of the tree you want to cut                       //                                 //
  StartPlayer = 0; //
  RandomTalking = True; // put true if you want it to say random words (i highly suggest it)//

////////////////////////////////////////////////////////////////////////////////
//                     **DO NOT TOUCH BELOW!!!!!**                            //
////////////////////////////////////////////////////////////////////////////////
var
  NumberOfLogsChopped, Loads, TreeExp, Ents, ExpPerTree, LoadsToChop, ChopTime: Integer;
  Username, Password, TypeOfTree, SkillForLamp, RunAway, NickName: string;
  results: Boolean;
  frmDesign: TForm;
  Label1: TLabel;
  Label2: TLabel;
  Label3: TLabel;
  Label4: TLabel;
  Label5: TLabel;
  Label6: TLabel;
  Label7: TLabel;
  Label8: TLabel;
  Label9: TLabel;
  Label10: TLabel;
  Edit1: TEdit;
  Edit2: TEdit;
  ComboBox1: TComboBox;
  Edit3: TEdit;
  ComboBox2: TComboBox;
  Edit4: TEdit;
  Edit5: TEdit;
  Button1: TButton;
  Button2: TButton;
  Edit6: TEdit;
  Memo1: TMemo;
  Edit7: TEdit;
{///////////////////////////////////////////////////////////////
//DO NOT TOUCH BELOW UNLESS YOU KNOW WHAT THE HECK YOUR DOING!//
////////////////////////////////////////////////////////////////}

procedure ButtonClick(sender: TObject);
begin
  frmDesign.Caption := frmDesign.Caption + '.';
  frmDesign.ModalResult := mrOk;
end;

procedure InitForm;
begin
  frmDesign := CreateForm;
  frmDesign.Left := 644;
  frmDesign.Top := 90;
  frmDesign.BorderIcons := [biSystemMenu];
  frmDesign.BorderStyle := bsSingle;
  frmDesign.Caption := 'T3hl33tn00b'#39's Power Chopper Form';
  frmDesign.ClientHeight := 440;
  frmDesign.ClientWidth := 459;
  frmDesign.Color := clBtnFace;
  frmDesign.Font.Color := clWindowText;
  frmDesign.Font.Height := -11;
  frmDesign.Font.Name := 'MS Sans Serif';
  frmDesign.Font.Style := [];
  frmDesign.FormStyle := fsStayOnTop;
  frmDesign.Visible := False;
  frmDesign.PixelsPerInch := 96;
  Label1 := TLabel.Create(frmDesign);
  Label1.Parent := frmDesign;
  Label1.Left := 109;
  Label1.Top := 11;
  Label1.Width := 51;
  Label1.Height := 13;
  Label1.Caption := 'Username:';
  Label2 := TLabel.Create(frmDesign);
  Label2.Parent := frmDesign;
  Label2.Left := 109;
  Label2.Top := 43;
  Label2.Width := 49;
  Label2.Height := 13;
  Label2.Caption := 'Password:';
  Label3 := TLabel.Create(frmDesign);
  Label3.Parent := frmDesign;
  Label3.Left := 0;
  Label3.Top := 101;
  Label3.Width := 762;
  Label3.Height := 13;
  Label3.Caption :=
    '________________________________________________________________' +
    '_______________________________________________________________';
  Label4 := TLabel.Create(frmDesign);
  Label4.Parent := frmDesign;
  Label4.Left := 89;
  Label4.Top := 213;
  Label4.Width := 67;
  Label4.Height := 13;
  Label4.Caption := 'Type of Tree?';
  Label5 := TLabel.Create(frmDesign);
  Label5.Parent := frmDesign;
  Label5.Left := 83;
  Label5.Top := 177;
  Label5.Width := 74;
  Label5.Height := 13;
  Label5.Caption := 'Loads to chop?';
  Label6 := TLabel.Create(frmDesign);
  Label6.Parent := frmDesign;
  Label6.Left := 85;
  Label6.Top := 253;
  Label6.Width := 75;
  Label6.Height := 13;
  Label6.Caption := 'Direction to run:';
  Label7 := TLabel.Create(frmDesign);
  Label7.Parent := frmDesign;
  Label7.Left := 96;
  Label7.Top := 139;
  Label7.Width := 62;
  Label7.Height := 13;
  Label7.Caption := 'Skill for lamp:';
  Label8 := TLabel.Create(frmDesign);
  Label8.Parent := frmDesign;
  Label8.Left := 102;
  Label8.Top := 293;
  Label8.Width := 57;
  Label8.Height := 13;
  Label8.Caption := 'Chop Time?';
  Label9 := TLabel.Create(frmDesign);
  Label9.Parent := frmDesign;
  Label9.Left := 108;
  Label9.Top := 77;
  Label9.Width := 53;
  Label9.Height := 13;
  Label9.Caption := 'Nick Name';
  Label10 := TLabel.Create(frmDesign);
  Label10.Parent := frmDesign;
  Label10.Left := 92;
  Label10.Top := 337;
  Label10.Width := 68;
  Label10.Height := 13;
  Label10.Caption := 'EXP Per Tree:';
  Edit1 := TEdit.Create(frmDesign);
  Edit1.Parent := frmDesign;
  Edit1.Left := 164;
  Edit1.Top := 7;
  Edit1.Width := 121;
  Edit1.Height := 21;
  Edit1.Hint := 'Type in your username';
  Edit1.ParentShowHint := False;
  Edit1.ShowHint := True;
  Edit1.TabOrder := 8;
  Edit1.Text := LoadSetting('UserPassSaver', 'Username');
  Edit2 := TEdit.Create(frmDesign);
  Edit2.Parent := frmDesign;
  Edit2.Left := 164;
  Edit2.Top := 39;
  Edit2.Width := 121;
  Edit2.Height := 21;
  Edit2.Hint := 'Type in your password';
  Edit2.ParentShowHint := False;
  Edit2.PasswordChar := #1;
  Edit2.ShowHint := True;
  Edit2.TabOrder := 9;
  Edit2.Text := LoadSetting('UserPassSaver', 'Password');
  ComboBox1 := TComboBox.Create(frmDesign);
  ComboBox1.Parent := frmDesign;
  ComboBox1.Left := 164;
  ComboBox1.Top := 209;
  ComboBox1.Width := 145;
  ComboBox1.Height := 21;
  ComboBox1.ItemHeight := 13;
  ComboBox1.ParentShowHint := False;
  ComboBox1.ShowHint := True;
  ComboBox1.TabOrder := 10;
  ComboBox1.Items.Add('Tree');
  ComboBox1.Items.Add('Oak');
  ComboBox1.Items.Add('Willow');
  ComboBox1.Items.Add('Maple');
  ComboBox1.Items.Add('Hollow');
  ComboBox1.Items.Add('Mahogany');
  ComboBox1.Items.Add('Yew');
  ComboBox1.Items.Add('Magic');
  Edit3 := TEdit.Create(frmDesign);
  Edit3.Parent := frmDesign;
  Edit3.Left := 164;
  Edit3.Top := 173;
  Edit3.Width := 121;
  Edit3.Height := 21;
  Edit3.Hint := 'Type in how many loads of logs you want to chop.';
  Edit3.ParentShowHint := False;
  Edit3.ShowHint := True;
  Edit3.TabOrder := 11;
  ComboBox2 := TComboBox.Create(frmDesign);
  ComboBox2.Parent := frmDesign;
  ComboBox2.Left := 164;
  ComboBox2.Top := 250;
  ComboBox2.Width := 145;
  ComboBox2.Height := 21;
  ComboBox2.Hint := 'The direction you want to run if a fight is found';
  ComboBox2.ItemHeight := 13;
  ComboBox2.ParentShowHint := False;
  ComboBox2.ShowHint := True;
  ComboBox2.TabOrder := 12;
  ComboBox2.Items.Add('N');
  ComboBox2.Items.Add('S');
  ComboBox2.Items.Add('E');
  ComboBox2.Items.Add('W');
  Edit4 := TEdit.Create(frmDesign);
  Edit4.Parent := frmDesign;
  Edit4.Left := 164;
  Edit4.Top := 138;
  Edit4.Width := 121;
  Edit4.Height := 21;
  Edit4.Hint := 'Type the skill you want to upgrade if you get a genie lamp';
  Edit4.ParentShowHint := False;
  Edit4.ShowHint := True;
  Edit4.TabOrder := 13;
  Edit5 := TEdit.Create(frmDesign);
  Edit5.Parent := frmDesign;
  Edit5.Left := 164;
  Edit5.Top := 291;
  Edit5.Width := 121;
  Edit5.Height := 21;
  Edit5.Hint :=
    'How long will it take you to chop the tree? (put time in millise' +
    'conds)';
  Edit5.ParentShowHint := False;
  Edit5.ShowHint := True;
  Edit5.TabOrder := 14;
  Button1 := TButton.Create(frmDesign);
  Button1.Parent := frmDesign;
  Button1.Left := 56;
  Button1.Top := 386;
  Button1.Width := 75;
  Button1.Height := 25;
  Button1.Caption := 'Start';
  Button1.ModalResult := 1;
  Button1.TabOrder := 15;
  Button2 := TButton.Create(frmDesign);
  Button2.Parent := frmDesign;
  Button2.Left := 242;
  Button2.Top := 386;
  Button2.Width := 75;
  Button2.Height := 25;
  Button2.Cancel := True;
  Button2.Caption := 'Cancel';
  Button2.ModalResult := 2;
  Button2.TabOrder := 16;
  Edit6 := TEdit.Create(frmDesign);
  Edit6.Parent := frmDesign;
  Edit6.Left := 164;
  Edit6.Top := 74;
  Edit6.Width := 121;
  Edit6.Height := 21;
  Edit6.Hint :=
    'Type three letters from your username except for your first thre' +
    'e.';
  Edit6.MaxLength := 3;
  Edit6.ParentShowHint := False;
  Edit6.ShowHint := True;
  Edit6.TabOrder := 17;
  Edit6.Text := LoadSetting('UserPassSaver', 'NickName')
    Memo1 := TMemo.Create(frmDesign);
  Memo1.Parent := frmDesign;
  Memo1.Left := 319;
  Memo1.Top := 131;
  Memo1.Width := 130;
  Memo1.Height := 129;
  Memo1.Lines.Add('Tree Exp Guide');
  Memo1.Lines.Add('Tree = 25');
  Memo1.Lines.Add('Oak = 37');
  Memo1.Lines.Add('Willow = 67');
  Memo1.Lines.Add('Maple = 100');
  Memo1.Lines.Add('Hollow = 82');
  Memo1.Lines.Add('Mahogany = 125');
  Memo1.Lines.Add('Yew = 175');
  Memo1.Lines.Add('Magic = 250');
  Memo1.TabOrder := 18;
  Edit7 := TEdit.Create(frmDesign);
  Edit7.Parent := frmDesign;
  Edit7.Left := 164;
  Edit7.Top := 333;
  Edit7.Width := 121;
  Edit7.Height := 21;
  Edit7.Hint := 'Refer to the box on the right';
  Edit7.ParentShowHint := False;
  Edit7.ShowHint := True;
  Edit7.TabOrder := 19;
end;

procedure SafeInitForm;
var
  v: TVariantArray;
begin
  setarraylength(V, 0);
  ThreadSafeCall('InitForm', v);
end;

procedure ShowFormModal;
begin
  frmDesign.ShowModal;
end;

procedure SafeShowFormModal;
var
  v: TVariantArray;
begin
  setarraylength(V, 0);
  ThreadSafeCall('ShowFormModal', v);
end;

procedure SetupAll;
begin
  Username := Edit1.Text;
  Password := Edit2.Text;
  SkillForLamp := Edit4.Text;
  NickName := Edit6.Text;
  LoadsToChop := StrToInt(Edit3.Text);
  ChopTime := StrToInt(Edit5.Text);
  ExpPerTree := StrToInt(Edit7.Text);
  case ComboBox1.Text of
    'Tree': TypeOfTree := 'Tree';
    'Oak': TypeOfTree := 'Oak';
    'Willow': TypeOfTree := 'Willow';
    'Maple': TypeOfTree := 'Maple';
    'Hollow': TypeOfTree := 'Hollow';
    'Mahogany': TypeOfTree := 'Mahogany';
    'Yew': TypeOfTree := 'Yew';
    'Magic': TypeOfTree := 'Magic';
  end;
  case ComboBox2.Text of
    'N': Runaway := 'N';
    'S': Runaway := 'S';
    'E': Runaway := 'E';
    'W': Runaway := 'W';
  end;
  SaveSetting('UserPassSaver', 'Username', Edit1.Text);
  SaveSetting('UserPassSaver', 'Password', Edit2.Text);
  SaveSetting('UserPassSaver', 'NickName', Edit6.Text);
end;

procedure DeclarePlayers;
begin
  HowManyPlayers := 1;
  NumberOfPlayers(HowManyPlayers);
  Players[0].Name := (Username);
  Players[0].Pass := (Password);
  Players[0].Nick := (NickName);
  Players[0].Active := True;
  Lampskill := SkillForLamp
end;

procedure Loginn;
begin
  if (not (LoggedIn)) then
  begin
    LoginPlayer;
    HighestAngle;
    PerfectNorth;
  end;
end;

function FindAxeHeadColors: Boolean;
begin
  GameTab(4);
  result := FindAxeHeadColor;
end;

function FindFastRandoms: Boolean;
var
  i: Integer;
begin
  Status('Finding Random Events...')
    for i := 1 to 8 do
  begin
    case I of
      1: if FindDead then
          Result := True;
      2: if FindMod then
          Result := True;
      3: if FindMime then
          Result := True;
      4: if FindMaze then
          Result := True;
      5: if FindQuiz then
          Result := True;
      6: if FindDemon then
          Result := True;
      7: begin
          if NoGameTab then
          begin
            Result := True;
            Players[CurrentPlayer].loc := 'No GameTab';
            Logout;
            Exit;
          end;
        end;
      8: begin
          if InBlack then
          begin
            Result := True;
            Players[CurrentPlayer].loc := 'InBlack';
            Logout;
            Exit;
          end;
        end;
    end;
    wait(1);
  end;
end;

procedure AntiRandoms;
begin
  FindFastRandoms;
  FindHead;
  FindTalk;
  FindNormalRandoms;
  if (FindFight) then
  begin
    RunAwayDirection(RunAway);
    Wait(30000 + random(462));
    RunBack;
  end;
  if (FindLamp(SkillForLamp)) then
  begin
    SolveGenie(SkillForLamp);
  end;
  FindTalk;
  Status('Check done.');
end;

function FindTehEnt(TreeColor: Integer): Boolean;
begin
  Status('Looking for ents..');
  if (Option2('Chop')) then
  begin
    if (FindColorTolerance(x, y, 383705, 9, 9, 233, 24, 20)) or
      (FindColorTolerance(x, y, 65535, 9, 9, 233, 24, 20)) then
    begin
      TypeSend('Ugh i hate ents..')
        RunAwayDirection(RunAway);
      Wait(15000 + random(5000))
        RunBack;
      Result := True;
      Ents := Ents + 1;
    end;
  end;
end;

///////////////////  Anti Ban  /////////////////////////

procedure UCBM;
var
  Randomss: Integer;
begin
  Status('Doing Anti-Ban stuff');
  Loginn;
  Randomss := Random(30);
  case Randomss of
    0: RandomRClick;
    1: begin
        MakeCompass('N');
        wait(600);
        PerfectNorth;
      end;
    2: begin
        HoverSkill('woodcutting', False);
        wait(300)
      end;
    3: PickUpMouseEvery(2 + random(2));
    4: AlmostLogOut;
    5: RandomChatEvery(2 + Random(6));
    6: begin
        GameTab(1 + Random(12));
      end;
    7: LeaveScreenEvery(3 + random(7));
    9: begin
        MakeCompass('S');
        wait(600);
        PerfectNorth;
      end;
    10: begin
        MakeCompass('E');
        wait(600);
        PerfectNorth;
      end;
    11: begin
        MakeCompass('W');
        wait(600);
        PerfectNorth;
      end;
  end;
  HighestAngle;
  Status('done with anti ban');
end;

procedure Chop;
var
ChopMark:Integer;
begin
  Status('Looking for trees..');
  Loginn;
  repeat
  repeat
    if (FindObj(x, y, TypeOfTree, TreeColorr, 4)) then
    begin
    results := true
    mouse(x, y, 1, 1, true);
    end else
    begin
     Case Random(4) of
       0: MakeCompass('N');
       1: MakeCompass('S');
       2: MakeCompass('E');
       3: MakeCompass('W');
     end;
     end;
    until(TimeFromMark(ChopMark)>350000)or (results=true);
     if(results=True)then
     begin
     MarkTime(ChopMark);
     repeat
      FindTehEnt(TreeColorr);
      if (InvFull) then exit;
      AntiRandoms;
      if (InvFull) then exit;
      UCBM
        if (InvFull) then exit;
      FindTehEnt(TreeColorr);
      case random(5) of
      1:AntiRandoms;
      end;
      if (InvFull) then exit;
    until(TimeFromMark(ChopMark)>ChopTime);
    end;
    if Not(results) then
    begin
     logout;
     ClearDebug;
     Writeln('sorry couldnt find trees, please make sure you');
     Writeln('set the colors of the tree and the tree name');
     TerminateScript;
    end;
  until (InvFull);
end;

procedure DropLogs;

begin
  Loginn;
  MouseSpeed := 10 + random(5)
    DropTo(2, 15)
    AntiRandoms;
  wait(1000 + random(426));
  AntiRandoms;
  DropTo(16, 28)
    NumberOfLogsChopped := NumberOfLogsChopped + 27
    ReportVars[1] := ReportVars[1] + 27
    Loads := Loads + 1
    ReportVars[2] := ReportVars[2] + 1
    TreeExp := NumberOfLogsChopped * (ExpPerTree)
    ReportVars[0] := NumberOfLogsChopped * (ExpPerTree)
end;

procedure Report;

begin
  SrlRandomsreport;
  Writeln(' ');
  Writeln('~=~=~=~=~=~=~=~=~=t3hl33tn00bs Power Chopper~=~=~=~=~=~=~=~=~=');
  Writeln('~=~=~=~=~=~=~=~=~=Report for Version 2.0~=~=~=~=~=~=~=');
  Writeln('            Worked for ' + TimeRunning);
  Writeln('            Chopped About ' + IntToStr(NumberOfLogsChopped) + ' ' + (TypeOfTree));
  Writeln('            Dropped ' + IntToStr(Loads) + ' loads');
  Writeln('            Gained About ' + IntToStr(TreeExp) + ' experience');
  Writeln('~=~=~=~=~=~=~=~=~=Thank You for using my Power Chopper~=~=~=~=~=~=~');
  Writeln(' ');
end;

procedure WriteStuffIn;
begin
  Writeln('You are cutting ' + (TypeOfTree) + ' trees');
  Writeln('You want to chop ' + IntToStr(LoadsToChop) + ' loads');
  Writeln('You will run ' + (RunAway) + ' if a fight is found');
  Writeln('If a genie lamp is found the script will advance ' + (SkillForLamp));
end;

procedure Setup; // no, this is not a setup for you so dont touch it!
begin
  SetUpSRL;
  //56
  ScriptID := '56';
  SafeInitForm;
  SafeShowFormModal;
  SetupAll;
  DeclarePlayers;
  CurrentPlayer := StartPlayer;
  MouseSpeed := 10;
  WriteStuffIn;
  Loginn;
  FindAxeHeadColors;
  AntiRandoms;
  PerfectNorth;
end;

begin
  ActivateClient;
  ClearDebug;
  Setup;
  DisguiseScar('YouTube - I Atrum I - Mozilla Firefox');
  repeat
    Chop;
    DropLogs;
    report;
  until (Loads = LoadsToChop)
    DeleteUID;
  logout;
end.

everything in this script was pretty much made by me or srl so yes its 90% ( i got the findfastrandoms from wt-fawkis script)

——————————————————

Does it switch players?

no i am putting in that function right now like literally right now lol… i cant do much this week because i have midterms so im busy with those but after this week im free

seems good to me. Yes.

Iv looked at this script and told you to change a few things.
So far i dont think its completely member worthy.
I say you should make it switch players, and do those other fixes i told you on messenger.
I know you have mid terms soon so maybe get those out of the way and work on it a bit more.

Ned to fix this
(used 8 twice)

     8: begin
          if InBlack then
          begin
            Result := True;
            Players[CurrentPlayer].loc := 'InBlack';
            Logout;
            Exit;
          end;
        end;
      8: RC;
    end;
    wait(1);
  end;
end;

I also think you use antiban procedures too much and it i wll just slow down the productivity.

maybey try making your own tree fidning procedure?
Findobj does way too much and takes the fun out of scripting =)

This loop i think is unsafe

  repeat
    if (FindObj(x, y, TypeOfTree, TreeColorr, 4)) then
    begin
      FindTehEnt(TreeColorr);
      Mouse(x, y, 1, 1, True);
      Flag;
      if (InvFull) then exit;
      AntiRandoms;
      FindTehEnt(TreeColorr);
      if (InvFull) then exit;
      UCBM
        if (InvFull) then exit;
      FindTehEnt(TreeColorr);
      AntiRandoms;
      if (InvFull) then exit;
    end;
  until (InvFull);

If there are none of the correct trees on the screen, then it will just spazz out the mouse on a random tree.
Try adding a counter and after every 5 tries cahnge the compass angle.
Ill test this again today when i get home. But as for now i say no.

ok yohojo i had a feeling you would say no :P and im working on fixing those things its just because of midterms im having a hard time =/ tomorrows my last one though

=)
Cool finish up your studying and rewrite some stuff.
Probably just post it here ans an update
(we don't like people who apply too often)

Or just take your time and make it really nice and reapply again in a couple of weeks your choice.
I know you can do it, you just need some time =) wihc you will have after your midterms.

yeah, and btw, that is the same anti ban that fawki uses, thats what i said at the end of my script "this anti ban is from fawki" :P

As of no I also say no Srry.

I have suggestions too :) :

procedure RandomTalk;
var
  t: integer;
 
begin
  status('Randomly Talking')
    if (RandomTalking) = True then
  begin
    t := random(100) + 1;
    begin
      if (t = 1) then
        typesend('wood cutting lvls everyoen' + chr(13));
      if (t = 2) then
        typesend('aw man how come i never get a random event' + chr(13))
          if (t = 3) then
          typesend('i cant wait until the end of school year' + chr(13))
            if (t = 4) then
            typesend('i cant wait till i can chop yews' + chr(13))
              if (t = 5) then
              typesend('cool' + chr(13))
                if (t = 6) then
                sendkeyssilent('how long have you been woodcutting' + chr(13))
                  if (t = 7) then
                  typesend('is anyone else bored of wcing' + chr(13))
                    if (t = 8) then
                    typesend('allmost at my next lvl yay' + chr(13))
                      if (t = 9) then
                      typesend('nice woodcutting axe d00d' + chr(13))
                        if (t = 10) then
                        typesend('wow im soooo boreddd' + chr(13))
                          if (t = 11) then
                          typesend('please dont let the wizards kill me' + chr(13))
    end;
  end;
end;

You shouldnt do that cause you will just randomly talk. You should do it like when scar gets a word in the chat box it responds to what ever you entered.

OK check my first post again please, i fixed the chopping loop and the auto responder, by the way, i deleted that responding function out, the one where if it finds some words, yohojo said it wasnt good to have in there. anyways.. PLEASE RE CHECK MY FIRST POST AND RECONSIDER YOUR VOTES IF YOU LIKE THE CHANGES! i will update more after midterms.

dude i told oyu, we cant change votes once we already did.
just update it and post again in 2 weeks =)
unles this one gets accepted

actually i think dank just put a min 1 month in between

edit yea http://www.villu-reborn.com/showthread.php?t=5958

of course i will re apply if this gets denied (which i am seriously hoping wont happen :S ) when the time limits is over if i feel that i learned what i needed to..(though if i get denied i really hope someone will tell me why lol )
also it does antiban at random so i dont think its too excessive..

EDIT take a look at the script again ,i fixed some stuff, this is my last day of midterms and after this i wont be distracted anymore >_>

edit again:
whoever is voting no i would really appreciate if you could give a reason for no
and if you are voting yes then i also would like to know why, i believe i should know why im being denied or accepted. thanks

Accepted. Keep up the good work.