http://www.verbatim.jp/senshuken/?id=1172573
go there, you create your own tech monster and use it to fisght other tech monsters
it may sound lame, but its quite interesting
~shut
http://www.verbatim.jp/senshuken/?id=1172573
go there, you create your own tech monster and use it to fisght other tech monsters
it may sound lame, but its quite interesting
~shut
All my scripts are held on Googlecode git, so if you ever see a problem, fork it and send me a pull request
If a script is grey, it doesn't work, if it's colour then it does!
My Tutorials:-
Everything you need to know about setting up Simba, SRL and Reflection!, How to sort out the MSVCR71.dll error
How to set up players for autoing with Simba, SRL/Simba Standards (with examples), Defines
Auto Updater and Git, Using a testing branch for git, Adding SRL Stats to your script
Creating your own font set for Simba, Guide to Cups, How to make 1.45M (RSGP) a day (not really my tut)
Download a image and set it as your Desktop Wallpaper in C#, How to make your first PHP file uploader
<Coh3n> Shuttleu, fuck I love you right now
Wow, this is quite fun to playGood game to pass time.
got something for ya
Simba Code:program new;
{$i srl/srl.scar}
var
NumLose, NumWin: Integer;
Where: string;
procedure Setup;
begin
Where:= 'Start';
end;
procedure Proggy;
var
H, M, S: Integer;
begin
ConvertTime(GetTimeRunning, H, M, S);
Writeln('***************************************');
Writeln('Running For: '+IntToStr(H)+':'+IntToStr(M)+':'+IntToStr(S));
Writeln('***************************************');
Writeln('Won '+IntToStr(NumWin)+' times');
Writeln('Lost '+IntToStr(NumLose)+' times');
Writeln('***************************************');
end;
procedure StartGame;
var
RandomMatch, x, y: Integer;
begin
RandomMatch:= BitmapFromString(31, 19, 'meJztk7mKAkEQhh9mFO/7mEBZTT' +
'URAwNH8C0UFEExMTAxFDE1ESMxEYRhAgMNTExEEUw0EU/EAwT3Z4p' +
'tBmd3MVtY/IOmq7r6q+6qbo5764/lcDg8soxG49OSRqNxu91KD8Js' +
'NhszscXlcmFiMBgI8rR9NBo9vrRarXieZ6vVavV2u4XDYTL9fv/1e' +
'l0ul3a7nTyFQmG73ZrN5mw2SwQ1vN1um0ymUCiEjd1ul5bgWa/XSN' +
'dsNhn8fD5vNptGo6GGHw6HYDD4LZzMfr8/GAxonkqlTqdTuVzGSMU' +
'heKVSwXUSiYQabrVa1XAAO50Oxvv9nk6n4dfpdJPJpNVqoYzH47FY' +
'LDI4sL1ebz6fWyyWV+DD4RDx+/0+EomQPx6P43hkIu9sNtPr9QQXB' +
'MHn8+12u1qt9gocZUEAKszKi8o/FMKNkskkgyMgk8kgOzr+ChzzXC' +
'6H+Fgshr4Aks/nP2QFAoHFYiGKohKu1WolSYJfCUfwT3BcfDqdjsf' +
'jer3OmkgqlUqXyyUajTI4hDOgHb88RQgQ+ggQPgjeOUz1d4Af2TGi' +
'18zvdDq9Xi8nv1teFvfW/9InRyXyZA==');
if FindBitmap(RandomMatch, x, y) then
begin
Mouse(x, y, 0, 0, True);
Where:= 'In Game';
end;
FreeBitmap(RandomMatch);
end;
procedure WonOrLost;
var
Won, Lose, x, y: integer;
begin
Won:= BitmapFromString(45, 14, 'meJxTViYANmzY8P//fwaiwefPnz' +
'U0NPCbmZeXh2YmfvWqqqovX74k3g00ckZcXBxJQUEjZ0yfPv0/GAy' +
'sMy5evDjgoeHm5kZqUNDCGfX19aS6gRbO2LFjx4A7Q09P7+PHj6S6' +
'gerOSE9PJyMoyHaGFQ6wYMECsp2By0w4wHTGf9yADDcgG4jfcLLNH' +
'wkAAN3UJ64=');
Lose:= BitmapFromString(40, 15, 'meJzF1C8KhTAcwPHd5RWTCAZh6X' +
'kCdwOzYBMsnkGrYBE8yZrRYDNtQZvJA8wfT56If3CTx943z302p0N' +
'ILSFEkiQvubIsg/GKwqXbtq2kC+V5/hNafIrjWJ4Ow7Dv+50uJDrS' +
'XddZliVPu65bFMU0Tesk77vgNE93XVWVvLuEMU7TlFIKC7gdDO7pl' +
'iF4gar0kmmaz9yFHobB87xn9GN3e1J/ceu6dhxHvwvBH00I0e/CgH' +
'EcgyDQ7KLvF16WpW3bOt2VZoxFUaTTRZvbr2kaeNAwjKtp8V1K7m4' +
'NnHO4Hn3fP7ozQMVcrA==');
if FindBitmap(Won, x, y) then
begin
Inc(NumWin)
Where:= 'OK';
end;
if FindBitmap(Lose, x, y) then
begin
Inc(NumLose)
Where:= 'OK';
end;
FreeBitmap(Won);
FreeBitmap(Lose);
end;
procedure ClickOk;
var
OK, x, y: Integer;
begin
OK:= BitmapFromString(12, 12, 'meJzNjjEKhDAQRQ8zVRCCIEjATl' +
'vB0tpCq3iBgOQEYuMxksLDCFaWprMRtJLssEHJ3mBf9TN5/BlCCAC' +
'0bXuep1IKsxDiOA5KKQZr7TiO8CClvK4rSRLnOGEYBvDI8xyHdV3j' +
'L3Zi7vsefkHnvu+maVzPsizbtjHGfKfrOn9XmqbGmHVdoygi35s55' +
'9ivtfZvzrJs3/d5nu3DNE3Ofx3MRVFgLsuyqqo4jt+lQRD4zzAM4c' +
'/4AGCkl58=');
if FindBitmap(OK, x, y) then
begin
Mouse(x, y, 0, 0, True);
Where:= 'Start';
Proggy;
Wait(3000);
end;
FreeBitmap(OK);
end;
begin
SetupSRL;
Setup;
repeat
case Where of
'Start': StartGame;
'In Game': WonOrLost;
'OK': ClickOk;
end;
until(False);
end.
~shut
All my scripts are held on Googlecode git, so if you ever see a problem, fork it and send me a pull request
If a script is grey, it doesn't work, if it's colour then it does!
My Tutorials:-
Everything you need to know about setting up Simba, SRL and Reflection!, How to sort out the MSVCR71.dll error
How to set up players for autoing with Simba, SRL/Simba Standards (with examples), Defines
Auto Updater and Git, Using a testing branch for git, Adding SRL Stats to your script
Creating your own font set for Simba, Guide to Cups, How to make 1.45M (RSGP) a day (not really my tut)
Download a image and set it as your Desktop Wallpaper in C#, How to make your first PHP file uploader
<Coh3n> Shuttleu, fuck I love you right now
NiceNow make it use the special powers and it'll be perfect!
All my scripts are held on Googlecode git, so if you ever see a problem, fork it and send me a pull request
If a script is grey, it doesn't work, if it's colour then it does!
My Tutorials:-
Everything you need to know about setting up Simba, SRL and Reflection!, How to sort out the MSVCR71.dll error
How to set up players for autoing with Simba, SRL/Simba Standards (with examples), Defines
Auto Updater and Git, Using a testing branch for git, Adding SRL Stats to your script
Creating your own font set for Simba, Guide to Cups, How to make 1.45M (RSGP) a day (not really my tut)
Download a image and set it as your Desktop Wallpaper in C#, How to make your first PHP file uploader
<Coh3n> Shuttleu, fuck I love you right now
lol...
Shut post 1 = 'found a sweet game!!'
Shut post 2 = 'found how to cheat at sweet game!!'
=[, it won't load for me.. Just gives me a blank page... suggestions please?
Last edited by anonymity; 12-07-2010 at 08:21 PM.
On vacation in NeverLand,
Code:typedef int bool; enum { false, true };
Progress Report:*************************************** Running For: 9:40:15 *************************************** Won 337 times Lost 379 times ***************************************
just a small one, it was still running well, but i stopped it because, i had to do something
~shut
All my scripts are held on Googlecode git, so if you ever see a problem, fork it and send me a pull request
If a script is grey, it doesn't work, if it's colour then it does!
My Tutorials:-
Everything you need to know about setting up Simba, SRL and Reflection!, How to sort out the MSVCR71.dll error
How to set up players for autoing with Simba, SRL/Simba Standards (with examples), Defines
Auto Updater and Git, Using a testing branch for git, Adding SRL Stats to your script
Creating your own font set for Simba, Guide to Cups, How to make 1.45M (RSGP) a day (not really my tut)
Download a image and set it as your Desktop Wallpaper in C#, How to make your first PHP file uploader
<Coh3n> Shuttleu, fuck I love you right now
with specials
Simba Code:program new;
{$i srl/srl.scar}
var
NumLose, NumWin: Integer;
Where: string;
procedure Setup;
begin
Where:= 'Start';
end;
procedure Proggy;
var
H, M, S: Integer;
begin
ConvertTime(GetTimeRunning, H, M, S);
Writeln('***************************************');
Writeln('Running For: '+IntToStr(H)+':'+IntToStr(M)+':'+IntToStr(S));
Writeln('***************************************');
Writeln('Won '+IntToStr(NumWin)+' times');
Writeln('Lost '+IntToStr(NumLose)+' times');
Writeln('***************************************');
end;
procedure StartGame;
var
RandomMatch, x, y: Integer;
begin
RandomMatch:= BitmapFromString(31, 19, 'meJztk7mKAkEQhh9mFO/7mEBZTT' +
'URAwNH8C0UFEExMTAxFDE1ESMxEYRhAgMNTExEEUw0EU/EAwT3Z4p' +
'tBmd3MVtY/IOmq7r6q+6qbo5764/lcDg8soxG49OSRqNxu91KD8Js' +
'NhszscXlcmFiMBgI8rR9NBo9vrRarXieZ6vVavV2u4XDYTL9fv/1e' +
'l0ul3a7nTyFQmG73ZrN5mw2SwQ1vN1um0ymUCiEjd1ul5bgWa/XSN' +
'dsNhn8fD5vNptGo6GGHw6HYDD4LZzMfr8/GAxonkqlTqdTuVzGSMU' +
'heKVSwXUSiYQabrVa1XAAO50Oxvv9nk6n4dfpdJPJpNVqoYzH47FY' +
'LDI4sL1ebz6fWyyWV+DD4RDx+/0+EomQPx6P43hkIu9sNtPr9QQXB' +
'MHn8+12u1qt9gocZUEAKszKi8o/FMKNkskkgyMgk8kgOzr+ChzzXC' +
'6H+Fgshr4Aks/nP2QFAoHFYiGKohKu1WolSYJfCUfwT3BcfDqdjsf' +
'jer3OmkgqlUqXyyUajTI4hDOgHb88RQgQ+ggQPgjeOUz1d4Af2TGi' +
'18zvdDq9Xi8nv1teFvfW/9InRyXyZA==');
if FindBitmap(RandomMatch, x, y) then
begin
Mouse(x, y, 0, 0, True);
Where:= 'In Game';
end;
FreeBitmap(RandomMatch);
end;
procedure ClickSpecials;
var
Health, HealthBar, Rocket, Swing, x, y: Integer;
begin
HealthBar:= BitmapFromString(1, 263, 'meJw1wgdXTmEAAOB/8K723jsSiU' +
'hJJBKRSCTS3nuX9t2znfbW3vNrh7/lvfecnvNY/7NY038PbP7s2l5' +
't211u2F+sOZwvO54tOp3OO5/MuBxPuVrG3Y5G3Q+HPQ4GPff7vPZ6' +
'vPdUn13Jd0fw22b9t7oDNjsCNtoC11uC1pqCV+tvrNTQN5erQpbKb' +
'y2Whv4uur1QcGc+N2w+++5cZvhsxr2Z9PvTaRFTqQ8mUx5OJEeOJz' +
'0aS4waTYgeiY/+Ffd4ODZmKObJYFTsQOTTgYhn/eFxfWHPe0Pje0J' +
'e6MH0Sy0wQfV7pfgkyp6vJbc3okuS4PiWt3/H2SSzVu8ZlMKADwz4' +
'yIBUBnxiQBoDPjPgCwPSWfCVBRks+MaC7yzIZEEWC7JZkMOBXHMeB' +
'/I5WMDBQg4WcbCYhyU8LOVhGQ8reFjJwyoeVvOwRoC1AqwTYL0AGw' +
'TYKMAmATULqEVErSJqE1G7iDpE1CmiLhF1S0ZGQqyEOAnxEhIkJEp' +
'IlpAiI1VGmox1GffIuFfGfTLul/GAggcVPKTgYQWPKHhUwWMKHlfx' +
'hIonVTyl4mkVz6iEnlXJnErmNbKgkUWNLGlkWSMrGlnVyJpG1nWyo' +
'ZNNnWzpZFsnOzrZ1cl+j9W+brWvmVVro2I8kG2M0nXR1ijYHtK8nZ' +
'Gj7Q9Z4xFDOxx1m7tox6NOo6WDdrK0O1nazK3O9PFP2uW45Xoz7Xr' +
'c5HpCN9JuJw3metr9pM79lK6lPU5rzNWe9FmVudLLWOF1Vk57n5eZ' +
'S2kfY4m5mPa9KDIX+hkLzPn+l3SeOTfAmGO8yg40Zpl/BNH/AU0dRrM=');
Health:= BitmapFromString(16, 13, 'meJytkksNQyEQRcUgAQEYQAECkI' +
'APhKAAC6xRgAIM9J10UkIhlE3varg588kwSn0phFBKeX2UUlI3ee8' +
'hySJwzl15mJwzja6k1nopSAvME1xrjTHOJk/MPcUYg8/YO4+5p4h/' +
'4v/o09paKyaBDPmDR7338hbBMBde/ugkEgGWFbH5ueBQa21MuIilz' +
'ccjV7Fs8gGUlAw5');
if ((not(FindBitmap(HealthBar, x, y))) and FindBitmap(Health, x, y)) then
Mouse(x, y, 0, 0, True);
if (Random(200)<10) then
begin
Swing:= BitmapFromString(22, 14, 'meJydkKERhEAMRYs5hUZisHgUBa' +
'BOY7C0sAKPpQMaoAEUFonF7r0hc7nMAivui51s8vPzk9crRJ7nRVH' +
'YDN/jOGwmTdO6ri+tvyp8K9J1nfceZSUsyxJRABCsyDzPKDRNo+18' +
'CYK5NuOcg6Mi/sQ4jiJOzHt1ThK3urh0IYJbibdtE2UwDIMezZ5La' +
'OKWAJolCKhSQpahEGgJqjJCzUQgxwkUAMuKB0GSJHh7n2BuWZZkdP' +
'FpmnSdW9C17zun8F8Qk+n7XnUiYLSseQvr8xZZlrkTTwr4jyu0bQu' +
'H90lhXde4AveEVlXV3wrq357xSeED6niQlg==');
if FindBitmap(Swing, x, y) then
Mouse(x, y, 0, 0, True) else
begin
Rocket:= BitmapFromString(14, 15, 'meJylkVENwCAMRMUgAQEYQAECkI' +
'ACDKAABShAAXYwwC40Y4R1bMnu6114IbQIcSXnHGMUb/Hetx7n3Eb' +
'TWrcztVbUJ9Na26agPpnGmNlE/W9KKWcT9ctEm3diLaWU2US9LxYa' +
'HQ158LLY5XRh1sRXEgP2ZgiBGMCapgezK6WIAajE7AZSSnQPgBUOp' +
'E8b0g==');
if FindBitmap(Rocket, x, y) then
Mouse(x, y, 0, 0, True);
FreeBitmap(Rocket);
end;
FreeBitmap(Swing);
end;
FreeBitmap(HealthBar);
FreeBitmap(Health);
end;
procedure WonOrLost;
var
Won, Lose, x, y: integer;
begin
Won:= BitmapFromString(45, 14, 'meJxTViYANmzY8P//fwaiwefPnz' +
'U0NPCbmZeXh2YmfvWqqqovX74k3g00ckZcXBxJQUEjZ0yfPv0/GAy' +
'sMy5evDjgoeHm5kZqUNDCGfX19aS6gRbO2LFjx4A7Q09P7+PHj6S6' +
'gerOSE9PJyMoyHaGFQ6wYMECsp2By0w4wHTGf9yADDcgG4jfcLLNH' +
'wkAAN3UJ64=');
Lose:= BitmapFromString(40, 15, 'meJzF1C8KhTAcwPHd5RWTCAZh6X' +
'kCdwOzYBMsnkGrYBE8yZrRYDNtQZvJA8wfT56If3CTx943z302p0N' +
'ILSFEkiQvubIsg/GKwqXbtq2kC+V5/hNafIrjWJ4Ow7Dv+50uJDrS' +
'XddZliVPu65bFMU0Tesk77vgNE93XVWVvLuEMU7TlFIKC7gdDO7pl' +
'iF4gar0kmmaz9yFHobB87xn9GN3e1J/ceu6dhxHvwvBH00I0e/CgH' +
'EcgyDQ7KLvF16WpW3bOt2VZoxFUaTTRZvbr2kaeNAwjKtp8V1K7m4' +
'NnHO4Hn3fP7ozQMVcrA==');
if FindBitmap(Won, x, y) then
begin
Inc(NumWin)
Where:= 'OK';
end;
if FindBitmap(Lose, x, y) then
begin
Inc(NumLose)
Where:= 'OK';
end;
FreeBitmap(Won);
FreeBitmap(Lose);
ClickSpecials;
end;
procedure ClickOk;
var
OK, x, y: Integer;
begin
OK:= BitmapFromString(12, 12, 'meJzNjjEKhDAQRQ8zVRCCIEjATl' +
'vB0tpCq3iBgOQEYuMxksLDCFaWprMRtJLssEHJ3mBf9TN5/BlCCAC' +
'0bXuep1IKsxDiOA5KKQZr7TiO8CClvK4rSRLnOGEYBvDI8xyHdV3j' +
'L3Zi7vsefkHnvu+maVzPsizbtjHGfKfrOn9XmqbGmHVdoygi35s55' +
'9ivtfZvzrJs3/d5nu3DNE3Ofx3MRVFgLsuyqqo4jt+lQRD4zzAM4c' +
'/4AGCkl58=');
if FindBitmap(OK, x, y) then
begin
Mouse(x, y, 0, 0, True);
Where:= 'Start';
Proggy;
Wait(3000);
end;
FreeBitmap(OK);
end;
begin
SetupSRL;
Setup;
repeat
case Where of
'Start': StartGame;
'In Game': WonOrLost;
'OK': ClickOk;
end;
until(False);
end.
~shut
All my scripts are held on Googlecode git, so if you ever see a problem, fork it and send me a pull request
If a script is grey, it doesn't work, if it's colour then it does!
My Tutorials:-
Everything you need to know about setting up Simba, SRL and Reflection!, How to sort out the MSVCR71.dll error
How to set up players for autoing with Simba, SRL/Simba Standards (with examples), Defines
Auto Updater and Git, Using a testing branch for git, Adding SRL Stats to your script
Creating your own font set for Simba, Guide to Cups, How to make 1.45M (RSGP) a day (not really my tut)
Download a image and set it as your Desktop Wallpaper in C#, How to make your first PHP file uploader
<Coh3n> Shuttleu, fuck I love you right now
Nice script and nice site!
Is there a way to save the monster, so I can play at home too?PHP Code:***************************************
Running For: 0:18:48
***************************************
Won 20 times
Lost 4 times
***************************************
There used to be something meaningful here.
I don't know, I hope there is so I can bot play on my desktop
~shut
All my scripts are held on Googlecode git, so if you ever see a problem, fork it and send me a pull request
If a script is grey, it doesn't work, if it's colour then it does!
My Tutorials:-
Everything you need to know about setting up Simba, SRL and Reflection!, How to sort out the MSVCR71.dll error
How to set up players for autoing with Simba, SRL/Simba Standards (with examples), Defines
Auto Updater and Git, Using a testing branch for git, Adding SRL Stats to your script
Creating your own font set for Simba, Guide to Cups, How to make 1.45M (RSGP) a day (not really my tut)
Download a image and set it as your Desktop Wallpaper in C#, How to make your first PHP file uploader
<Coh3n> Shuttleu, fuck I love you right now
There are currently 1 users browsing this thread. (0 members and 1 guests)