wesleyxD
2007-11-18 13:35:42
<!– BEGIN TEMPLATE: formanswers –>
wesleyxD - SRL Member Application Form
wesleyxD
What is the meaning to life?
Where you Referred to SRL? If yes, by whom?
no
Programming Knowledge
ye i know php java and c++
Other Communitys
How Long have You Played Runescape
4years
Are you affilated in anyway with Jagex LTD?
No Comment
—————————————————–
Please write down a paragraph about Yourself.
im playing for 4years runescape i always taughttherewherecheatsbtnever couldnt find since the last phew months i discover alot of site that have cheats and im now using scar im learning scar aswell im still learning im now bussy with an agil trainer for the agil pacours on brimhaven
——————————————————
Please Post a Sample of your Work. Only SCAR Scripts Accepted
——————————————————
<!– END TEMPLATE: formanswers –>
wesleyxD - SRL Member Application Form
wesleyxD
What is the meaning to life?
Where you Referred to SRL? If yes, by whom?
no
Programming Knowledge
ye i know php java and c++
Other Communitys
How Long have You Played Runescape
4years
Are you affilated in anyway with Jagex LTD?
No Comment
—————————————————–
Please write down a paragraph about Yourself.
im playing for 4years runescape i always taughttherewherecheatsbtnever couldnt find since the last phew months i discover alot of site that have cheats and im now using scar im learning scar aswell im still learning im now bussy with an agil trainer for the agil pacours on brimhaven
——————————————————
Please Post a Sample of your Work. Only SCAR Scripts Accepted
program Autotalker;
//____________________ Autotalker + randomsales By wesleyxD ______________________________
// |
// 1. Set Spelling and SpellingChance to the item that your selling |
// including alternate spellings and typos. Set the chance of using that |
// spelling out of 100. |
// 2. Set the price and choose between the two selling modes. More instructions |
// below. |
// 3. Press play and switch to Runescape window. Press Ctrl-Alt-S to stop the |
// script. Press Ctrl-Alt-R to run the script again. There is a 5 seconds |
// delay before the script starts; you can change this if you want. |
//________________________________________________________________________________|
{.include SRL\SRL.scar}
const
Spelling1= 'rune scimy';//spelling of the product
Spelling1Chance= 50;// chance of using this spelling for the product out of 100
Spelling2= 'Rune scim';
Spelling2Chance= 20;
Spelling3= 'r scimytars';
Spelling3Chance= 10;
Spelling4= 'rune scimitar';
Spelling4Chance= 10;
Spelling5= 'runite scimy';
Spelling5Chance= 10;
PriceMode= 1;// mode 1: each example: selling rune scimy 25k each
// mode 2: set amount example: selling 10 rune scimy 250k
PriceEach= '25k';// for mode 1 price of each
PriceAmount= '10';// for mode 2 amount of the product
PriceBatch= '220k';// for mode 2 Price for the set amount
var
Spelling,Effect,SellingTypo,EachTypo: String;
SpellingRandom,EffectRandom,SellingTypoRandom,EachTypoRandom: Integer;
begin
Wait(5000);// gives you 5 seconds to switch window
If (Spelling1Chance + Spelling2Chance + Spelling3Chance + Spelling4Chance +Spelling5Chance = 100) then
Writeln('Spelling Chances Correct')
begin
repeat
SpellingRandom:=random(100)
If (SpellingRandom<Spelling1Chance) then
begin
Spelling:=Spelling1;
end else if (SpellingRandom<(Spelling1Chance+Spelling2Chance)) then
begin
Spelling:=Spelling2;
end else if (SpellingRandom<(Spelling1Chance+Spelling2Chance+Spelling3Chance)) then
begin
Spelling:=Spelling3;
end else if (SpellingRandom<(Spelling1Chance+Spelling2Chance+Spelling3Chance+Spelling4Chance)) then
begin
Spelling:=Spelling4;
end else
begin
Spelling:=Spelling5;
end
SellingTypoRandom:= random(20);
case SellingTypoRandom of
0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17: SellingTypo:= 'selling';
18: SellingTypo:= 'sellin';
19: SellingTypo:= 'seling';
end
EffectRandom:= random(16)
case EffectRandom of
0,1: Effect:= 'red:';
2,3: Effect:= 'white:';
4,5: Effect:= 'cyan:';
6,7: Effect:= 'green:';
8,9: Effect:= 'purple:';
10: Effect:= 'glow1:';
11: Effect:= 'glow2:';
12: Effect:= 'glow3:';
13: Effect:= 'flash1:';
14: Effect:= 'flash2:';
15: Effect:= 'flash3:';
end
If (PriceMode=1) then
begin
EachTypoRandom:= random(20);
case EachTypoRandom of
0,1,2,3,4,5,6,7,8,9,10,11,12: EachTypo:= 'each';
13,14,15,16,17,18: EachTypo:= 'per';
19: EachTypo:= 'ech';
end
end
case PriceMode of
1: TypeSend(Effect+SellingTypo+' '+Spelling+' '+PriceEach+' '+EachTypo);
2: TypeSend(Effect+SellingTypo+' '+PriceAmount+' '+Spelling+' '+PriceBatch);
end
wait(750+500)
until(false)
end
end.
——————————————————
<!– END TEMPLATE: formanswers –>