I could probably find some classics by odie5533 and hatlesscow. /Searches hard-drive.
{=========================================================================]
[ Hoboman45 GuildMiner ]
[ version: 4.2 ]
[=========================================================================]
|update.3446
|will not get lost!!!
|auto RANDOM is now put in:)
|Update.3445
|Join The GUILD PLS
|joining the guild will get you many better macros...
|
| Description: |
| A macro that mines a full load of coal in the miner's guild, |
| and if chosen, mithril, then banks it in the east Falador bank. | |
| Instructions: |
| 1.Set the Runescape brightness to V-bright, and your computer's |
| resolution to 32bit resolution. |
| 2.Need SCAR version 2.0.3. |
| 3.Start script in the Falador eastern bank. |
| 4.Start with a pickaxe in your fist inventory slot or equiped. |
| 5.Recomended to have extra pickaxes in your first bank slot. |
| 6.Click and drag the crosshair over the Runescape client. |
Then press the green arrow. |
| 7.You may set your own colors lines 35-45 (optional). |
[=========================================================================]
[ *Be sure to open SSI2.txt for more options. ]
[ *For general SCAR help go to: ]
| [url]http://www.kaitnieks.com/files/SCARGUIDE/SCARGUIDE.htm[/url] ]
[ Thanks to, RS Cheating community ]
[ *PLEASE POST ANY BUGS/HELP IN THE FORUMS OR E-MAIL ]
[ [email]garrett_210@hotmail.com[/email] ]
[ If you like pls join my clan:) at: ]
[ [url]http://www.www.guilduniverse.com/guardians/default.aspx#news[/url] ]
[=========================================================================}
program HobomanGuildminer;
{.include SSI2.txt}
{.include BoxBreaker.txt}
const
//=//===============Colors(Leave as 0 to let script find)===============\
RockColor1= 0;//Colors of Coal rocks in main screen
RockColor2= 0;
RockColor3= 0;
MithColor1= 0;//Colors of Mith rocks in main screen
MithColor2= 0;
MithColor3= 0;
MMLadderColor= 0;//Color of the ladder in the minimap.(SS:2873)
MMPickColor= 0;//Pick symbol color (SS:207695)
MMOreColor= 0;//Mini map ore color (SS:4010803)
MMStatueColor= 0;//Mini map statue color (SS:8355977)
MMBankColor= 0;//Bank symbol color (SS:3060683)
//=\=================================================================//=\
//=\ Under the varibles you may disable the forms and setup options. //=\
//=\=================================================================//=\
var
MapPickColor,MapOreColor,StatueColor,BankColor,LadderColor,Report,Report2,
TotalOres,Banks,Mark,IAmLostCount,OreCol1,OreCol2,OreCol3,MaxWait:integer;
NoPick,NoRocks,StartScript,Look4Gas,MineMith,EquipPick,UseForm:boolean;
frmDesign,frmMore:TForm;
labPassword,labUsername,labMaxWait,labMaxWait2:TLabel;
edtUsername,edtPassword,edtMaxWait:TEdit;
bMoreOptions,bStart,bSave,bDonate:TButton;
cbLook4Gas,cbLogsOut,cbChats,cbEquipPick,cbMineMith,cbRotates,
cbScarScape:TCheckBox;
procedure Setup;
begin
//=\============================Setup================================//=\
UseForm:= true;//If you wish to use the form.
Username:= Username;//Username.
Password:= Password;//Password.
ScarScape:= ScarScape;//Set to true if you are using ScarScape.
LogsOut:= true;//If you want to log out every so often for antiban.
Chats:= true;//If you want to randomly chat for anti-ban.
Look4Gas:= true;//Set to false if you are having trouble with it constantly finding gas.
Rotates:= true;//If you want to randomly rotate the screen for anti-ban.
MaxWait:= 10;//Maximum time in seconds to wait while mining a rock.
MineMith:= false;//If you want to mine mith, set mith colors above.
EquipPick:= false;//If you can/want to equip your pick.
//=\=================================================================//=\
end;
//DO NO TOUCH BELOW
procedure ProgressReport;
var
RHours,Minutes,Seconds,RMinutes,RSeconds,avtime:LongInt;
Time:String;
begin
if(GetSystemTime-report2 > report*60000)then
begin
Seconds:=(GetSystemTime-ST) div 1000;
Minutes:=Seconds div 60;
RHours:=Minutes div 60;
Time:=IntToStr(Seconds)+' Seconds';
avtime:=Seconds/banks;
if Minutes<>0 then
begin
RSeconds:=Seconds Mod (Minutes*60);
Time:=IntToStr(Minutes)+' Minutes and '+IntToStr(RSeconds)+' Seconds';
end;
if RHours<>0 then
begin
RMinutes:=Minutes Mod (RHours*60);
RSeconds:=Seconds Mod (Minutes*60);
Time:=IntToStr(RHours)+' Hours, '+IntToStr(RMinutes)+' Minutes and '
+IntToStr(RSeconds)+' Seconds';
end;
begin
WriteLn(' ');
WriteLn('<=================Progress Report================>');
WriteLn('Worked for '+Time);
WriteLn('Banked '+IntToStr(banks)+' loads[s].');
WriteLn('Banked '+IntToStr(TotalOres)+' ore[s].');
WriteLn('Gained '+floattostr(50*TotalOres)+'xp.');
WriteLn('Currently Averaging about '+IntToStr(3600/avtime*(TotalOres/banks))+
' ores and '+floattostr(3600/avtime*(50*(TotalOres/banks)))+' xp an hour.');
WriteLn('Random Event Report:');
if(fights>0)then WriteLn(' Fought '+IntToStr(fights)+' time[s].');
if(talks>0)then WriteLn(' Talked to '+IntToStr(talks)+' Random event[s].');
if(lamps>0)then WriteLn(' Used lamps '+IntToStr(lamps)+' time[s].');
if(boxes>0)then WriteLn(' Solved '+IntToStr(boxes)+' box[es].');
if(logs>0)then WriteLn(' Logged in '+IntToStr(logs)+' time[s].');
if(foresters>0)then WriteLn(' Solved '+IntToStr(foresters)+' forester[s].');
if(frogs>0)then WriteLn(' Solved '+IntToStr(foresters)+' frog[s].');
if(doctors>0)then WriteLn(' Solved '+IntToStr(doctors)+' doctor[s].');
if(certers>0)then Writeln(' Solved '+IntToStr(certers)+' certer[s].');
WriteLn('<================================================>');
Report2:=GetSystemTime;
end;
end;
end;
//===========================Color Finding procedures=========================\
procedure SetColors;
begin
StatueColor:=MMStatueColor;
BankColor:=MMBankColor;
LadderColor:=MMLadderColor;
MapOreColor:=MMOreColor;
MapPickColor:=MMPickColor;
OreColor1:=RockColor1;
OreColor2:=RockColor2;
OreColor3:=RockColor3;
end;
function FindStatueColor:integer;
var
c,a,b:integer;
begin
while c<65 do
begin
c:=c+5;
if(FindColorSpiralTolerance(a,b,256,570,50,725,162,1))then
begin
if(FindColorSpiralTolerance(x,y,9868961,a,b-5,a+20,b+5,c))then
begin
Result:=GetColor(x,y);
Break;
end;
end;
end;
end;
function FindLadderColor:integer;
var
c,a,Color,TrueCount:integer;
begin
while c<50 do
begin
c:=c+5;
if(FindColorSpiralTolerance(x,y,256,570,50,725,162,1))then
begin
if(TrueCount=0)or(TrueCount=1)then a:=1;
if(TrueCount=2)or(TrueCount=3)then a:=-1;
repeat
if(TrueCount=0)or(TrueCount=2)then x:=x+a;
if(TrueCount=1)or(TrueCount=3)then y:=y+a;
if(TrueCount=0)and((SimilarColors(865635,GetColor(x,y),c)=true)or
(SimilarColors(6475,GetColor(x,y),c)=true))then
begin
TrueCount:=TrueCount+1;
Color:=GetColor(x,y);
Break;
end;
if(TrueCount>0)and(GetColor(x,y)=Color)then
begin
TrueCount:=TrueCount+1;
Break;
end;
until(y<5)or(x<570)or(x>725)or(y>160)
end;
if(TrueCount>=3)then
begin
Result:=Color;
Break;
end;
end;
end;
function FindMapOreColor:integer;
var
MapOre,MapOre2:integer;
begin
MapOre := BitmapFromString(3, 3,
'3D2C345948546D5D624A39416D5D626D5D625948546D5D626D5D62' +
'');
MapOre2 := BitmapFromString(3, 3,
'061115222D35364243131E22364243364243222D35364243364243' +
'');
if(FindBitmapsProgressiveTol(MapOre,MapOre2,0,0,0,65,5,587,41,705,118))then
Result:=GetColor(x+1,y+1);
Freebitmap(MapOre);
Freebitmap(MapOre2);
end;
procedure CouldNotFindColors;
begin
WriteLn('ERROR, script could not find colors, please run the script again'
+' or set your own colors.');
TerminateScript;
end;
procedure FindBottomColorsIfNeeded;
var
c:integer;
begin
if((MapOreColor=0)or(MapPickColor=0))then
begin
WriteLn('Finding bottom colors please Wait...');
MouseFindFlag(700,90,0,1);
Flag;
while(MapOreColor=0)or(MapPickColor=0)do
begin
c:=c+1;
if(MapOreColor=0)then
MapOreColor:=FindMapOreColor;;
if(MapPickColor=0)then
MapPickColor:=GetSymbolColor('mining spot');;
if(c>20)then
CouldNotFindColors;
Wait(500+Random(100));
end;
c:=0;
repeat
if(FindMMColor(MapPickColor))then
begin
Mouse(x-20,y-20,40,40,true);
Flag;
Wait(1500+Random(500));
if(FindOreColors(2702910,5,15))then
Break;
end;
if(c>20)then
CouldNotFindColors;
until(false)
WriteLn('MapPickColor:'+IntToStr(MapPickColor)+
' MapOreColor:'+IntToStr(MapOreColor));
end;
end;
procedure FindTopColorsIfNeeded;
var
c:integer;
begin
if((StatueColor=0)or(BankColor=0)or(LadderColor=0))then
begin
WriteLn('Finding top colors please Wait...');
while(StatueColor=0)or(BankColor=0)or(LadderColor=0)do
begin
c:=c+1;
if(StatueColor=0)then
StatueColor:=FindStatueColor;
if(BankColor=0)then
BankColor:=GetSymbolColor('bank');
if(LadderColor=0)then
LadderColor:=FindLadderColor;
if(c>20)then
CouldNotFindColors;
Wait(Random(50)+500);
end;
WriteLn('StatueColor:'+IntToStr(StatueColor)+
' BankColor:'+IntToStr(BankColor)+
' LadderColor:'+IntToStr(LadderColor));
end;
end;
//========================Map Walking procedures==============================\
function Underground:boolean;
begin
if((FindColoredAreaTolerance(x,y,256,570,5,725,162,50,1)))then
begin
Result:=true;
end;
end;
procedure ToCenter;
begin
if(FindColorSpiral(x,y,MapPickColor,570,63,725,160))then
begin
Mouse(x-20,y-20,40,40,true);
Flag;
Wait(1000+Random(100));
end else
begin
RoadWalk(MapOreColor,'S');
if(FindColorSpiral(x,y,MapPickColor,570,63,725,160))then
begin
Mouse(x-20,y-20,40,40,true);
Flag;
Wait(1000+Random(100));
end;
end;
end;
procedure ClimbLadder;
var
c,cc:integer;
Under:boolean;
begin
for c:=1 to 10 do
begin
if(not(Underground))then
FindObj('Climb',0,1);
if(Underground)then
FindObj('Climb',7212,21);
if(Option('Climb'))then
begin
Mouse(x,y,r,r,false);
if(UnderGround)then
Under:=true;
if(ChooseOption('Climb'))then
begin
repeat
cc:=cc+1;
if(under)and(not(UnderGround))then
Break;
if(under=false)and(UnderGround)then
Break;
Wait(Random(50)+1000);
until(cc>50)
Break;
end;
end;
end;
end;
procedure BankToGuild;
begin
if(not(UnderGround))then
begin
MouseFindFlag(690,110,1,-1);
Flag;
FindTopColorsIfNeeded;
FindMMColor(StatueColor);
Mouse(x-5,y+10,r,r,true);
Flag;
Wait(500+Random(500));
ClimbLadder;
end;
end;
procedure GuildToBank;
var
c:integer;
begin
if(UnderGround)then
begin
ToCenter;
repeat
c:=c+1
RoadWalk(MapOreColor,'W');
until(FindMMColor(LadderColor))or(c>50)
ClickMMColor(LadderColor);
Flag;
Wait(500+Random(500));
ClimbLadder;
MouseFindFlag(670,45,1,-1);
Wait(2000+Random(1000));
Flag;
FindTopColorsIfNeeded;
ToBankers(BankColor,0,-5);
end;
end;
//==========================Random Event procedures===========================\
procedure RunAway;
begin
if(UnderGround)then
begin
RoadWalk(MapOreColor,'W');
ClickMMColor(LadderColor);
Flag;
RoadWalk(MapOreColor,'E');
end else
begin
SetRun(true);
Mouse(648,35,5,5,true);
Flag;
Wait(5000+Random(2000));
Mouse(648,135,5,5,true);
Flag;
end;
end;
procedure TerminateIfLost;
begin
if(LoggedIn)then
begin
if(not(FindMMColor(BankColor)))and(not(FindMMColor(MapOreColor)))and
(not(FindMMColor(MapPickColor)))and(not(FindMMColor(StatueColor)))then
begin
IAmLostCount:=IAmLostCount+1;
if(IAmLostCount>10)then
begin
WriteLn('Lost!!!');
TerminateScript;
end;
end else
IAmLostCount:=0;
end;
end;
procedure FindRandoms;
begin
FindNormalRandoms;
AntiBan;
if(FindFight)then
RunAway;
FindDoctor;
FindBox;
if(UnderGround)then
begin
if(not(FindPick))then
NoPick:=true;
if(FindColorSpiral(x,y,OreColor,210,130,300,220))then
begin
if(Look4Gas)then
begin
if(FindGas(x,y))then
ToCenter;
end;
end;
end;
end;
//=========================Main Screen procedures=============================\
procedure Bank;
begin
if(not(Underground))and(FindColor(x,y,BankColor,608,43,688,123))then
begin
FindBox;
TotalOres:=TotalOres+(CountItemBmpTol(Ore,50));
if(NoPick=true)and(EquipPick=true)then
begin
GameTab(5);
Mouse(593,303,r,r,true);
Wait(Random(50)+1000);
GameTab(4);
end;
OpenBank;
if(BankScreen)then
begin
if(NoPick=true)then
begin
ClickAllItemsColorWait('All',65536,1000+Random(100));
Withdraw(1,1,1);
end else
begin
if(EquipPick=false)then
Deposit(2,28,2);
if(EquipPick=true)then
ClickAllItemsColorWait('All',65536,1000+Random(100));
end;
CloseWindow;
if(NoPick=true)and(EquipPick=true)then
begin
FindPickHeadColor;
ClickItemColor(hc1,true);
end;
Banks:=Banks+1;
ProgressReport;
NoPick:=false;
end;
end;
end;
procedure SetMithColors;
begin
if(MineMith=true)then
begin
if(FindMSColor(MithColor1))or(FindMSColor(MithColor2))or
(FindMSColor(MithColor3))then
begin
OreCol1:=OreColor1;
OreCol2:=OreColor2;
OreCol3:=OreColor3;
OreColor1:=MithColor1;
OreColor2:=MithColor2;
OreColor3:=MithColor1;
end;
end;
end;
procedure UnsetMithColors;
begin
if(MineMith=true)and(OreCol1>0)then
begin
OreColor1:=OreCol1;
OreColor2:=OreCol2;
OreColor3:=OreCol3;
end;
end;
procedure Mine;
var
SysTime:integer;
begin
SetMithColors;
SetRandomOreColor;
if(FindObj('Mine',OreColor,5))then
begin
if(not(FindGas(x,y)))then
begin
Mouse(x,y,r,r,true);
if(FlagPresent)then
begin
Flag;
Wait(500+Random(500));
end;
MarkTime(SysTime);
repeat
if(not(FindColorSpiral(x,y,OreColor,210,130,300,220)))then Break;
FindRandoms;
Wait(500+Random(500));
until(not(GetColor(109,430)=0)and(not(GetColor(195,426)=0)))or
(TimeFromMark(SysTime)>=MaxWait*1000)
end;
end else
NoRocks:=true;
UnsetMithColors;
end;
//===========================================Form=============================\
procedure ShowFormModal;
begin
frmDesign.ShowModal;
end;
procedure ShowMoreModal;
begin
frmMore.ShowModal;
end;
procedure SafeShowForm;
var
v: TVariantArray;
begin
setarraylength(V, 0);
ThreadSafeCall('InitForm', v);
setarraylength(V, 0);
ThreadSafeCall('ShowFormModal', v);
end;
procedure SafeMore;
var
v: TVariantArray;
begin
setarraylength(V, 0);
ThreadSafeCall('InitMore', v);
end;
procedure Start(sender: TObject);
begin
frmDesign.Caption:= frmDesign.Caption + '.';
frmDesign.ModalResult:= mrOk;
StartScript:=true;
end;
procedure More(sender: TObject);
var
v: TVariantArray;
begin
SafeMore;
setarraylength(V, 0);
ThreadSafeCall('ShowMoreModal', v);
end;
procedure SaveOptions;
begin
Look4Gas:=cbLook4Gas.State;
LogsOut:=cbLogsOut.State;
Chats:=cbChats.State;
MaxWait:=strtoint(edtMaxWait.Text);
MineMith:=cbMineMith.State;
EquipPick:=cbEquipPick.State;
ScarScape:=cbScarScape.State;
Username:= edtUsername.Text;
Password:= edtPassword.Text;
if(Username='')or(Password='')then
begin
Username:='No Username';
Password:='No Password';
end;
end;
procedure Save(sender: TObject);
begin
frmMore.Caption:= frmMore.Caption + '.';
frmMore.ModalResult:= mrOk;
SaveOptions;
end;
procedure Donate(sender: TObject);
begin
OpenWebPage('http://www.guilduniverse.com/guardians/default.aspx#news');
end;
procedure InitForm;
begin
frmDesign := CreateForm;
frmDesign.Left := 359;
frmDesign.Top := 225;
frmDesign.Width := 258;
frmDesign.Height := 169;
frmDesign.Caption := 'HoBoMaN45 GuIlDMiNeR';
frmDesign.Color := clWhite;
frmDesign.Font.Color := clWindowText;
frmDesign.Font.Height := -11;
frmDesign.Font.Name := 'Comic Sans MS';
frmDesign.Font.Style := [];
frmDesign.Visible := False;
frmDesign.PixelsPerInch := 96;
labPassword := TLabel.Create(frmDesign);
labPassword.Parent := frmDesign;
labPassword.Left := 96;
labPassword.Top := 44;
labPassword.Width := 46;
labPassword.Height := 13;
labPassword.Caption := 'PaSsWoRd';
labUsername := TLabel.Create(frmDesign);
labUsername.Parent := frmDesign;
labUsername.Left := 96;
labUsername.Top := 6;
labUsername.Width := 48;
labUsername.Height := 13;
labUsername.Caption := 'UsErNaMe';
edtUsername := TEdit.Create(frmDesign);
edtUsername.Parent := frmDesign;
edtUsername.Left := 64;
edtUsername.Top := 20;
edtUsername.Width := 121;
edtUsername.Height := 21;
edtUsername.TabOrder := 1;
edtUsername.Text := Username;
edtPassword := TEdit.Create(frmDesign);
edtPassword.Parent := frmDesign;
edtPassword.Left := 64;
edtPassword.Top := 58;
edtPassword.Width := 121;
edtPassword.Height := 21;
edtPassword.PasswordChar := '*';
edtPassword.Text := Password;
bMoreOptions := TButton.Create(frmDesign);
bMoreOptions.Parent := frmDesign;
bMoreOptions.Left := 178;
bMoreOptions.Top := 116;
bMoreOptions.Width := 70;
bMoreOptions.Height := 17;
bMoreOptions.Caption := 'MoRe OpTiOnS';
bMoreOptions.OnClick:= @More;
cbScarScape := TCheckBox.Create(frmMore);
cbScarScape.Parent := frmDesign;
cbScarScape.Left := 88;
cbScarScape.Top := 116;
cbScarScape.Width := 80;
cbScarScape.Height := 17;
cbScarScape.Hint :=
'Check if you are using ScarScape.';
cbScarScape.ShowHint := True;
cbScarScape.Caption := 'ScarScape?';
if(ScarScape)then
begin
cbScarScape.Checked := True;
cbScarScape.State := cbChecked;
end;
bStart := TButton.Create(frmDesign);
bStart.Parent := frmDesign;
bStart.Left := 87;
bStart.Top := 86;
bStart.Width := 75;
bStart.Height := 25;
bStart.Caption := 'StArT';
bStart.TabOrder := 5;
bStart.OnClick:= @Start;
bDonate := TButton.Create(frmDesign);
bDonate.Parent := frmDesign;
bDonate.Left := 1;
bDonate.Top := 109;
bDonate.Width := 75;
bDonate.Height := 25;
bDonate.Caption := 'JoIn ClaN';
bDonate.TabOrder := 13;
bDonate.OnClick:= @Donate;
end;
procedure InitMore;
begin
frmMore := CreateForm;
frmMore.Left := 288;
frmMore.Top := 161;
frmMore.Width := 294;
frmMore.Height := 148;
frmMore.Caption := 'More Options';
frmMore.Color := clWhite;
frmMore.Font.Color := clWindowText;
frmMore.Font.Height := -11;
frmMore.Font.Name := 'MS Sans Serif';
frmMore.Font.Style := [];
frmMore.Visible := False;
frmMore.PixelsPerInch := 96;
labMaxWait := TLabel.Create(frmMore);
labMaxWait.Parent := frmMore;
labMaxWait.Left := 5;
labMaxWait.Top := 7;
labMaxWait.Width := 196;
labMaxWait.Height := 13;
labMaxWait.Caption := 'Maximum time to wait while mining a rock:';
labMaxWait2 := TLabel.Create(frmMore);
labMaxWait2.Parent := frmMore;
labMaxWait2.Left := 243;
labMaxWait2.Top := 10;
labMaxWait2.Width := 40;
labMaxWait2.Height := 13;
labMaxWait2.Caption := 'seconds';
cbLook4Gas := TCheckBox.Create(frmMore);
cbLook4Gas.Parent := frmMore;
cbLook4Gas.Left := 5;
cbLook4Gas.Top := 56;
cbLook4Gas.Width := 86;
cbLook4Gas.Height := 13;
cbLook4Gas.Hint :=
'Uncheck if you have trouble with the script stopping for gas too' +
' often.';
cbLook4Gas.Caption := 'Look for gas?';
cbLook4Gas.ParentShowHint := False;
cbLook4Gas.ShowHint := True;
cbLook4Gas.TabOrder := 8;
if(Look4Gas)then
begin
cbLook4Gas.Checked := True;
cbLook4Gas.State := cbChecked;
end;
edtMaxWait := TEdit.Create(frmMore);
edtMaxWait.Parent := frmMore;
edtMaxWait.Left := 204;
edtMaxWait.Top := 5;
edtMaxWait.Width := 38;
edtMaxWait.Height := 21;
edtMaxWait.MaxLength := 3;
edtMaxWait.TabOrder := 9;
edtMaxWait.Text := inttostr(MaxWait);
cbLogsOut := TCheckBox.Create(frmMore);
cbLogsOut.Parent := frmMore;
cbLogsOut.Left := 5;
cbLogsOut.Top := 22;
cbLogsOut.Width := 66;
cbLogsOut.Height := 17;
cbLogsOut.Hint := 'If you want to log out about every 3 hours for anti-ban.';
cbLogsOut.Caption := 'Logs out?';
cbLogsOut.ParentShowHint := False;
cbLogsOut.ShowHint := True;
cbLogsOut.TabOrder := 10;
if(LogsOut)then
begin
cbLogsOut.Checked := True;
cbLogsOut.State := cbChecked;
end;
cbChats := TCheckBox.Create(frmMore);
cbChats.Parent := frmMore;
cbChats.Left := 5;
cbChats.Top := 38;
cbChats.Width := 54;
cbChats.Height := 17;
cbChats.Hint :=
'If you want to chat random prashes every so often for anti-ban.';
cbChats.Caption := 'Chats?';
cbChats.ParentShowHint := False;
cbChats.ShowHint := True;
cbChats.TabOrder := 11;
if(Chats)then
begin
cbChats.Checked := True;
cbChats.State := cbChecked;
end;
cbRotates := TCheckBox.Create(frmMore);
cbRotates.Parent := frmMore;
cbRotates.Left := 78;
cbRotates.Top := 22;
cbRotates.Width := 97;
cbRotates.Height := 17;
cbRotates.Hint :=
'If you want to randomly rotate the camera every so often for ant' +
'i-ban.';
cbRotates.ShowHint := True;
cbRotates.Caption := 'Rotates?';
cbRotates.TabOrder := 15;
if(Rotates)then
begin
cbRotates.Checked := True;
cbRotates.State := cbChecked;
end;
cbMineMith := TCheckBox.Create(frmMore);
cbMineMith.Parent := frmMore;
cbMineMith.Left := 5;
cbMineMith.Top := 70;
cbMineMith.Width := 202;
cbMineMith.Height := 17;
cbMineMith.Hint :=
'If minning mith along with coal (need to set mith colors in script).';
cbMineMith.HelpContext := -1;
cbMineMith.Caption := 'Mine mith? (must set colors lines 38-40)';
cbMineMith.ParentShowHint := False;
cbMineMith.ShowHint := True;
cbMineMith.TabOrder := 13;
if(MineMith)then
begin
cbMineMith.Checked := True;
cbMineMith.State := cbChecked;
end;
cbEquipPick := TCheckBox.Create(frmMore);
cbEquipPick.Parent := frmMore;
cbEquipPick.Left := 5;
cbEquipPick.Top := 87;
cbEquipPick.Width := 97;
cbEquipPick.Height := 17;
cbEquipPick.Caption := 'Equip pick?';
cbEquipPick.Hint :='Check if you are able and want to equip your pick.';
cbEquipPick.ShowHint := True;
cbEquipPick.TabOrder := 14;
if(EquipPick)then
begin
cbEquipPick.Checked := True;
cbEquipPick.State := cbChecked;
end;
bSave := TButton.Create(frmMore);
bSave.Parent := frmMore;
bSave.Left := 227;
bSave.Top := 97;
bSave.Width := 57;
bSave.Height := 15;
bSave.Caption := 'Save';
bSave.TabOrder := 12;
bSave.OnClick:= @Save;
end;
procedure StartForm;
begin
if(UseForm)then
begin
SafeMore;
SafeShowForm;
if(StartScript=false)then
TerminateScript;
SaveOptions;
ActivateClient;
Wait(1000+random(500));
end;
end;
//======================================Main Line=============================\
begin
SetupSSI;
Setup;
StartForm;
SetColors;
PrepClient;
if(FindPickHeadColor)then
begin
repeat
FindRandoms;
SetRun(true);
BankToGuild;
if(Underground)then
begin
FindBottomColorsIfNeeded;
if(not(FindMMColor(LadderColor)))then
RoadWalk(MapOreColor,'E');
MarkTime(Mark);
repeat
FindRandoms;
Mine;
if(NoRocks=true)then
begin
ToCenter;
NoRocks:=false;
end;
until(InventoryFull)or(NoPick=true)or(TimeFromMark(Mark)>1800000)
end;
SetRun(false);
GuildToBank;
TerminateIfLost;
Bank;
until(false)
end;
end.
LOL @ This:
{.Script Info:
# ScriptName = freddy1990's login
# Author = freddy1990
# Description = Login script.
# Version = 3.0
# Date = 07/15/2005
# Comments = Have fun. =)
/Script Info}
program login;
// Freddy1990's auto-login v3.0 //
{v1.0 - First release (it had a problem, it was to detectable)}
{v2.0 - Added cheking for text, random clicking and random wait}
{v3.0 - It now works for ScarScape to, also added better procedures}
{.include squig.txt}
var
x, y : integer;
client : string;
const
// Setup //
username=''; // Fill in username here //
password=''; // Fill in password here //
///////////
function ScarScape:boolean;
begin;
if IsTextAt2(236,241,'ScarScape',100)=true then
begin;
result:=true;
end;
end;
procedure NormalLogin;
begin;
if ScarScape=false then
begin;
if IsTextAt2(309,241,'Welcome',100)=true then
begin;
MouseC(393+random(136),275+random(33),1);
end;
if IsTextAt2(271,214,'Enter',100)=true then
begin;
MouseC(294+random(246),253+random(5),1);
SendKeysHuman(username);
Wait(200+random(300));
MouseC(296+random(241),268+random(5),1);
SendKeysHuman(password);
Wait(200+random(300))
MouseC(231+random(142),303+random(35),1);
client:='a normal client';
end;
end;
end;
procedure ScarScapeLogin;
begin;
if ScarScape=true then
begin;
if IsTextAt2(236,241,'ScarScape',100)=true then
begin;
MouseC(393+random(136),275+random(33),1);
end;
if (IsTextAt2(271,214,'Enter',100)=true)then
begin;
MouseC(294+random(246),253+random(5),1);
SendKeysHuman(username);
Wait(200+random(300));
MouseC(296+random(241),268+random(5),1);
SendKeysHuman(password);
Wait(200+random(300))
MouseC(231+random(142),303+random(35),1);
client:='ScarScape';
end;
end;
end;
procedure CloseWindow;
begin;
repeat
Wait(100);
until ((GetColor(385,216))=65535)=false
repeat
Wait(100);
until ((GetColor(84,258))=0)=false
MouseC(427+random(65),63+random(3),1);
end;
begin
Loadchars('');
NormalLogin;
ScarScapeLogin;
CloseWindow;
WriteLn('You are now logged in with ' + client + '.');
WriteLn('Thank you for using Freddy1990''s login script');
end.
Odie greatness
{+++++++++++++++++++++++++++++++++++++++++]
AutoFighter
v1.6311
by: odie5533
[+++++++++++++++++++++++++++++++++++++++++]
Instructions:
1.Setup lines 54-69
2.Vbright, 32 bit color
3.Highest angle of view
4.Scar 1.13
5.Requires OSi v3.4
6.To use Eat function, have a piece of
the kind of food you want to eat in 1st
invin slot
7.To use the Bone Burier, have a bones in
the 2nd invin slot
[+++++++++++++++++++++++++++++++++++++++++]
Special Thanks To:
x piv x, Stupid3ooo, Joolz, and Nick
Super Special Thanks to: Pups!!!
[+++++++++++++++++++++++++++++++++++++++++}
{ChangeLog:
v1.0 - Initial release
v1.01 - Updated wait timing
v1.1 - Added Login Procedure, fixed Progress Report, and MapFlag waiting
v1.2 - Added Bone Collector, fixed wait times, Progress Report more accurate
v1.21 - Login faster, fixed fightmode changing, bone burying faster
v1.22 - Fixed login procedure
v1.5 - Added anti-randoms, and added eating fucntion
v1.6 - Fixed anti-randoms, updated various things
v1.61 - poop
v1.62 - I dno anymore
v1.63 - Fixed the anti-randoms
v1.631 - Fixed talk procedure and added SetFightMode after login
v1.6311 - Works with current OSi}
program AutoFighter;
var ax,ay,report,report2,FightMode:Integer;
BonesCollected,BonesBuried,Killed,Timeout,Ate,LastBuried,Runs,RandomCount,Lamps:Integer; {Counters}
BoneColor,BoneInvColor,color1,color2,mcolor,tol,FoodInvColor:Integer; {Colors}
TakeBones,TakeBonesY,AttackIt,AttackIt2,TalkW,TalkY,iLamp:integer; {Bitmaps}
RWX,RWY,CriticalHP:integer; //Misc
BoneCollecting,Att,Run,CHP,EatFood,Attacking:boolean;
STT,LastFight,LFTimeout,TT:LongInt;
username,password,RunWhere:string;
{.include OSi.txt}
{.include BoxBreaker.txt}
Procedure Setup;
begin
//+++++++++++++++Setup+++++++++++++++
Username:='zezima'; //Set Username
Password:='iautoallthetimesofuckmeassstyle'; //Set Password
color1:=8957142; //Monster Color 1
color2:=8957142; //Monster Color 2
tol:=0; //Tolerance to find the monster color. 0 is default
FightMode:=1; //Set fight mode 1-4 top to bottom
EatFood:=false; //True to eat food, false to not
FoodInvColor:=1535696; //Set the color of the food in your invin
CriticalHP:=5; //Percent of HP left when you should run
RunWhere:='S'; //Set Which way to run if fight random occurs
Timeout:=120; //The maximum time (in seconds) a fight should last (will run if lasts longer)
LFTimeout:=8; //The maximum time (in min) between fights
BoneCollecting:=false; //Set True to collect bones, Fasle to not
BoneColor:=13750743; //Set BoneColor on Screen
Report:=1; //Set how often to print progress report (in minutes)
end; //End of Setup
//+++++++++++++++Anti-Randoms+++++++++++++++
procedure LoginIfNeeded;//A stupid3ooo procedure based of many others
var counter:integer;
begin
if(length(username) > 0)and(length(password) > 0)then
begin
if(IsTextAt2(293,251,'Username',0))and(NotLogedIn)then
Mouse(460,322,10,2,true);
if(IsTextAt2(309,241,'Welcome to RuneScape',0))and(NotLogedIn)then
begin
Mouse(400,280,125,20,true);
if(IsTextAt2(271,214,'Enter your username',50))then
begin
Mouse(400,256,20,5,true);
SendKeysSilentsmooth(username,50);
Mouse(400,270,20,5,true);
SendKeysSilentsmooth(password,50);
Mouse(300,322,20,5,true);
repeat
counter:=counter+1;
wait(100);
until(FindColor(x,y,8421504,0,0,515,338))or(counter=60)
end;
end;
if(FindColor(x,y,8421504,400,0,515,338))then
begin
Mouse(x+5,y+1,15,5,true);
sendarrowsilentwait(0,900+random(200))
wait(200+random(100));
SetFightMode(FightMode);
end;
end;
end;
Procedure Eat;
var c:integer;
begin
Writeln('You have low hp, now running...')
SetRun(true);
Mouse(648+RWX,83+RWY,2,2,true);
wait(2000);
MapFlag;
wait(1000+random(500));
OpenBag;
if(EatFood)and(FindColorSpiral(x,y,FoodInvColor,560,210,730,460))then
repeat
OpenBag;
if(FindColorSpiral(x,y,FoodInvColor,560,210,730,460))then
begin
Mouse(x,y,3,3,true);
wait(3000+random(500));
Ate:=Ate+1;
end;
c:=c+1;
until(GetHp>80)or(c>5)
OpenBag;
if(not(FindColorSpiral(x,y,FoodInvColor,560,210,730,460)))and(GetHp<80)then
LogOut('Low HP and unable to eat');
Status('Walking back to NPCs');
Mouse(648-RWX,83-RWY,2,2,true);
wait(2000);
MapFlag;
CHP:=false;
end;
Procedure RunAway;
begin
Status('Running Away...')
runs:=runs+1;
GetScreenshot('Ran',runs);
SetRun(true);
Mouse(648+RWX,83+RWY,2,2,true);
wait(2000);
MapFlag;
wait(10000+random(3000));
Status('Running Back...')
Mouse(648-RWX,83-RWY,2,2,true);
wait(2000);
MapFlag;
Run:=false;
end;
procedure FindText;
var counter,c:integer; Talked2Rand:boolean;
begin
if(FindColor(x,y,65535,5,5,514,337))then wait(200)
if(FindColor(x,y,65535,5,5,514,337))and(LogedIn)then
begin
RandomCount:=RandomCount+1;
GetScreenShot('YellowtextFound',RandomCount);
repeat
counter:=counter+2+random(1);
if((x+counter) < 515)and((y+18) < 338)then
MoveMouseSmoothEx(x+counter,y+15+random(3),1,6,15,20,20);
wait(5);
if(IsTextAt2(9,9,'Ta',100))then
begin
GetMousePos(x,y);
Mouse(x,y,0,0,false);
Wait(200+random(100));
if(FindBitmap(TalkW,x,y))or(FindBitmap(TalkY,x,y))then
begin
Mouse(x,y,40,5,true);
MapFlag;
wait(1000+random(1000));
while((FindColor(x,y,16711680,5,345,510,465))or //Replaces TalkToRand
(FindColor(x,y,16777215,5,345,510,465)))and
(not(GetColor(20,434)=0))and(c<=10)do
begin
GetScreenShot('Talked',RandomCount);
Mouse(x,y,50,2,true);
wait(2000+random(1000));
c:=c+1;
end;
Talked2Rand:=true;
end;
end;
until(counter>=250)or(Talked2Rand);
end;
end;
Procedure FindLamp;
begin
while(FindBitmapSpiralTolerance(iLamp,x,y,550,200,745,470,100)) do
begin
Lamps:=Lamps+1;
GetScreenshot('Lamp',Lamps);
Mouse(x,y,10,10,true);
wait(3000+random(1000));
Mouse(157,220,12,12,true)
wait(3000+random(1000));
Mouse(248,255,10,2,true);
wait(3000+random(1000));
Mouse(226,442,10,3,true);
wait(3000+random(1000));
end;
end;
procedure FindMiscRandoms;
var ax,ay:integer;
begin
if(FindColor(ax,ay,786423,10,350,150,433))then
begin
GetScreenshot('Mod',1);
LogOut('UHOH, A MOD!!!');
end;
if(GetColor(30,418)=0)and(GetColor(72,429)=0)then
begin
GetScreenshot('Dead',1);
LogOut('You are dead!');
end;
if(FindColor(ax,ay,11503238,10,350,479,433))then
begin
GetScreenshot('Mime',1);
LogOut('Mime Found');
end;
end;
Procedure FindRandoms;
begin
LoginIfNeeded;
FindText;
FindBox;
FindMiscRandoms;
end;
Procedure ProgressReport;
var
RHours,Minutes,Seconds,RMinutes,RSeconds:LongInt;
Time:String;
begin
if(GetSystemTime-report2 > report*60000)then
begin
Seconds:=(GetSystemTime-ST) div 1000;
Minutes:=Seconds div 60;
RHours:=Minutes div 60;
Time:=inttostr(Seconds)+' Seconds';
if Minutes<>0 then
begin
RSeconds:=Seconds Mod (Minutes*60);
Time:=inttostr(Minutes)+' Minutes and '+inttostr(RSeconds)+' Seconds';
end;
if RHours<>0 then
begin
RMinutes:=Minutes Mod (RHours*60);
RSeconds:=Seconds Mod (Minutes*60);
Time:=inttostr(RHours)+' Hours, '+inttostr(RMinutes)+' Minutes and '+inttostr(RSeconds)+' Seconds';
end;
begin
writeln(' ');
writeln('<=================Progress Report================>');
writeln('Worked for '+Time);
writeln('Fought '+inttostr(Killed)+' time[s]');
if(EatFood)then
writeln('Ate '+inttostr(ate)+' pieces of food')
if(bonecollecting)then
writeln('Collected '+inttostr(BonesCollected)+', and buried '+inttostr(BonesBuried)+' bones');
writeln('Handled: '+inttostr(RandomCount)+' Randoms, and ran from '+inttostr(runs)+' random events');
writeln('<================================================>');
Report2:=GetSystemTime;
end;
end;
end;
Procedure GetBoneInvColor;
begin
Status('Getting boneinvcolor...');
OpenBag;
MMouse(620,220,10,10);
Wait(500+random(200));
If(IsTextAt2(9,9,'Bury',100))then
begin
BoneInvColor := GetColor(625,230);
Status('BoneInvinColor is '+inttostr(BoneInvColor));
end else
begin
BoneCollecting := false;
Writeln('');
Writeln('No bone in second inv slot!');
Writeln('');
end;
end;
Procedure BoneBurier;
begin
OpenBag;
Wait(200+random(100));
Status('Burying bones...');
If(FindColorSpiral(x,y,(BoneInvColor),555,216,740,465))then
repeat
LastBuried:=0;
Mouse(x,y,10,10,true);
Wait(1500+random(300));
BonesBuried:=BonesBuried+1;
until(not(FindColorSpiral(x,y,(BoneInvColor),555,216,740,465)));
end;
Procedure BoneCollector;
begin
Wait(200+random(100));
Status('Collecting bones...');
x:=262;
y:=174;
If(FindColorSpiral(x,y,(BoneColor),5,5,515,337))then
begin
Mouse(x,y,5,5,false);
wait(50+random(25));
If(FindBitmapIn(TakeBones,x,y,5,5,515,337))then
begin
Mouse(x,y,0,0,true);
Wait(15+random(5));
BonesCollected:=BonesCollected+1;
LastBuried:=LastBuried+1;
MapFlag;
wait(500+random(100));
end;
If(FindBitmapIn(TakeBonesY,x,y,5,5,515,337))then
begin
Mouse(x,y,0,0,true);
Wait(15+random(5));
BonesCollected:=BonesCollected+1;
LastBuried:=LastBuried+1;
MapFlag;
wait(500+random(100));
end;
end;
end;
Procedure Attack;
var c:integer;
begin
mcolor:=random(2);
case mcolor of
0:mcolor:=color1;
1:mcolor:=color2;
end;
x:=25+random(200);
y:=25+random(200);
if(FindColorSpiralTolerance(x,y,mcolor,5,5,514,337,tol))then
begin
status('Attacking...');
MoveMouseSmooth(x,y);
GetMousePos(ax,ay);
if(not FindColor(ax,ay,65280,ax-15,ay-30,ax+10,ay+15))and
(not(FindColor(ax,ay,65280,240,125,270,180)))then
begin
Mouse(ax,ay,1,1,false);
wait(150+random(50));
if(FindBitmapIn(AttackIt,x,y,10,12,516,342))or
(FindBitmapIn(AttackIt2,x,y,10,12,516,342))then
begin
Attacking:=true;
wait(50+random(25));
Mouse(x,y,5,3,true);
for c:=0 to 3 do
if(not (FindColorSpiral(ax,ay,65280,240,125,270,180)))then
begin
MapFlag;
wait(300+random(100));
FindRandoms;
end;
end else
MMouse(5,5,60,60);
end;
end;
end;
Procedure WaitWhileAttacking;
var c:integer;
begin
if(FindColorSpiral(ax,ay,65280,240,125,270,180))then
begin
if(Attacking)then
begin
Killed:=Killed+1;
Attacking:=false;
end;
STT:=GetSystemTime;
repeat
TT:=(GetSystemTime-STT)/1000;
status('Fighting monster for '+inttostr(TT)+' second(s)')
wait(300);
if(TT>Timeout)then
Run:=true;
if(c>3)then
begin
FindRandoms;
if(GetHp<CriticalHP)then
CHP:=true;
c:=0;
end;
c:=c+1;
until(not (FindColorSpiral(ax,ay,65280,240,125,270,180)))or(Run)or(CHP)
if(Run)then
begin
Status('Fight lasted too long')
RunAway;
end;
if(CHP)then
Eat;
LastFight:=GetSystemTime;
If(BoneCollecting)then
BoneCollector;
end;
end;
Procedure LoadBmps;
begin
TakeBones := BitmapFromString(70, 1,
'FFFFFFFFFFFF0000005D54475D54475D5447FFFFFFFFFFFFFFFFFF' +
'FFFFFF5D54475D54475D5447FFFFFFFFFFFF000000FFFFFFFFFFFF' +
'5D54475D54475D5447FFFFFFFFFFFFFFFFFFFFFFFF5D54475D5447' +
'5D54475D54475D54475D54475D5447FF9040FF9040FF9040FF9040' +
'FF90400000000000005D54475D5447FF9040FF9040FF9040FF9040' +
'5D54475D54475D5447FF9040FF9040FF9040FF9040FF90405D5447' +
'5D54475D54475D5447FF9040FF9040FF9040FF90405D54475D5447' +
'5D54475D5447FF9040FF9040FF9040FF9040FF9040');
TakeBonesY := BitmapFromString(70, 1,
'FFFF00FFFF000000005D54475D54475D5447FFFF00FFFF00FFFF00' +
'FFFF005D54475D54475D5447FFFF00FFFF00000000FFFF00FFFF00' +
'5D54475D54475D5447FFFF00FFFF00FFFF00FFFF005D54475D5447' +
'5D54475D54475D54475D54475D5447FF9040FF9040FF9040FF9040' +
'FF90400000000000005D54475D5447FF9040FF9040FF9040FF9040' +
'5D54475D54475D5447FF9040FF9040FF9040FF9040FF90405D5447' +
'5D54475D54475D5447FF9040FF9040FF9040FF90405D54475D5447' +
'5D54475D5447FF9040FF9040FF9040FF9040FF9040');
AttackIt := BitmapFromString(10, 6,
'FFFFFF5D54475D54475D5447FFFFFFFFFFFF5D54475D54475D5447' +
'5D5447FFFFFFFFFFFF5D54475D5447FFFFFFFFFFFF0000005D5447' +
'5D54475D5447FFFFFFFFFFFF0000005D5447FFFFFFFFFFFF000000' +
'5D54475D54475D5447FFFFFFFFFFFF0000005D5447FFFFFFFFFFFF' +
'FFFFFFFFFFFF5D54475D5447FFFFFFFFFFFF0000005D5447FFFFFF' +
'FFFFFF0000000000000000005D5447FFFFFFFFFFFF0000005D5447' +
'FFFFFFFFFFFF0000005D54475D54475D5447');
AttackIt2 := BitmapFromString(21, 7,
'5D5447FFFF00FFFF000000005D54475D54475D54475D54475D5447' +
'5D54475D54475D54475D54475D54475D54475D54475D54475D5447' +
'5D54475D54475D54475D5447FFFF00FFFF00FFFF00FFFF005D5447' +
'5D54475D5447FFFF00FFFF00FFFF00FFFF005D54475D54475D5447' +
'5D5447FFFF00FFFF00FFFF00FFFF005D54475D5447FFFF00FFFF00' +
'0000000000000000005D5447FFFF00FFFF00000000000000FFFF00' +
'FFFF005D54475D5447FFFF00FFFF00000000000000000000000000' +
'5D5447FFFF00FFFF000000005D54475D54475D54475D5447FFFF00' +
'FFFF00FFFF00FFFF00FFFF000000005D5447FFFF00FFFF00000000' +
'5D54475D54475D54475D5447FFFF00FFFF000000005D54475D5447' +
'5D5447FFFF00FFFF00000000000000FFFF00FFFF000000005D5447' +
'FFFF00FFFF000000005D54475D54475D54475D5447FFFF00FFFF00' +
'0000005D54475D54475D5447FFFF00FFFF000000005D5447FFFF00' +
'FFFF000000005D5447FFFF00FFFF000000005D54475D54475D5447' +
'5D54475D5447FFFF00FFFF00FFFF005D54475D54475D5447FFFF00' +
'FFFF00FFFF00FFFF00FFFF000000005D54475D5447FFFF00FFFF00' +
'FFFF00FFFF005D5447');
TalkW := BitmapFromString(17, 10,
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000000000' +
'000000000000000000000000000000000000FFFFFFFFFFFF000000' +
'000000FFFFFFFFFFFF000000000000000000000000000000000000' +
'000000000000000000000000000000FFFFFFFFFFFF000000000000' +
'FFFFFFFFFFFF000000000000000000000000000000000000000000' +
'000000000000000000000000FFFFFFFFFFFF000000000000FFFFFF' +
'FFFFFF000000000000000000000000000000000000000000000000' +
'000000000000000000FFFFFFFFFFFF000000000000FFFFFFFFFFFF' +
'000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFF000000' +
'000000000000FFFFFFFFFFFF000000000000FFFFFFFFFFFF000000' +
'000000000000FFFFFFFFFFFF000000000000FFFFFFFFFFFF000000' +
'000000FFFFFFFFFFFF000000000000FFFFFFFFFFFF000000000000' +
'000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000' +
'FFFFFFFFFFFF000000000000FFFFFFFFFFFF000000000000000000' +
'FFFFFFFFFFFF000000000000FFFFFFFFFFFF000000000000FFFFFF' +
'FFFFFF000000000000FFFFFFFFFFFF000000000000000000FFFFFF' +
'FFFFFF000000000000FFFFFFFFFFFF000000000000FFFFFFFFFFFF' +
'000000000000FFFFFFFFFFFF000000000000000000000000FFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFFFFFFFF');
TalkY := BitmapFromString(17, 10,
'FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00000000000000000000' +
'000000000000000000000000000000000000FFFF00FFFF00000000' +
'000000FFFF00FFFF00000000000000000000000000000000000000' +
'000000000000000000000000000000FFFF00FFFF00000000000000' +
'FFFF00FFFF00000000000000000000000000000000000000000000' +
'000000000000000000000000FFFF00FFFF00000000000000FFFF00' +
'FFFF00000000000000000000000000000000000000000000000000' +
'000000000000000000FFFF00FFFF00000000000000FFFF00FFFF00' +
'000000000000000000000000FFFF00FFFF00FFFF00FFFF00000000' +
'000000000000FFFF00FFFF00000000000000FFFF00FFFF00000000' +
'000000000000FFFF00FFFF00000000000000FFFF00FFFF00000000' +
'000000FFFF00FFFF00000000000000FFFF00FFFF00000000000000' +
'000000000000FFFF00FFFF00FFFF00FFFF00FFFF00000000000000' +
'FFFF00FFFF00000000000000FFFF00FFFF00000000000000000000' +
'FFFF00FFFF00000000000000FFFF00FFFF00000000000000FFFF00' +
'FFFF00000000000000FFFF00FFFF00000000000000000000FFFF00' +
'FFFF00000000000000FFFF00FFFF00000000000000FFFF00FFFF00' +
'000000000000FFFF00FFFF00000000000000000000000000FFFF00' +
'FFFF00FFFF00FFFF00FFFF00000000000000FFFF00FFFF00');
//Lamp pic by Chriz
iLamp := BitmapFromString(17, 6,
'000001000001000001000001BAB815B2B015AEAD15ABAA159C9A12' +
'9291128C8A1275740E000001000001000001000001000001D0CE18' +
'CBC918C8C618C5C418C5C418C0BE18BAB815B5B315ABAA15A3A112' +
'99971292911284820E79780E6968095C5A09A6A415CECC18C5C418' +
'C2C118C0BE18BDBB18BAB815B8B615B5B315B2B015A8A715A3A112' +
'9C9A129594128E8D1281800E999712AEAD15CECC18CBC918C0BE18' +
'BDBB18BAB815B5B315B2B015AEAD15A8A715A3A1129F9E12999712' +
'88860E84820E8C8A129291129C9A12000001CBC918CBC918BAB815' +
'B8B615B5B315B2B015AEAD15A8A715A3A1129C9A1295941281800E' +
'79780E84820E000001000001000001CBC918CBC918C0BE18B8B615' +
'B2B015AEAD15ABAA15A6A4159F9E129997128C8A1279780E75740E' +
'000001000001C2C118');
end;
begin
clearreport;
Setup;
SetupOSi;
Report2:=ST;
LoadBmps;
LoginIfNeeded;
SetFightMode(FightMode);
OpenBag;
ChatFixer;
if(BoneCollecting)then
GetBoneInvColor;
LFTimeout:=LFTimeout*60000;
LastFight:=GetSystemTime;
case RunWhere of
'N':begin RWX:=-1; RWY:=-48; end;
'S':begin RWX:=1; RWY:=48; end;
'E':begin RWX:=-58; RWY:=-1; end;
'W':begin RWX:=58; RWY:=1; end;
end;
repeat
FindRandoms;
wait(300+random(150));
Att:=False;
Attack;
WaitWhileAttacking;
If(BoneCollecting)and(LastBuried>4)then
BoneBurier;
ProgressReport;
until(GetSystemTime-LastFight>LFTimeout);
LogOut('Loop Ended');
end.
GenoDemons uber fighter, a good pay script in it's time:
{'
'````````````````````````````````````````````````````````````````````````````````````````````````'
'``MWKn6BXH2Kn``````````MWKnKKn@hMMMM@hBXBXBXBXBXBXBXBXBXBXKnM#``````si@hXBXBXBXBXBXXBX^.````````'
'``Kn```````@h``````````MM```````MMMM````````````````````````si``````MM````````````````MM````````'
'``Kn```````Kn``````````MM```````MMMM````````````````````````sv``````@h````````````````MM````````'
'``Kn```````@h``````````MM```````MMMM````````````````````````si``````XX````````````````BN````````'
'``Kn```````@h``````````MM```````MMMM````````oxvxovoxvoxvovxosr````ds`````````Kn`````````cC'`````'
'``Kn```````@h``````````MM```````MMMM````````ox````````````````````MM`````````MM```````'`MM``````'
'``Kn```````@h``````````MM```````MMMM````````BXBXXBXBX`````````````H2`````````NV`````````MM'`````'
'``Kn```````NV``````````MM```````MMMM````````````````MM````````````XX```````vx``-=```````YU``````'
'``@h```````E%``````````MM```````M#MW````````````````MM``````````NV`````````MM``M#`````````oz````'
'``MM```````M#``````````il```````MMMM````````BXBXBBXBX```````````MM`````````H2``&$`````..``MM````'
'``BX`````````MW-`sr@h``````````MM````````vx``````````````````si`````````MMMMMM`````````BX````'
'````sv````````````````````````MM``MM````````ovxovoxvoxvoxovovx``RT````````````````````````YY````'
'````NV``````````````````````+=```MW````````````````````````siKn````````````````````````````ox``'
'``````Kn``````````````````-il````MM````````````````````````vxMM`````````sisrsvoxds`````````MM``'
'````````ij@h````````````M#````````MM````````````````````````oxsr```````YUR````````OVX```````QC``'
'````````````jiMM&BXM#MMij`````````MMKnBXBXBXBXBXBXBXBXBXBXKn&$uoBXBBXBXMM``````````EKnBKnA3@h``'
'````````````````````````````````````````````````````````````````````````````````````````````````'
''
-------
-----------
--Uber Exp Attack--
----Presents-
-----------
-------
===============================================================================
===============================================================================
Ub3rFighter 2.0
===============================================================================
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
```````````````````````````````````````````````````````````````````````````````
..............BY GenoDemoN....................................................
+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Need Help!
aIm GenoDemoN
msn [email]msnellman@cfl.rr.com[/email]
e-mail [email]GenoDemoN@gmail.com[/email] [email]msnellman@cfl.rr.com[/email]
Site Httpwww.RS2CN.com
--------------------------------
Features
---------------------
Universal Auto-Attacker
Zone In-Fight Detection
Eating
Bone Pick-up
Anti-Randoms
Forms For Easy Use
Neat Debug Window as progress Report
-----------
--------------------------------
Contents
---------------------
Ub3r Fighter 2X.text - Main script
OSi.text - 3.4 Included
BoxBreaker - Included
uf.bmp - Needed for Debug window output
-----------
--------------------------------
Setup notes
---------------------
Map face as north as possible (In general Direction)
If useing Bone Buryier get one of the bones in your 2nd inv slot
Hit start and use forms to enter in info, read the De-Bug Window For
Easier Progress Reports V-Bright!
-----------
--------------------------------
Release Verisions
---------------------
2.0 Released (12-26)
2.c Final Beta (12-22)
2.b Private Beta Test (12-12)
2.a SuprPrivate Beta (12-09)
2.p Puesdo (11-28)
-----------
===============================================================================
Current Main Script Line Count 38XX
===============================================================================
Special Thanks TO
Beta Testers, UEA, Odie, and some who i forgotten right now sorry
===============================================================================
================================3=============================================
===============================================================================
WARNING
Do Not Read Any Farther unless you want to risk corrupting the script!}
program Ub3rFighter;
var ( Cleanley Put Vars )
( Integers )
ax,ay,report,report2,FightMode,q,w,atm,CloseWindow,BonesCollected,BonesBuried,
Killed,Timeout,Ate,LastBuried,Runs,RandomCount,Lamps,uc,TakeBones,TakeBonesY,
AttackIt,AttackIt2,TalkW,TalkY,iLamp,BoneColor,BoneInvColor,tol,FoodInvColor,
cmc,mcc,ak,mcolor1,mcolor2,mcolor3,mcolor4,mcolor5,mcolor6,mcolor7,mcolor8,
mcolor9,mcolor10,mcolor11,achar,achar1,achar2,achar3,achar4,achar5,refptu,
refptd,refptr,refptl,ueapicc,uafpic,RWX,RWY,CriticalHPinteger;
( Long Int )
STT,LastFight,LFTimeout,TT,RHours,Minutes,Seconds,RMinutes,RSecondsLongInt;
( Boolean )
BoneCollecting,Att,Run,CHP,EatFood,Attacking,isenemy,fightover,zone1,zone2,
uchar1,uchar2,uchar3,uchar4,uchar5boolean;
( String )
username,password,RunWhere,mname,Time,username1,username2,username3,
username4,username5,password1,password2,password3,password4,password5string;
( Form Vars )
Timer1 TTimer;
self, form, menuform,lithform, OtherForm,bkdform TForm;
Application TApplication;
CheckBox_UN1,CheckBox_UN2,CheckBox_UN3,CheckBox_UN4,CheckBox_UN5, checkbox_sm ,
checkbox_bm TCheckBox;
Edt_HumanOpVal,Edt_Humanpxval,Edt_Fights,Edt_attacks,Edt_Uwras,Edt_color1,
Edt_color2,Edt_color3,Edt_color4,Edt_color5,Edt_color6,Edt_color7,Edt_color8,
Edt_color9,Edt_color10,Edt_color11, Edt_name, Edt_tol ,Edt_crit,Edt_runw,
Edt_UserName1,Edt_UserName2,Edt_UserName3,Edt_UserName4,Edt_UserName5,
Edt_Password1,Edt_Password2,Edt_Password3,Edt_Password4,Edt_Password5 TEdit;
( Const For Box )
const
Rate=20;
WandH=80;
bgcolor=clBlack;
( Vars For Spining Box )
var
theyextended;
x2integer;
thex,thex2extended;
newxarray[1..4]of integer;
newyarray[1..4]of integer;
image,width,height,xx,yy,z,cubecolor,scriptstate,debugpicinteger;
Canvas2TCanvas;
( Includes )
{.include OSi.txt}
{.include BoxBreaker.txt}
Procedure Background(color,bitmapinteger);
Var
CanvasTCanvas;
begin
Canvas=GetBitmapCanvas(bitmap);
Canvas.Brush.Style= bsSolid;
Canvas.Brush.Color= color;
Canvas.Pen.Color= color;
Canvas.Rectangle(0,0,wandh,wandh);
end;
Procedure Line(pxlx,pxly,pxlx2,pxly2,bitmapinteger);
Var
CanvasTCanvas;
begin
Canvas=GetBitmapCanvas(bitmap);
Canvas.Brush.Style= bsclear;
Canvas.Brush.Color= clWhite;
Canvas.Pen.Color= cubecolor;
Canvas.Pen.Width= 1;
Canvas.moveto(pxlx, pxly);
Canvas.lineto(pxlx2, pxly2);
end;
Procedure Cube(speedinteger);
begin
IF(xx=width)then
begin
Background(bgcolor,image);
they=(sqrt((widthwidth)-(xxxx))10);
yy=round(they);
newx[1]=((xx2)+width2)2+(width4);
newy[1]=(yy+height2);
newx[2]=((-xx2)+width2)2+(width4);
newy[2]=(-yy+height2);
line(newx[1], newy[1]-height8, newx[1], newy[1]+height8,image);
line(newx[2], newy[2]-height8, newx[2], newy[2]+height8,image);
they=(sqrt((widthwidth)-(x2x2))10);
yy=round(they);
newx[3]=((x22)+width2)2+(width4);
newy[3]=(yy+height2);
newx[4]=((-x22)+width2)2+(width4);
newy[4]=(-yy+height2);
line(newx[3], newy[3]-height8, newx[3], newy[3]+height8,image);
line(newx[4], newy[4]-height8, newx[4], newy[4]+height8,image);
line(newx[2], newy[2]-height8, newx[4], newy[4]-height8, image);
line(newx[1], newy[1]-height8, newx[4], newy[4]-height8, image);
line(newx[2], newy[2]-height8, newx[3], newy[3]-height8, image);
line(newx[1], newy[1]-height8, newx[3], newy[3]-height8, image);
line(newx[2], newy[2]+height8, newx[4], newy[4]+height8, image);
line(newx[1], newy[1]+height8, newx[4], newy[4]+height8, image);
line(newx[2], newy[2]+height8, newx[3], newy[3]+height8, image);
line(newx[1], newy[1]+height8, newx[3], newy[3]+height8, image);
thex=(sqrt(x2x2)pi)10;
xx=xx+1+round(thex);
thex2=(sqrt(xxxx)pi)10;
x2=x2+1+round(thex2);
if(x2=width)then
begin
xx=-width;
x2=0;
end;
copycanvas(getbitmapcanvas(image), GetDebugCanvas, width20100, height25100, width-width20100,height-height25100, 20, 22, 60, 55);
wait(speed);
freebitmap(image);
IF (scriptstate=1) then
begin
z=random(2)+1;
If (z=1) then cubecolor=clwhite; Loading State
If (z=2) then cubecolor=clblack;
end;
IF (scriptstate=2) then
begin
z=random(2)+1;
If (z=1) then cubecolor=clyellow; Monster Search
If (z=2) then cubecolor=clblack;
end;
IF (scriptstate=3) then
begin
z=random(5)+1;
If (z=1) then cubecolor=clred; Under attack state
If (z=2) then cubecolor=clred;
If (z=3) then cubecolor=clgreen;
If (z=4) then cubecolor=clgreen;
If (z=5) then cubecolor=clblack;
end;
IF (scriptstate=4) then
begin
z=random(2)+1;
If (z=1) then cubecolor=clblue; Preforming an action state
If (z=2) then cubecolor=clblack;
end;
image = BitmapFromString(width+1000, height+1000,'');
Canvas2=GetBitmapCanvas(image);
Canvas2.Brush.Style= bsClear;
Canvas2.Font.Size= 7;
Canvas2.Font.Name= 'Verdana Bold';
IF (scriptstate1) then
begin
Canvas2.Font.Color= clyellow;
Canvas2.TextOut(15,5,'Monster');
Canvas2.TextOut(15,20,'Kills');
Canvas2.TextOut(15,35,'Eat');
Canvas2.TextOut(15,50,'Buried');
Canvas2.TextOut(15,65,'Randoms');
Canvas2.TextOut(15,80,'Time Run');
Canvas2.Font.Color= clwhite;
Canvas2.TextOut(70,5,mname);
Canvas2.TextOut(70,20,inttostr(Killed));
Canvas2.TextOut(70,35,inttostr(ate));
Canvas2.TextOut(70,50,inttostr(bonesburied));
Canvas2.TextOut(70,65,inttostr(RandomCount+runs));
Canvas2.TextOut(70,80,time);
end;
Canvas2.Font.Color= clyellow;
Canvas2.TextOut(140,5,'State');
Canvas2.Font.Color= clwhite;
IF (scriptstate=1) then Canvas2.TextOut(180,5,'Loading');
IF (scriptstate=2) then
begin
Canvas2.TextOut(180,5,'Finding A');
Canvas2.TextOut(190,20,'mname');
end;
IF (scriptstate=3) then Canvas2.TextOut(180,5,'Under Attack');
IF (scriptstate=4) then Canvas2.TextOut(180,5,'Preforming a Task');
copycanvas(canvas2,GetDeBugCanvas,0,0,300,100,0,70,400,170);
end;
end;
procedure timeed;
begin
Seconds=(GetSystemTime-ST) div 1000;
Minutes=Seconds div 60;
RHours=Minutes div 60;
Time=inttostr(Seconds)+' Seconds';
if Minutes0 then
begin
RSeconds=Seconds Mod (Minutes60);
Time=inttostr(Minutes)+' Minutes and '+inttostr(RSeconds)+' Seconds';
end;
if RHours0 then
begin
RMinutes=Minutes Mod (RHours60);
RSeconds=Seconds Mod (Minutes60);
Time=inttostr(RHours)+' Hours, '+inttostr(RMinutes)+' Minutes and '+inttostr(RSeconds)+' Seconds';
end;
Cube(Rate);
end;
procedure LoginIfNeeded;A stupid3ooo procedure based of many others
var counterinteger;
begin
if(length(username) 0)and(length(password) 0)and(not LogedIn)then
begin
if(((GetColor(492,223)=65535)or(GetColor(495,230)=65535)))and(not LogedIn)then
Mouse(460+random(2),322+random(2),10,2,true);
if(GetColor(454,250)=65535)and(not LogedIn)then
begin
Mouse(400,280,125,20,true);
if(GetColor(492+random(2),223+random(2))=65535)then
begin
Mouse(400+random(2),256+random(2),20,5,true);
SendKeysSilentsmooth(username,50);
Mouse(400+random(2),270+random(2),20,5,true);
SendKeysSilentsmooth(password,50);
Mouse(300+random(2),322+random(2),20,5,true);
repeat
counter=counter+1
wait(500+random(20));
until(FindColor(x,y,8421504,0,0,515,338))or(counter=15)
if(GetColor(481,223)=65535)then
repeat
wait(3000+random(200));
until(false);
if(FindColor(x,y,8421504,400,0,515,338))then
begin
wait(700+random(300));
Mouse(x+5+random(1),y+1+random(1),15,5,true);
sendarrowsilentwait(0,900+random(200))
wait(200+random(100));
end;
end;
end;
end;
end;
procedure AddPictureuea;
var
Canvas TCanvas;
begin
Canvas= GetBitmapCanvas(ueapicc);
CopyCanvas(Canvas, MenuForm.Canvas, 0, 0, 100, 75, 165, 110, 700, 440);
Canvas= GetBitmapCanvas(uafpic);
CopyCanvas(Canvas, MenuForm.Canvas, 0, 0, 160, 25, 215, 10, 670, 85);
end;
procedure FormPaintuea(Sender TObject);
begin
AddPictureuea;
end;
Procedure Setup;
var
countinteger;
begin
count=0;
repeat
count=count+1;
username=LoadSetting('bkd',('username'+inttostr(count)));
password=LoadSetting('bkd',('password'+inttostr(count)));
achar=strtoint(LoadSetting('bkd',('achar'+inttostr(count))));
case count of
1username1=username
2username2=username
3username3=username
4username4=username
5username5=username
end;
case count of
1password1=password
2password2=password
3password3=password
4password4=password
5password5=password
end;
If (achar=1) then
case count of
1uchar1=true
2uchar2=true
3uchar3=true
4uchar4=true
5uchar5=true
end;
until(count=5);
fightmode=strtoint(loadsetting('bkd','fights'));
mname=(loadsetting('bkd','monstername'));
mcolor1=strtoint(loadsetting('bkd','mcolor1'));
mcolor2=strtoint(loadsetting('bkd','mcolor2'));
mcolor3=strtoint(loadsetting('bkd','mcolor3'));
mcolor4=strtoint(loadsetting('bkd','mcolor4'));
mcolor5=strtoint(loadsetting('bkd','mcolor5'));
mcolor6=strtoint(loadsetting('bkd','mcolor6'));
mcolor7=strtoint(loadsetting('bkd','mcolor7'));
mcolor8=strtoint(loadsetting('bkd','mcolor8'));
mcolor9=strtoint(loadsetting('bkd','mcolor9'));
mcolor10=strtoint(loadsetting('bkd','mcolor10'));
mcolor11=strtoint(loadsetting('bkd','mcolor11'));
tol=strtoint(loadsetting('bkd','tol'));
fightmode=strtoint(loadsetting('bkd','fightm'));
achar=strtoint(loadsetting('bkd','eat'));
EatFood=false;
If(achar=1) then EatFood=true;
FoodInvColor=strtoint(loadsetting('bkd','eatcolor'));
CriticalHP=strtoint(loadsetting('bkd','crithp'));
runwhere=loadsetting('bkd','runwhere');
Timeout=strtoint(loadsetting('bkd','timeout1'));
LFTimeout=strtoint(loadsetting('bkd','timeout2'));
achar=strtoint(loadsetting('bkd','bone'));
BoneCollecting=false;
If(achar=1) then BoneCollecting=true;
BoneColor=strtoint(loadsetting('bkd','bonec'));
If (tol=-1) then tol=10;
If (timeout=-1) then timeout=50;
If (lftimeout=-1) then lftimeout=2;
If (bonecolor=-1) then BoneColor=13487571;
If (criticalhp=-1) then criticalhp=12;
IF (mcolor1=-1) then mcolor1=0;
IF (mcolor2=-1) then mcolor2=0;
IF (mcolor3=-1) then mcolor3=0;
IF (mcolor4=-1) then mcolor4=0;
IF (mcolor5=-1) then mcolor5=0;
IF (mcolor6=-1) then mcolor6=0;
IF (mcolor7=-1) then mcolor7=0;
IF (mcolor8=-1) then mcolor8=0;
IF (mcolor9=-1) then mcolor9=0;
IF (mcolor10=-1) then mcolor10=0;
IF (mcolor11=-1) then mcolor11=0;
Report=1;
Screenshot=true;
atm=fightmode;
IF atm=4 then
atm=3;
atm=atm10;
end;
procedure BKDClick (sender TObject);
begin
mcolor1=strtoint(Edt_color1.text);
Savesetting('BKD','mcolor1', inttostr(mcolor1));
mcolor2=strtoint(Edt_color2.text);
Savesetting('BKD','mcolor2', inttostr(mcolor2));
mcolor3=strtoint(Edt_color3.text);
Savesetting('BKD','mcolor3', inttostr(mcolor3));
mcolor4=strtoint(Edt_color4.text);
Savesetting('BKD','mcolor4', inttostr(mcolor4));
mcolor5=strtoint(Edt_color5.text);
Savesetting('BKD','mcolor5', inttostr(mcolor5));
mcolor6=strtoint(Edt_color6.text);
Savesetting('BKD','mcolor6', inttostr(mcolor6));
mcolor7=strtoint(Edt_color7.text);
Savesetting('BKD','mcolor7', inttostr(mcolor7));
mcolor8=strtoint(Edt_color8.text);
Savesetting('BKD','mcolor8', inttostr(mcolor8));
mcolor9=strtoint(Edt_color9.text);
Savesetting('BKD','mcolor9', inttostr(mcolor9));
mcolor10=strtoint(Edt_color10.text);
Savesetting('BKD','mcolor10', inttostr(mcolor10));
mcolor11=strtoint(Edt_color11.text);
Savesetting('BKD','mcolor11', inttostr(mcolor11));
mname=Edt_name.text;
Savesetting('BKD','monstername',mname);
tol=strtoint(Edt_tol.text);
Savesetting('BKD','tol',inttostr(tol));
end;
Procedure CallBKCForm;
var
Btn_bkd TButton;
Lbl_color1,Lbl_color2,Lbl_color3,Lbl_color4,Lbl_color5,Lbl_color6,Lbl_color7,Lbl_color8,Lbl_color9,Lbl_color10,Lbl_color11,Lbl_name,Lbl_tol,Lbl_title TLabel;
begin
Application= GetApplication;
Self= GetSelf;
bkdForm = TForm.Create(nil);
BKDForm.Width = 700;
BKDForm.Height = 440;
BKDForm.Position = poScreenCenter;
BKDForm.BorderStyle = bsDialog;
BKDForm.Caption = 'Monster Colors Ub3r Fighter';
Edt_name = TEdit.Create(BKDForm);
Edt_name.Parent = BKDForm;
Edt_name.Left = 15;
Edt_name.Top = 15;
Edt_name.Width = 80;
Edt_name.Height = 20;
Edt_name.Font.Color = clWindowText;
Edt_name.Font.Height = -10;
Edt_name.Font.Name = 'Times New Roman';
Edt_name.Font.Style = [];
Edt_name.MaxLength = 10;
Edt_name.ParentFont = False;
Edt_name.TabOrder = 5;
Edt_name.text =mname;
Lbl_name = TLabel.Create(BKDForm);
Lbl_name.Parent = BKDForm;
Lbl_name.Left = 100;
Lbl_name.Top = 15;
Lbl_name.Width = 170;
Lbl_name.Height = 19;
Lbl_name.Caption = 'Monster Name';
Lbl_name.Font.Color = clWindowText;
Lbl_name.Font.Height = -16;
Lbl_name.Font.Name = 'Times New Roman';
Lbl_name.Font.Style = [];
Lbl_name.ParentFont = False;
Lbl_title = TLabel.Create(BKDForm);
Lbl_title.Parent = BKDForm;
Lbl_title.Left = 200;
Lbl_title.Top = 60;
Lbl_title.Width = 170;
Lbl_title.Height = 19;
Lbl_title.Caption = 'Set a color to 0 to skip entry, set tolerance to a max of 10';
Lbl_title.Font.Color = clWindowText;
Lbl_title.Font.Height = -16;
Lbl_title.Font.name = 'Times New Roman';
Lbl_title.Font.Style = [];
Lbl_title.ParentFont = False;
Lbl_tol = TLabel.Create(BKDForm);
Lbl_tol.Parent = BKDForm;
Lbl_tol.Left = 100;
Lbl_tol.Top = 15+30;
Lbl_tol.Width = 170;
Lbl_tol.Height = 19;
Lbl_tol.Caption = 'Monster Color Tolerance';
Lbl_tol.Font.Color = clWindowText;
Lbl_tol.Font.Height = -16;
Lbl_tol.Font.Name = 'Times New Roman';
Lbl_tol.Font.Style = [];
Lbl_tol.ParentFont = False;
Edt_tol = TEdit.Create(BKDForm);
Edt_tol.Parent = BKDForm;
Edt_tol.Left = 15;
Edt_tol.Top = 15+30;
Edt_tol.Width = 80;
Edt_tol.Height = 20;
Edt_tol.Font.Color = clWindowText;
Edt_tol.Font.Height = -10;
Edt_tol.Font.Name = 'Times New Roman';
Edt_tol.Font.Style = [];
Edt_tol.MaxLength = 10;
Edt_tol.ParentFont = False;
Edt_tol.TabOrder = 5;
Edt_tol.text =inttostr(tol);
Edt_color1 = TEdit.Create(BKDForm);
Edt_color1.Parent = BKDForm;
Edt_color1.Left = 15;
Edt_color1.Top = 15+60;
Edt_color1.Width = 80;
Edt_color1.Height = 20;
Edt_color1.Font.Color = clWindowText;
Edt_color1.Font.Height = -10;
Edt_color1.Font.Name = 'Times New Roman';
Edt_color1.Font.Style = [];
Edt_color1.MaxLength = 10;
Edt_color1.ParentFont = False;
Edt_color1.TabOrder = 5;
Edt_color1.text =inttostr(mcolor1);
Lbl_color1 = TLabel.Create(BKDForm);
Lbl_color1.Parent = BKDForm;
Lbl_color1.Left = 100;
Lbl_color1.Top = 15+60;
Lbl_color1.Width = 170;
Lbl_color1.Height = 19;
Lbl_color1.Caption = 'Monster Color 1';
Lbl_color1.Font.Color = clWindowText;
Lbl_color1.Font.Height = -16;
Lbl_color1.Font.Name = 'Times New Roman';
Lbl_color1.Font.Style = [];
Lbl_color1.ParentFont = False;
Edt_color2 = TEdit.Create(BKDForm);
Edt_color2.Parent = BKDForm;
Edt_color2.Left = 15;
Edt_color2.Top = 45+60;
Edt_color2.Width = 80;
Edt_color2.Height = 20;
Edt_color2.Font.Color = clWindowText;
Edt_color2.Font.Height = -10;
Edt_color2.Font.Name = 'Times New Roman';
Edt_color2.Font.Style = [];
Edt_color2.MaxLength = 10;
Edt_color2.ParentFont = False;
Edt_color2.TabOrder = 5;
Edt_color2.text =inttostr(mcolor2);
Lbl_color2 = TLabel.Create(BKDForm);
Lbl_color2.Parent = BKDForm;
Lbl_color2.Left = 100;
Lbl_color2.Top = 45+60;
Lbl_color2.Width = 170;
Lbl_color2.Height = 19;
Lbl_color2.Caption = 'Monster Color 2';
Lbl_color2.Font.Color = clWindowText;
Lbl_color2.Font.Height = -16;
Lbl_color2.Font.Name = 'Times New Roman';
Lbl_color2.Font.Style = [];
Lbl_color2.ParentFont = False;
Edt_color3 = TEdit.Create(BKDForm);
Edt_color3.Parent = BKDForm;
Edt_color3.Left = 15;
Edt_color3.Top = 75+60;
Edt_color3.Width = 80;
Edt_color3.Height = 20;
Edt_color3.Font.Color = clWindowText;
Edt_color3.Font.Height = -10;
Edt_color3.Font.Name = 'Times New Roman';
Edt_color3.Font.Style = [];
Edt_color3.MaxLength = 10;
Edt_color3.ParentFont = False;
Edt_color3.TabOrder = 5;
Edt_color3.text =inttostr(mcolor3);
Lbl_color3 = TLabel.Create(BKDForm);
Lbl_color3.Parent = BKDForm;
Lbl_color3.Left = 100;
Lbl_color3.Top = 75+60;
Lbl_color3.Width = 170;
Lbl_color3.Height = 19;
Lbl_color3.Caption = 'Monster Color 3';
Lbl_color3.Font.Color = clWindowText;
Lbl_color3.Font.Height = -16;
Lbl_color3.Font.Name = 'Times New Roman';
Lbl_color3.Font.Style = [];
Lbl_color3.ParentFont = False;
Edt_color4 = TEdit.Create(BKDForm);
Edt_color4.Parent = BKDForm;
Edt_color4.Left = 15;
Edt_color4.Top = 105+60;
Edt_color4.Width = 80;
Edt_color4.Height = 20;
Edt_color4.Font.Color = clWindowText;
Edt_color4.Font.Height = -10;
Edt_color4.Font.Name = 'Times New Roman';
Edt_color4.Font.Style = [];
Edt_color4.MaxLength = 10;
Edt_color4.ParentFont = False;
Edt_color4.TabOrder = 5;
Edt_color4.text =inttostr(mcolor4);
Lbl_color4 = TLabel.Create(BKDForm);
Lbl_color4.Parent = BKDForm;
Lbl_color4.Left = 100;
Lbl_color4.Top = 105+60;
Lbl_color4.Width = 170;
Lbl_color4.Height = 19;
Lbl_color4.Caption = 'Monster Color 4';
Lbl_color4.Font.Color = clWindowText;
Lbl_color4.Font.Height = -16;
Lbl_color4.Font.Name = 'Times New Roman';
Lbl_color4.Font.Style = [];
Lbl_color4.ParentFont = False;
Edt_color5 = TEdit.Create(BKDForm);
Edt_color5.Parent = BKDForm;
Edt_color5.Left = 15;
Edt_color5.Top = 135+60;
Edt_color5.Width = 80;
Edt_color5.Height = 20;
Edt_color5.Font.Color = clWindowText;
Edt_color5.Font.Height = -10;
Edt_color5.Font.Name = 'Times New Roman';
Edt_color5.Font.Style = [];
Edt_color5.MaxLength = 10;
Edt_color5.ParentFont = False;
Edt_color5.TabOrder = 5;
Edt_color5.text =inttostr(mcolor5);
Lbl_color5 = TLabel.Create(BKDForm);
Lbl_color5.Parent = BKDForm;
Lbl_color5.Left = 100;
Lbl_color5.Top = 135+60;
Lbl_color5.Width = 170;
Lbl_color5.Height = 19;
Lbl_color5.Caption = 'Monster Color 5';
Lbl_color5.Font.Color = clWindowText;
Lbl_color5.Font.Height = -16;
Lbl_color5.Font.Name = 'Times New Roman';
Lbl_color5.Font.Style = [];
Lbl_color5.ParentFont = False;
Edt_color6 = TEdit.Create(BKDForm);
Edt_color6.Parent = BKDForm;
Edt_color6.Left = 15;
Edt_color6.Top = 165+60;
Edt_color6.Width = 80;
Edt_color6.Height = 20;
Edt_color6.Font.Color = clWindowText;
Edt_color6.Font.Height = -10;
Edt_color6.Font.Name = 'Times New Roman';
Edt_color6.Font.Style = [];
Edt_color6.MaxLength = 10;
Edt_color6.ParentFont = False;
Edt_color6.TabOrder = 5;
Edt_color6.text =inttostr(mcolor6);
Lbl_color6 = TLabel.Create(BKDForm);
Lbl_color6.Parent = BKDForm;
Lbl_color6.Left = 100;
Lbl_color6.Top = 165+60;
Lbl_color6.Width = 170;
Lbl_color6.Height = 19;
Lbl_color6.Caption = 'Monster Color 6';
Lbl_color6.Font.Color = clWindowText;
Lbl_color6.Font.Height = -16;
Lbl_color6.Font.Name = 'Times New Roman';
Lbl_color6.Font.Style = [];
Lbl_color6.ParentFont = False;
Edt_color7 = TEdit.Create(BKDForm);
Edt_color7.Parent = BKDForm;
Edt_color7.Left = 15;
Edt_color7.Top = 195+60;
Edt_color7.Width = 80;
Edt_color7.Height = 20;
Edt_color7.Font.Color = clWindowText;
Edt_color7.Font.Height = -10;
Edt_color7.Font.Name = 'Times New Roman';
Edt_color7.Font.Style = [];
Edt_color7.MaxLength = 10;
Edt_color7.ParentFont = False;
Edt_color7.TabOrder = 5;
Edt_color7.text =inttostr(mcolor7);
Lbl_color7 = TLabel.Create(BKDForm);
Lbl_color7.Parent = BKDForm;
Lbl_color7.Left = 100;
Lbl_color7.Top = 195+60;
Lbl_color7.Width = 170;
Lbl_color7.Height = 19;
Lbl_color7.Caption = 'Monster Color 7';
Lbl_color7.Font.Color = clWindowText;
Lbl_color7.Font.Height = -16;
Lbl_color7.Font.Name = 'Times New Roman';
Lbl_color7.Font.Style = [];
Lbl_color7.ParentFont = False;
Edt_color8 = TEdit.Create(BKDForm);
Edt_color8.Parent = BKDForm;
Edt_color8.Left = 15;
Edt_color8.Top = 225+60;
Edt_color8.Width = 80;
Edt_color8.Height = 20;
Edt_color8.Font.Color = clWindowText;
Edt_color8.Font.Height = -10;
Edt_color8.Font.Name = 'Times New Roman';
Edt_color8.Font.Style = [];
Edt_color8.MaxLength = 10;
Edt_color8.ParentFont = False;
Edt_color8.TabOrder = 5;
Edt_color8.text =inttostr(mcolor8);
Lbl_color8 = TLabel.Create(BKDForm);
Lbl_color8.Parent = BKDForm;
Lbl_color8.Left = 100;
Lbl_color8.Top = 225+60;
Lbl_color8.Width = 170;
Lbl_color8.Height = 19;
Lbl_color8.Caption = 'Monster Color 8';
Lbl_color8.Font.Color = clWindowText;
Lbl_color8.Font.Height = -16;
Lbl_color8.Font.Name = 'Times New Roman';
Lbl_color8.Font.Style = [];
Lbl_color8.ParentFont = False;
Edt_color9 = TEdit.Create(BKDForm);
Edt_color9.Parent = BKDForm;
Edt_color9.Left = 15;
Edt_color9.Top = 255+60;
Edt_color9.Width = 80;
Edt_color9.Height = 20;
Edt_color9.Font.Color = clWindowText;
Edt_color9.Font.Height = -10;
Edt_color9.Font.Name = 'Times New Roman';
Edt_color9.Font.Style = [];
Edt_color9.MaxLength = 10;
Edt_color9.ParentFont = False;
Edt_color9.TabOrder = 5;
Edt_color9.text =inttostr(mcolor9);
Lbl_color9 = TLabel.Create(BKDForm);
Lbl_color9.Parent = BKDForm;
Lbl_color9.Left = 100;
Lbl_color9.Top = 255+60;
Lbl_color9.Width = 170;
Lbl_color9.Height = 19;
Lbl_color9.Caption = 'Monster Color 9';
Lbl_color9.Font.Color = clWindowText;
Lbl_color9.Font.Height = -16;
Lbl_color9.Font.Name = 'Times New Roman';
Lbl_color9.Font.Style = [];
Lbl_color9.ParentFont = False;
Edt_color10 = TEdit.Create(BKDForm);
Edt_color10.Parent = BKDForm;
Edt_color10.Left = 15;
Edt_color10.Top = 285+60;
Edt_color10.Width = 80;
Edt_color10.Height = 20;
Edt_color10.Font.Color = clWindowText;
Edt_color10.Font.Height = -10;
Edt_color10.Font.Name = 'Times New Roman';
Edt_color10.Font.Style = [];
Edt_color10.MaxLength = 10;
Edt_color10.ParentFont = False;
Edt_color10.TabOrder = 5;
Edt_color10.text =inttostr(mcolor10);
Lbl_color10 = TLabel.Create(BKDForm);
Lbl_color10.Parent = BKDForm;
Lbl_color10.Left = 100;
Lbl_color10.Top = 285+60;
Lbl_color10.Width = 170;
Lbl_color10.Height = 19;
Lbl_color10.Caption = 'Monster Color 10';
Lbl_color10.Font.Color = clWindowText;
Lbl_color10.Font.Height = -16;
Lbl_color10.Font.Name = 'Times New Roman';
Lbl_color10.Font.Style = [];
Lbl_color10.ParentFont = False;
Edt_color11 = TEdit.Create(BKDForm);
Edt_color11.Parent = BKDForm;
Edt_color11.Left = 15;
Edt_color11.Top = 315+60;
Edt_color11.Width = 80;
Edt_color11.Height = 20;
Edt_color11.Font.Color = clWindowText;
Edt_color11.Font.Height = -10;
Edt_color11.Font.Name = 'Times New Roman';
Edt_color11.Font.Style = [];
Edt_color11.MaxLength = 10;
Edt_color11.ParentFont = False;
Edt_color11.TabOrder = 5;
Edt_color11.text =inttostr(mcolor11);
Lbl_color11 = TLabel.Create(BKDForm);
Lbl_color11.Parent = BKDForm;
Lbl_color11.Left = 100;
Lbl_color11.Top = 315+60;
Lbl_color11.Width = 170;
Lbl_color11.Height = 19;
Lbl_color11.Caption = 'Monster Color 11';
Lbl_color11.Font.Color = clWindowText;
Lbl_color11.Font.Height = -16;
Lbl_color11.Font.Name = 'Times New Roman';
Lbl_color11.Font.Style = [];
Lbl_color11.ParentFont = False;
Btn_BKD = TButton.Create(BKDForm);
Btn_BKD.Parent = BKDForm;
Btn_BKD.Left = 400;
Btn_BKD.Top = 300;
Btn_BKD.Width = 180;
Btn_BKD.Height = 50;
Btn_BKD.Caption = 'Save Info';
Btn_BKD.Default = false;
Btn_BKD.Font.Color = clWindowText;
Btn_BKD.Font.Height = -18;
Btn_BKD.Font.Name = 'scripts';
Btn_BKD.Font.Style = [];
Btn_BKD.ParentFont = False;
Btn_BKD.TabOrder = 7;
Btn_BKD.OnClick = @BKDClick;
Btn_BKD.ModalResult = mrOk;
BKDForm.ShowModal;
BKDForm.Free;
end;
procedure otherClick (sender TObject);
begin
timeout=strtoint(Edt_HumanOpVal.text);
lftimeout=strtoint(Edt_Humanpxval.text);
bonecolor=strtoint(Edt_uwras.text);
foodinvcolor=strtoint(Edt_attacks.text);
criticalhp=strtoint(Edt_crit.text);
runwhere=Edt_runw.text
fightmode=strtoint(Edt_Fights.text);
Savesetting('BKD','fightm', inttostr(fightmode));
Savesetting('BKD','eatcolor', inttostr(foodinvcolor));
Savesetting('BKD','crithp', inttostr(criticalhp));
Savesetting('BKD','runwhere', runwhere);
Savesetting('BKD','timeout1', inttostr(timeout));
Savesetting('BKD','timeout2', inttostr(lftimeout));
Savesetting('BKD','bonec', inttostr(bonecolor));
eatfood=false;
IF checkbox_sm.Checked then eatfood=true;
x=0;
IF (eatfood) then x=1;
Savesetting('BKD','eat',inttostr(x));
bonecollecting=false;
IF checkbox_bm.Checked then bonecollecting=true;
x=0;
IF (bonecollecting) then x=1;
Savesetting('BKD','bone',inttostr(x));
end;
Procedure CallSOForm;
var
Btn_Other TButton;
Lbl_HumanSpeed,Lbl_Humanpx,Lbl_fights,Lbl_attacks,Lbl_uwras, Lbl_crit,Lbl_runw TLabel;
begin
Application= GetApplication;
Self= GetSelf;
OtherForm = TForm.Create(nil);
OtherForm.Width = 700;
OtherForm.Height = 425;
OtherForm.Position = poScreenCenter;
OtherForm.BorderStyle = bsDialog;
OtherForm.Caption = 'Script Options Ub3r Fighter';
Edt_HumanOpVal = TEdit.Create(otherForm);
Edt_HumanOpVal.Parent = otherForm;
Edt_HumanOpVal.Left = 15;
Edt_HumanOpVal.Top = 45;
Edt_HumanOpVal.Width = 20;
Edt_HumanOpVal.Height = 20;
Edt_HumanOpVal.Font.Color = clWindowText;
Edt_HumanOpVal.Font.Height = -10;
Edt_HumanOpVal.Font.Name = 'Times New Roman';
Edt_HumanOpVal.Font.Style = [];
Edt_HumanOpVal.MaxLength = 10;
Edt_HumanOpVal.ParentFont = False;
Edt_HumanOpVal.TabOrder = 5;
Edt_HumanOpVal.text =inttostr(timeout);
Lbl_HumanSpeed = TLabel.Create(otherForm);
Lbl_HumanSpeed.Parent = otherForm;
Lbl_HumanSpeed.Left = 40;
Lbl_HumanSpeed.Top = 45;
Lbl_HumanSpeed.Width = 170;
Lbl_HumanSpeed.Height = 19;
Lbl_HumanSpeed.Caption = 'Max Time in Seconds a Fight lasts';
Lbl_HumanSpeed.Font.Color = clWindowText;
Lbl_HumanSpeed.Font.Height = -16;
Lbl_HumanSpeed.Font.Name = 'Times New Roman';
Lbl_HumanSpeed.Font.Style = [];
Lbl_HumanSpeed.ParentFont = False;
Edt_HumanpxVal = TEdit.Create(otherForm);
Edt_HumanpxVal.Parent = otherForm;
Edt_HumanpxVal.Left = 15;
Edt_HumanpxVal.Top = 75;
Edt_HumanpxVal.Width = 20;
Edt_HumanpxVal.Height = 20;
Edt_HumanpxVal.Font.Color = clWindowText;
Edt_HumanpxVal.Font.Height = -10;
Edt_HumanpxVal.Font.Name = 'Times New Roman';
Edt_HumanpxVal.Font.Style = [];
Edt_HumanpxVal.MaxLength = 10;
Edt_HumanpxVal.ParentFont = False;
Edt_HumanpxVal.TabOrder = 5;
Edt_HumanpxVal.text =inttostr(lftimeout);
Lbl_Humanpx = TLabel.Create(otherForm);
Lbl_Humanpx.Parent = otherForm;
Lbl_Humanpx.Left = 40;
Lbl_Humanpx.Top = 75;
Lbl_Humanpx.Width = 170;
Lbl_Humanpx.Height = 19;
Lbl_Humanpx.Caption = 'Max Time Between Fights';
Lbl_Humanpx.Font.Color = clWindowText;
Lbl_Humanpx.Font.Height = -16;
Lbl_Humanpx.Font.Name = 'Times New Roman';
Lbl_Humanpx.Font.Style = [];
Lbl_Humanpx.ParentFont = False;
Edt_fights = TEdit.Create(otherForm);
Edt_fights.Parent = otherForm;
Edt_fights.Left = 15;
Edt_fights.Top = 15;
Edt_fights.Width = 20;
Edt_fights.Height = 20;
Edt_fights.Font.Color = clWindowText;
Edt_fights.Font.Height = -10;
Edt_fights.Font.Name = 'Times New Roman';
Edt_fights.Font.Style = [];
Edt_fights.MaxLength = 10;
Edt_fights.ParentFont = False;
Edt_fights.TabOrder = 5;
Edt_fights.text =inttostr(fightmode);
Lbl_fights = TLabel.Create(otherForm);
Lbl_fights.Parent = otherForm;
Lbl_fights.Left = 40;
Lbl_fights.Top = 15;
Lbl_fights.Width = 170;
Lbl_fights.Height = 19;
Lbl_fights.Caption = 'Enter Fight Mode Selection (1-4)';
Lbl_fights.Font.Color = clWindowText;
Lbl_fights.Font.Height = -16;
Lbl_fights.Font.Name = 'Times New Roman';
Lbl_fights.Font.Style = [];
Lbl_fights.ParentFont = False;
Edt_attacks = TEdit.Create(otherForm);
Edt_attacks.Parent = otherForm;
Edt_attacks.Left = 15;
Edt_attacks.Top = 105;
Edt_attacks.Width = 80;
Edt_attacks.Height = 20;
Edt_attacks.Font.Color = clWindowText;
Edt_attacks.Font.Height = -10;
Edt_attacks.Font.Name = 'Times New Roman';
Edt_attacks.Font.Style = [];
Edt_attacks.MaxLength = 10;
Edt_attacks.ParentFont = False;
Edt_attacks.TabOrder = 5;
Edt_attacks.text =inttostr(foodinvcolor);
Lbl_attacks = TLabel.Create(otherForm);
Lbl_attacks.Parent = otherForm;
Lbl_attacks.Left = 100;
Lbl_attacks.Top = 105;
Lbl_attacks.Width = 170;
Lbl_attacks.Height = 19;
Lbl_attacks.Caption = 'Food Color';
Lbl_attacks.Font.Color = clWindowText;
Lbl_attacks.Font.Height = -16;
Lbl_attacks.Font.Name = 'Times New Roman';
Lbl_attacks.Font.Style = [];
Lbl_attacks.ParentFont = False;
CheckBox_sm = TCheckBox.Create(otherForm);
CheckBox_sm.Parent = otherForm;
CheckBox_sm.Left = 240;
CheckBox_sm.Top = 105;
CheckBox_sm.Width = 273;
CheckBox_sm.Height = 20;
CheckBox_sm.Caption = 'Eat Food';
CheckBox_sm.Font.Color = clWindowText;
CheckBox_sm.Font.Height = -14;
CheckBox_sm.Font.Name = 'times new roman';
CheckBox_sm.Font.Style = [];
CheckBox_sm.ParentFont = false;
CheckBox_sm.checked = eatfood;
Edt_uwras = TEdit.Create(otherForm);
Edt_uwras.Parent = otherForm;
Edt_uwras.Left = 15;
Edt_uwras.Top = 135;
Edt_uwras.Width = 80;
Edt_uwras.Height = 20;
Edt_uwras.Font.Color = clWindowText;
Edt_uwras.Font.Height = -10;
Edt_uwras.Font.Name = 'Times New Roman';
Edt_uwras.Font.Style = [];
Edt_uwras.MaxLength = 10;
Edt_uwras.ParentFont = False;
Edt_uwras.TabOrder = 5;
Edt_uwras.text =inttostr(bonecolor);
Lbl_uwras = TLabel.Create(otherForm);
Lbl_uwras.Parent = otherForm;
Lbl_uwras.Left = 100;
Lbl_uwras.Top = 135;
Lbl_uwras.Width = 170;
Lbl_uwras.Height = 19;
Lbl_uwras.Caption = 'Bone Color';
Lbl_uwras.Font.Color = clWindowText;
Lbl_uwras.Font.Height = -16;
Lbl_uwras.Font.Name = 'Times New Roman';
Lbl_uwras.Font.Style = [];
Lbl_uwras.ParentFont = False;
CheckBox_bm = TCheckBox.Create(otherForm);
CheckBox_bm.Parent = otherForm;
CheckBox_bm.Left = 240;
CheckBox_bm.Top = 135;
CheckBox_bm.Width = 273;
CheckBox_bm.Height = 20;
CheckBox_bm.Caption = 'Bury Bones';
CheckBox_bm.Font.Color = clWindowText;
CheckBox_bm.Font.Height = -14;
CheckBox_bm.Font.Name = 'times new roman';
CheckBox_bm.Font.Style = [];
CheckBox_bm.ParentFont = false;
CheckBox_bm.checked = bonecollecting;
Edt_crit = TEdit.Create(otherForm);
Edt_crit.Parent = otherForm;
Edt_crit.Left = 15;
Edt_crit.Top = 165;
Edt_crit.Width = 20;
Edt_crit.Height = 20;
Edt_crit.Font.Color = clWindowText;
Edt_crit.Font.Height = -10;
Edt_crit.Font.Name = 'Times New Roman';
Edt_crit.Font.Style = [];
Edt_crit.MaxLength = 10;
Edt_crit.ParentFont = False;
Edt_crit.TabOrder = 5;
Edt_crit.text =inttostr(criticalhp);
Lbl_crit = TLabel.Create(otherForm);
Lbl_crit.Parent = otherForm;
Lbl_crit.Left = 40;
Lbl_crit.Top = 165;
Lbl_crit.Width = 170;
Lbl_crit.Height = 19;
Lbl_crit.Caption = 'Hp # to Logoff at';
Lbl_crit.Font.Color = clWindowText;
Lbl_crit.Font.Height = -16;
Lbl_crit.Font.Name = 'Times New Roman';
Lbl_crit.Font.Style = [];
Lbl_crit.ParentFont = False;
Edt_runw = TEdit.Create(otherForm);
Edt_runw.Parent = otherForm;
Edt_runw.Left = 15;
Edt_runw.Top = 205;
Edt_runw.Width = 20;
Edt_runw.Height = 20;
Edt_runw.Font.Color = clWindowText;
Edt_runw.Font.Height = -10;
Edt_runw.Font.Name = 'Times New Roman';
Edt_runw.Font.Style = [];
Edt_runw.MaxLength = 10;
Edt_runw.ParentFont = False;
Edt_runw.TabOrder = 5;
Edt_runw.text =runwhere;
Lbl_runw = TLabel.Create(otherForm);
Lbl_runw.Parent = otherForm;
Lbl_runw.Left = 40;
Lbl_runw.Top = 205;
Lbl_runw.Width = 170;
Lbl_runw.Height = 19;
Lbl_runw.Caption = 'Where is it possible to Run to (N S E W)';
Lbl_runw.Font.Color = clWindowText;
Lbl_runw.Font.Height = -16;
Lbl_runw.Font.Name = 'Times New Roman';
Lbl_runw.Font.Style = [];
Lbl_runw.ParentFont = False;
Btn_other = TButton.Create(otherForm);
Btn_other.Parent = otherForm;
Btn_other.Left = 350;
Btn_other.Top = 300;
Btn_other.Width = 180;
Btn_other.Height = 50;
Btn_other.Caption = 'Save Info';
Btn_other.Default = false;
Btn_other.Font.Color = clWindowText;
Btn_other.Font.Height = -18;
Btn_other.Font.Name = 'scripts';
Btn_other.Font.Style = [];
Btn_other.ParentFont = False;
Btn_other.TabOrder = 7;
Btn_other.OnClick = @otherClick;
Btn_other.ModalResult = mrOk;
otherForm.ShowModal;
otherForm.Free;
end;
Procedure SAVEClick(sender TObject);
begin
username1= edt_username1.text;
password1= edt_password1.text;
SaveSetting('bkd', 'username1', username1);
SaveSetting('bkd', 'password1', password1);
username2= edt_username2.text;
password2= edt_password2.text;
SaveSetting('bkd', 'username2', username2);
SaveSetting('bkd', 'password2', password2);
username3= edt_username3.text;
password3= edt_password3.text;
SaveSetting('bkd', 'username3', username3);
SaveSetting('bkd', 'password3', password3);
username4= edt_username4.text;
password4= edt_password4.text;
SaveSetting('bkd', 'username4', username4);
SaveSetting('bkd', 'password4', password4);
username5= edt_username5.text;
password5= edt_password5.text;
SaveSetting('bkd', 'username5', username5);
SaveSetting('bkd', 'password5', password5);
if CheckBox_UN1.Checked then uchar1=true else uchar1=false;
if CheckBox_UN2.Checked then uchar2=true else uchar2=false;
if CheckBox_UN3.Checked then uchar3=true else uchar3=false;
if CheckBox_UN4.Checked then uchar4=true else uchar4=false;
if CheckBox_UN5.Checked then uchar5=true else uchar5=false;
If (Uchar1) then achar1=1 else achar1=0;
If (Uchar2) then achar2=1 else achar2=0;
If (Uchar3) then achar3=1 else achar3=0;
If (Uchar4) then achar4=1 else achar4=0;
If (Uchar5) then achar5=1 else achar5=0;
SaveSetting('bkd', 'achar1', inttostr(achar1));
SaveSetting('bkd', 'achar2', inttostr(achar2));
SaveSetting('bkd', 'achar3', inttostr(achar3));
SaveSetting('bkd', 'achar4', inttostr(achar4));
SaveSetting('bkd', 'achar5', inttostr(achar5));
end;
Procedure CallUserForm; {All form knowledge i obtained from Phalanx and Dylock, thanks!}
var
Btn_SAVE TButton;
Line1,Line2,Line3,Line4,line5 TBevel;
Lbl_UserName1,Lbl_Password1,Lbl_UserName2,Lbl_Password2,
Lbl_UserName3,Lbl_Password3,Lbl_UserName4,Lbl_Password4,Lbl_UserName5,Lbl_Password5,
Lbl_Title TLabel;
begin
Application = GetApplication;
Self = GetSelf;
LithForm = TForm.Create(nil);
LithForm.Width = 700;
LithForm.Height = 425;
LithForm.Position = poScreenCenter;
LithForm.BorderStyle = bsDialog;
LithForm.Caption = 'User settings Ub3r Fighter';
Lbl_UserName1 = TLabel.Create(LithForm);
Lbl_UserName1.Parent = LithForm;
Lbl_UserName1.Left = 58;
Lbl_UserName1.Top = 32;
Lbl_UserName1.Width = 73;
Lbl_UserName1.Height = 19;
Lbl_UserName1.Caption = 'User Name #1';
Lbl_UserName1.Font.Color = clWindowText;
Lbl_UserName1.Font.Height = -16;
Lbl_UserName1.Font.Name = 'Times New Roman';
Lbl_UserName1.Font.Style = [];
Lbl_UserName1.ParentFont = False;
Lbl_PassWord1 = TLabel.Create(LithForm);
Lbl_PassWord1.Parent = LithForm;
Lbl_PassWord1.Left = 58;
Lbl_PassWord1.Top = 56;
Lbl_PassWord1.Width = 63;
Lbl_PassWord1.Height = 19;
Lbl_PassWord1.Caption = 'Password #1';
Lbl_PassWord1.Font.Color = clWindowText;
Lbl_PassWord1.Font.Height = -16;
Lbl_PassWord1.Font.Name = 'Times New Roman';
Lbl_PassWord1.Font.Style = [];
Lbl_PassWord1.ParentFont = False
Edt_UserName1 = TEdit.Create(LithForm);
Edt_UserName1.Parent = LithForm;
Edt_UserName1.Left = 150;
Edt_UserName1.Top = 32;
Edt_UserName1.Width = 100;
Edt_UserName1.Height = 21;
Edt_UserName1.Font.Color = clWindowText;
Edt_UserName1.Font.Height = -11;
Edt_UserName1.Font.Name = 'MS Sans Serif';
Edt_UserName1.Font.Style = [];
Edt_UserName1.MaxLength = 12;
Edt_UserName1.ParentFont = False;
Edt_UserName1.TabOrder = 0;
Edt_UserName1.Text = username1;
Edt_PassWord1 = TEdit.Create(LithForm);
Edt_PassWord1.Parent = LithForm;
Edt_PassWord1.Left = 150;
Edt_PassWord1.Top = 56;
Edt_PassWord1.Width = 100;
Edt_PassWord1.Height = 21;
Edt_PassWord1.Font.Color = clWindowText;
Edt_PassWord1.Font.Height = -11;
Edt_PassWord1.Font.Name = 'MS Sans Serif';
Edt_PassWord1.Font.Style = [];
Edt_PassWord1.ParentFont = False;
Edt_PassWord1.PasswordChar = '';
Edt_PassWord1.TabOrder = 1;
Edt_PassWord1.Text = password1;
Line1 = TBevel.Create(LithForm);
Line1.Parent = LithForm;
Line1.Left = 230;
Line1.Top = 54;
Line1.Width = 125;
Line1.Height = 2;
CheckBox_UN1 = TCheckBox.Create(LithForm);
CheckBox_UN1.Parent = LithForm;
CheckBox_UN1.Left = 365;
CheckBox_UN1.Top = 46;
CheckBox_UN1.Width = 273;
CheckBox_UN1.Height = 20;
CheckBox_UN1.Caption = 'Use This Char';
CheckBox_UN1.Font.Color = clWindowText;
CheckBox_UN1.Font.Height = -14;
CheckBox_UN1.Font.Name = 'times new roman';
CheckBox_UN1.Font.Style = [];
CheckBox_UN1.ParentFont = false;
CheckBox_UN1.checked = uchar1;
Lbl_UserName2 = TLabel.Create(LithForm);
Lbl_UserName2.Parent = LithForm;
Lbl_UserName2.Left = 58;
Lbl_UserName2.Top = 102;
Lbl_UserName2.Width = 73;
Lbl_UserName2.Height = 19;
Lbl_UserName2.Caption = 'User Name #2';
Lbl_UserName2.Font.Color = clWindowText;
Lbl_UserName2.Font.Height = -16;
Lbl_UserName2.Font.Name = 'Times New Roman';
Lbl_UserName2.Font.Style = [];
Lbl_UserName2.ParentFont = False;
Lbl_PassWord2 = TLabel.Create(LithForm);
Lbl_PassWord2.Parent = LithForm;
Lbl_PassWord2.Left = 58;
Lbl_PassWord2.Top = 126;
Lbl_PassWord2.Width = 63;
Lbl_PassWord2.Height = 19;
Lbl_PassWord2.Caption = 'Password #2';
Lbl_PassWord2.Font.Color = clWindowText;
Lbl_PassWord2.Font.Height = -16;
Lbl_PassWord2.Font.Name = 'Times New Roman';
Lbl_PassWord2.Font.Style = [];
Lbl_PassWord2.ParentFont = False
Edt_UserName2 = TEdit.Create(LithForm);
Edt_UserName2.Parent = LithForm;
Edt_UserName2.Left = 150;
Edt_UserName2.Top = 102;
Edt_UserName2.Width = 100;
Edt_UserName2.Height = 21;
Edt_UserName2.Font.Color = clWindowText;
Edt_UserName2.Font.Height = -11;
Edt_UserName2.Font.Name = 'MS Sans Serif';
Edt_UserName2.Font.Style = [];
Edt_UserName2.MaxLength = 12;
Edt_UserName2.ParentFont = False;
Edt_UserName2.TabOrder = 3;
Edt_UserName2.Text = username2;
Edt_PassWord2 = TEdit.Create(LithForm);
Edt_PassWord2.Parent = LithForm;
Edt_PassWord2.Left = 150;
Edt_PassWord2.Top = 126;
Edt_PassWord2.Width = 100;
Edt_PassWord2.Height = 21;
Edt_PassWord2.Font.Color = clWindowText;
Edt_PassWord2.Font.Height = -11;
Edt_PassWord2.Font.Name = 'MS Sans Serif';
Edt_PassWord2.Font.Style = [];
Edt_PassWord2.ParentFont = False;
Edt_PassWord2.PasswordChar = '';
Edt_PassWord2.TabOrder = 4;
Edt_PassWord2.Text = password2;
Line2 = TBevel.Create(LithForm);
Line2.Parent = LithForm;
Line2.Left = 230;
Line2.Top = 124;
Line2.Width = 125;
Line2.Height = 2;
CheckBox_UN2 = TCheckBox.Create(LithForm);
CheckBox_UN2.Parent = LithForm;
CheckBox_UN2.Left = 365;
CheckBox_UN2.Top = 116;
CheckBox_UN2.Width = 273;
CheckBox_UN2.Height = 20;
CheckBox_UN2.Caption = 'Use This Char';
CheckBox_UN2.Font.Color = clWindowText;
CheckBox_UN2.Font.Height = -14;
CheckBox_UN2.Font.Name = 'times new roman';
CheckBox_UN2.Font.Style = [];
CheckBox_UN2.ParentFont = false;
CheckBox_UN2.checked = uchar2;
Lbl_username3 = TLabel.Create(LithForm);
Lbl_username3.Parent = LithForm;
Lbl_username3.Left = 58;
Lbl_username3.Top = 172;
Lbl_username3.Width = 73;
Lbl_username3.Height = 19;
Lbl_username3.Caption = 'User Name #3';
Lbl_username3.Font.Color = clWindowText;
Lbl_username3.Font.Height = -16;
Lbl_username3.Font.Name = 'Times New Roman';
Lbl_username3.Font.Style = [];
Lbl_username3.ParentFont = False;
Lbl_Password3 = TLabel.Create(LithForm);
Lbl_Password3.Parent = LithForm;
Lbl_Password3.Left = 58;
Lbl_Password3.Top = 196;
Lbl_Password3.Width = 63;
Lbl_Password3.Height = 19;
Lbl_Password3.Caption = 'Password #3';
Lbl_Password3.Font.Color = clWindowText;
Lbl_Password3.Font.Height = -16;
Lbl_Password3.Font.Name = 'Times New Roman';
Lbl_Password3.Font.Style = [];
Lbl_Password3.ParentFont = False
Edt_username3 = TEdit.Create(LithForm);
Edt_username3.Parent = LithForm;
Edt_username3.Left = 150;
Edt_username3.Top = 172;
Edt_username3.Width = 100;
Edt_username3.Height = 21;
Edt_username3.Font.Color = clWindowText;
Edt_username3.Font.Height = -11;
Edt_username3.Font.Name = 'MS Sans Serif';
Edt_username3.Font.Style = [];
Edt_username3.MaxLength = 12;
Edt_username3.ParentFont = False;
Edt_username3.TabOrder = 6;
Edt_username3.Text = username3;
Edt_Password3 = TEdit.Create(LithForm);
Edt_Password3.Parent = LithForm;
Edt_Password3.Left = 150;
Edt_Password3.Top = 196;
Edt_Password3.Width = 100;
Edt_Password3.Height = 21;
Edt_Password3.Font.Color = clWindowText;
Edt_Password3.Font.Height = -11;
Edt_Password3.Font.Name = 'MS Sans Serif';
Edt_Password3.Font.Style = [];
Edt_Password3.ParentFont = False;
Edt_Password3.PasswordChar = '';
Edt_Password3.TabOrder = 7;
Edt_Password3.Text = password3;
line3 = TBevel.Create(LithForm);
line3.Parent = LithForm;
line3.Left = 230;
line3.Top = 194;
line3.Width = 125;
line3.Height = 2;
CheckBox_UN3 = TCheckBox.Create(LithForm);
CheckBox_UN3.Parent = LithForm;
CheckBox_UN3.Left = 365;
CheckBox_UN3.Top = 186;
CheckBox_UN3.Width = 273;
CheckBox_UN3.Height = 20;
CheckBox_UN3.Caption = 'Use This Char';
CheckBox_UN3.Font.Color = clWindowText;
CheckBox_UN3.Font.Height = -14;
CheckBox_UN3.Font.Name = 'times new roman';
CheckBox_UN3.Font.Style = [];
CheckBox_UN3.ParentFont = false;
CheckBox_UN3.checked = uchar3;
Lbl_username4 = TLabel.Create(LithForm);
Lbl_username4.Parent = LithForm;
Lbl_username4.Left = 58;
Lbl_username4.Top = 242;
Lbl_username4.Width = 73;
Lbl_username4.Height = 19;
Lbl_username4.Caption = 'User Name #4';
Lbl_username4.Font.Color = clWindowText;
Lbl_username4.Font.Height = -16;
Lbl_username4.Font.Name = 'Times New Roman';
Lbl_username4.Font.Style = [];
Lbl_username4.ParentFont = false;
Lbl_password4 = TLabel.Create(LithForm);
Lbl_password4.Parent = LithForm;
Lbl_password4.Left = 58;
Lbl_password4.Top = 266;
Lbl_password4.Width = 63;
Lbl_password4.Height = 19;
Lbl_password4.Caption = 'Password #4';
Lbl_password4.Font.Color = clWindowText;
Lbl_password4.Font.Height = -16;
Lbl_password4.Font.Name = 'Times New Roman';
Lbl_password4.Font.Style = [];
Lbl_password4.ParentFont = False
Edt_username4 = TEdit.Create(LithForm);
Edt_username4.Parent = LithForm;
Edt_username4.Left = 150;
Edt_username4.Top = 242;
Edt_username4.Width = 100;
Edt_username4.Height = 21;
Edt_username4.Font.Color = clWindowText;
Edt_username4.Font.Height = -11;
Edt_username4.Font.Name = 'MS Sans Serif';
Edt_username4.Font.Style = [];
Edt_username4.MaxLength = 12;
Edt_username4.ParentFont = False;
Edt_username4.TabOrder = 9;
Edt_username4.Text = username4;
Edt_password4 = TEdit.Create(LithForm);
Edt_password4.Parent = LithForm;
Edt_password4.Left = 150;
Edt_password4.Top = 266;
Edt_password4.Width = 100;
Edt_password4.Height = 21;
Edt_password4.Font.Color = clWindowText;
Edt_password4.Font.Height = -11;
Edt_password4.Font.Name = 'MS Sans Serif';
Edt_password4.Font.Style = [];
Edt_password4.ParentFont = False;
Edt_password4.PasswordChar = '';
Edt_password4.TabOrder = 10;
Edt_password4.Text = password4;
line4 = TBevel.Create(LithForm);
line4.Parent = LithForm;
line4.Left = 230;
line4.Top = 264;
line4.Width = 125;
line4.Height = 2;
CheckBox_UN4 = TCheckBox.Create(LithForm);
CheckBox_UN4.Parent = LithForm;
CheckBox_UN4.Left = 365;
CheckBox_UN4.Top = 256;
CheckBox_UN4.Width = 273;
CheckBox_UN4.Height = 20;
CheckBox_UN4.Caption = 'Use This Char';
CheckBox_UN4.Font.Color = clWindowText;
CheckBox_UN4.Font.Height = -14;
CheckBox_UN4.Font.Name = 'times new roman';
CheckBox_UN4.Font.Style = [];
CheckBox_UN4.ParentFont = false;
CheckBox_UN4.checked = uchar4;
Lbl_UserName5 = TLabel.Create(LithForm);
Lbl_UserName5.Parent = LithForm;
Lbl_UserName5.Left = 58;
Lbl_UserName5.Top =312;
Lbl_UserName5.Width = 73;
Lbl_UserName5.Height = 19;
Lbl_UserName5.Caption = 'User Name #5';
Lbl_UserName5.Font.Color = clWindowText;
Lbl_UserName5.Font.Height = -16;
Lbl_UserName5.Font.Name = 'Times New Roman';
Lbl_UserName5.Font.Style = [];
Lbl_UserName5.ParentFont = False;
Lbl_password5 = TLabel.Create(LithForm);
Lbl_password5.Parent = LithForm;
Lbl_password5.Left = 58;
Lbl_password5.Top =336;
Lbl_password5.Width = 63;
Lbl_password5.Height = 19;
Lbl_password5.Caption = 'Password #5';
Lbl_password5.Font.Color = clWindowText;
Lbl_password5.Font.Height = -16;
Lbl_password5.Font.Name = 'Times New Roman';
Lbl_password5.Font.Style = [];
Lbl_password5.ParentFont = False
Edt_UserName5 = TEdit.Create(LithForm);
Edt_UserName5.Parent = LithForm;
Edt_UserName5.Left = 150;
Edt_UserName5.Top = 312;
Edt_UserName5.Width = 100;
Edt_UserName5.Height = 21;
Edt_UserName5.Font.Color = clWindowText;
Edt_UserName5.Font.Height = -11;
Edt_UserName5.Font.Name = 'MS Sans Serif';
Edt_UserName5.Font.Style = [];
Edt_UserName5.MaxLength = 12;
Edt_UserName5.ParentFont = False;
Edt_UserName5.TabOrder = 12;
Edt_UserName5.Text = username5;
Edt_password5 = TEdit.Create(LithForm);
Edt_password5.Parent = LithForm;
Edt_password5.Left = 150;
Edt_password5.Top = 336;
Edt_password5.Width = 100;
Edt_password5.Height = 21;
Edt_password5.Font.Color = clWindowText;
Edt_password5.Font.Height = -11;
Edt_password5.Font.Name = 'MS Sans Serif';
Edt_password5.Font.Style = [];
Edt_password5.ParentFont = False;
Edt_password5.PasswordChar = '';
Edt_password5.TabOrder = 13;
Edt_password5.Text = password5;
line5 = TBevel.Create(LithForm);
line5.Parent = LithForm;
line5.Left = 230;
line5.Top = 334;
line5.Width = 125;
line5.Height = 2;
CheckBox_UN5 = TCheckBox.Create(LithForm);
CheckBox_UN5.Parent = LithForm;
CheckBox_UN5.Left = 365;
CheckBox_UN5.Top = 326;
CheckBox_UN5.Width = 273;
CheckBox_UN5.Height = 20;
CheckBox_UN5.Caption = 'Use This Char';
CheckBox_UN5.Font.Color = clWindowText;
CheckBox_UN5.Font.Height = -14;
CheckBox_UN5.Font.Name = 'times new roman';
CheckBox_UN5.Font.Style = [];
CheckBox_UN5.ParentFont = false;
CheckBox_UN5.checked = uchar5;
Lbl_Title = TLabel.Create(LithForm);
Lbl_Title.Parent = LithForm;
Lbl_Title.Left = 75;
Lbl_Title.Top = 10;
Lbl_Title.Width = 500;
Lbl_Title.Height = 20;
Lbl_Title.Caption = 'User NamePassword Info Only Check One';
Lbl_Title.Font.Color = clWindowText;
Lbl_Title.Font.Height = -20;
Lbl_Title.Font.Name = 'Times New Roman';
Lbl_Title.Font.Style = [];
Lbl_Title.ParentFont = False;
Btn_SAVE = TButton.Create(Lithform);
Btn_SAVE.Parent = Lithform
Btn_SAVE.Left = 500;
Btn_SAVE.Top = 300;
Btn_SAVE.Width = 180;
Btn_SAVE.Height = 50;
Btn_SAVE.Caption = 'SAVE Info';
Btn_SAVE.Default = false;
Btn_SAVE.Font.Color = clWindowText;
Btn_SAVE.Font.Height = -18;
Btn_SAVE.Font.Name = 'scripts';
Btn_SAVE.Font.Style = [];
Btn_SAVE.ParentFont = False;
Btn_SAVE.TabOrder = 7;
Btn_SAVE.OnClick = @SAVEClick;
Btn_SAVE.ModalResult = mrOk;
LithForm.ShowModal;
LithForm.Free;
end;
procedure ButtonClick (sender TObject);
begin
end;
procedure CallDefaultForm;
var
ButtonOK TButton;
begin
Application= GetApplication;
Self= GetSelf;
Form= TForm.Create(nil);
Form.Width = 280;
Form.Height = 130;
Form.Position = poScreenCenter;
Form.BorderStyle = bsDialog;
Form.Caption = 'Ub3r Fighter';
ButtonOK = TButton.Create(Form);
ButtonOK.Left = 0;
ButtonOK.Top = 0;
ButtonOK.Width = 275;
ButtonOK.Height = 100;
ButtonOK.Caption = '- Defaults SET -';
ButtonOK.OnClick = @ButtonClick;
ButtonOK.Parent = Form;
ButtonOK.ModalResult= mrOk;
ButtonOK.Default = False;
Form.ShowModal;
Form.Free;
end;
procedure StartClick (sender TObject);
begin
end;
Procedure Loaduserinf(sender TObject);
begin
CallUserForm;
end;
Procedure BKCLoad(sender TObject);
begin
CallBKCForm;
end;
Procedure SOLoad(sender TObject);
begin
CallSOForm;
end;
Procedure DefaultLoad(sender TObject);
begin
tol=10;
timeout=50;
lftimeout=2;
BoneColor=13487571;
CallDefaultForm;
end;
Procedure Timer1Activate(Sender TObject);
begin
timeed;
end;
Procedure CallMenuForm;
var
Btn_Start,Btn_userinf,Btn_SOLoad,Btn_BKCLoad,Btn_defaultLoad TButton;
begin
Application= GetApplication;
Self= GetSelf;
MenuForm = TForm.Create(nil);
MenuForm.Width = 700;
MenuForm.Height = 440;
MenuForm.Position = poScreenCenter;
MenuForm.BorderStyle = bsDialog;
MenuForm.OnPaint = @FormPaintuea;
MenuForm.Caption = 'Ub3r Fighter By GenoDemoN';
Timer1= TTimer.Create(MenuForm);
Timer1.OnTimer= @Timer1Activate;
Timer1.Enabled=True;
Application.Title= 'Ub3r Fighter By GenoDemoN';
Btn_Start = TButton.Create(MenuForm);
Btn_Start.Parent = MenuForm;
Btn_Start.Left = 5;
Btn_Start.Top = 50;
Btn_Start.Width = 200;
Btn_Start.Height = 50;
Btn_Start.Caption = '~- RUN -~';
Btn_Start.Default = false;
Btn_Start.Font.Color = clWindowText;
Btn_Start.Font.Height = -20;
Btn_Start.Font.Name = 'scripts';
Btn_Start.Font.Style = [];
Btn_Start.ParentFont = False;
Btn_Start.TabOrder = 7;
Btn_userinf = TButton.Create(MenuForm);
Btn_userinf.Parent = MenuForm;
Btn_userinf.Left = 5;
Btn_userinf.Top = 100;
Btn_userinf.Width = 150;
Btn_userinf.Height = 50;
Btn_userinf.Caption = 'User Info';
Btn_userinf.Default = false;
Btn_userinf.Font.Color = clWindowText;
Btn_userinf.Font.Height = -14;
Btn_userinf.Font.Name = 'rockwell';
Btn_userinf.Font.Style = [];
Btn_userinf.ParentFont = False;
Btn_userinf.TabOrder = 7;
Btn_BKCLoad = TButton.Create(MenuForm);
Btn_BKCLoad.Parent = MenuForm;
Btn_BKCLoad.Left = 5;
Btn_BKCLoad.Top = 150;
Btn_BKCLoad.Width = 150;
Btn_BKCLoad.Height = 50;
Btn_BKCLoad.Caption = 'Monster Colors';
Btn_BKCLoad.Default = false;
Btn_BKCLoad.Font.Color = clWindowText;
Btn_BKCLoad.Font.Height = -14;
Btn_BKCLoad.Font.Name = 'rockwell';
Btn_BKCLoad.Font.Style = [];
Btn_BKCLoad.ParentFont = False;
Btn_BKCLoad.TabOrder = 7;
Btn_SOLoad = TButton.Create(MenuForm);
Btn_SOLoad.Parent = MenuForm;
Btn_SOLoad.Left = 5;
Btn_SOLoad.Top = 200;
Btn_SOLoad.Width = 150;
Btn_SOLoad.Height = 50;
Btn_SOLoad.Caption = 'Script Options';
Btn_SOLoad.Default = false;
Btn_SOLoad.Font.Color = clWindowText;
Btn_SOLoad.Font.Height = -14;
Btn_SOLoad.Font.Name = 'rockwell';
Btn_SOLoad.Font.Style = [];
Btn_SOLoad.ParentFont = False;
Btn_SOLoad.TabOrder = 7;
Btn_DefaultLoad = TButton.Create(MenuForm);
Btn_DefaultLoad.Parent = MenuForm;
Btn_DefaultLoad.Left = 5;
Btn_DefaultLoad.Top = 270;
Btn_DefaultLoad.Width = 150;
Btn_DefaultLoad.Height = 50;
Btn_DefaultLoad.Caption = 'Revert to Defaults';
Btn_DefaultLoad.Default = false;
Btn_DefaultLoad.Font.Color = clWindowText;
Btn_DefaultLoad.Font.Height = -14;
Btn_DefaultLoad.Font.Name = 'rockwell';
Btn_DefaultLoad.Font.Style = [];
Btn_DefaultLoad.ParentFont = False;
Btn_DefaultLoad.TabOrder = 7;
Btn_Start.OnClick = @startClick;
Btn_userinf.OnClick = @Loaduserinf;
Btn_BKCLoad.OnClick = @BKCLoad;
Btn_SOLoad.OnClick = @SOLoad;
Btn_DefaultLoad.OnClick = @DefaultLoad;
Btn_Start.ModalResult = mrOk;
MenuForm.ShowModal;
MenuForm.Free;
end;
Procedure Eat;
var cinteger;
begin
writeln('Eat Cycle Start')
OpenBag;
if(EatFood)and(FindColorSpiraltolerance(x,y,FoodInvColor,560,210,730,460,25))then
repeat
OpenBag;
if(FindColorSpiral(x,y,FoodInvColor,560,210,730,460))then
begin
Mouse(x,y,3,3,true);
wait(3000+random(500));
Ate=Ate+1;
end;
c=c+1;
until(GetHp80)or(c5)
OpenBag;
if(not(FindColorSpiral(x,y,FoodInvColor,560,210,730,460)))and(GetHp80)then
LogOut('Low HP and unable to eat');
writeln('Eating Done');
wait(200);
CHP=false;
end;
Procedure RunAway;
begin
writeln('Running Away');
runs=runs+1;
SetRun(true);
Mouse(648+RWX,83+RWY,2,2,true);
wait(2000);
MapFlag;
wait(10000+random(3000));
writeln('Running Back');
Mouse(648-RWX,83-RWY,2,2,true);
wait(2000);
MapFlag;
Run=false;
end;
procedure FindText;
var counter,cinteger; Talked2Randboolean;
begin
if(FindColor(x,y,65535,5,5,514,337))then wait(100)
if(FindColor(x,y,65535,5,5,514,337))and(LogedIn)then
begin
scriptstate=4;
timeed;
RandomCount=RandomCount+1;
GetScreenShot('YellowtextFound',RandomCount);
repeat
counter=counter+2+random(1);
if((x+counter) 515)and((y+18) 338)then
MoveMouseSmoothEx(x+counter,y+15+random(3),1,6,15,20,20);
wait(5);
if(FindColorSpiral(x,y,65280,180,90,320,230))then
break;
if(IsTextAt2(9,9,'Ta',100))then
begin
GetMousePos(x,y);
Mouse(x,y,0,0,false);
Wait(200+random(100));
if(FindBitmap(TalkW,x,y))or(FindBitmap(TalkY,x,y))then
begin
Mouse(x,y,40,5,true);
MapFlag;
wait(1000+random(1000));
while((FindColor(x,y,16711680,5,345,510,465))or Replaces TalkToRand
(FindColor(x,y,16777215,5,345,510,465)))and
(not(GetColor(20,434)=0))and(c=10)do
begin
GetScreenShot('Talked',RandomCount);
Mouse(x,y,50,2,true);
wait(2000+random(1000));
c=c+1;
end;
Talked2Rand=true;
end;
end;
until(counter=250)or(Talked2Rand);
end;
end;
Procedure FindLamp;
begin
while(FindBitmapSpiralTolerance(iLamp,x,y,550,200,745,470,100)) do
begin
Lamps=Lamps+1;
GetScreenshot('Lamp',Lamps);
Mouse(x+random(2),y+random(2),10,10,true);
wait(3000+random(1000));
Mouse(157+random(2),220+random(2),12,12,true)
wait(3000+random(1000));
Mouse(248+random(2),255+random(2),10,2,true);
wait(3000+random(1000));
Mouse(226+random(2),442+random(2),10,3,true);
wait(3000+random(1000));
end;
end;
procedure FindMiscRandoms;
var ax,ayinteger;
begin
if(FindColor(ax,ay,786423,10,350,150,433))then
begin
GetScreenshot('Mod',1);
LogOut('UHOH, A MOD!!!');
end;
if(GetColor(30,418)=0)and(GetColor(72,429)=0)then
begin
GetScreenshot('Dead',1);
LogOut('You are dead!');
end;
if(FindColor(ax,ay,11503238,10,350,479,433))then
begin
GetScreenshot('Mime',1);
LogOut('Mime Found');
end;
end;
Procedure FindRandoms;
begin
LoginIfNeeded;
FindText;
FindBox;
FindMiscRandoms;
end;
Procedure ProgressReport;
begin
if(GetSystemTime-report2 report60000)then
begin
Seconds=(GetSystemTime-ST) div 1000;
Minutes=Seconds div 60;
RHours=Minutes div 60;
Time=inttostr(Seconds)+' Seconds';
if Minutes0 then
begin
RSeconds=Seconds Mod (Minutes60);
Time=inttostr(Minutes)+' Minutes and '+inttostr(RSeconds)+' Seconds';
end;
if RHours0 then
begin
RMinutes=Minutes Mod (RHours60);
RSeconds=Seconds Mod (Minutes60);
Time=inttostr(RHours)+' Hours, '+inttostr(RMinutes)+' Minutes and '+inttostr(RSeconds)+' Seconds';
end;
begin
writeln(' ');
writeln(' ');
writeln(' ');
writeln('=================Progress Report================');
writeln('Worked for '+Time);
writeln('Fought '+inttostr(Killed)+' '+mname+'s');
if(EatFood)then
writeln('Ate '+inttostr(ate)+' pieces of food')
if(bonecollecting)then
writeln('Collected '+inttostr(BonesCollected)+', and buried '+inttostr(BonesBuried)+' bones');
writeln('Handled '+inttostr(RandomCount)+' Randoms, and ran from '+inttostr(runs)+' random events');
writeln('================================================');
Report2=GetSystemTime;
end;
end;
end;
Procedure GetBoneInvColor;
begin
Status('Getting boneinvcolor...');
OpenBag;
MMouse(620,220,10,10);
Wait(500+random(200));
If(IsTextAt2(9,9,'Bury',100))then
begin
BoneInvColor = GetColor(625,230);
Display('BoneInvinColor is '+inttostr(BoneInvColor));
end else
begin
BoneCollecting = false;
Writeln('');
Writeln('No bone in second inv slot!');
Writeln('');
end;
end;
Procedure BoneBurier;
begin
OpenBag;
Wait(200+random(100));
Status('Burying bones...');
If(FindColorSpiral(x,y,(BoneInvColor),555,216,740,465))then
repeat
LastBuried=0;
Mouse(x,y,10,10,true);
Wait(1500+random(300));
BonesBuried=BonesBuried+1;
until(not(FindColorSpiral(x,y,(BoneInvColor),555,216,740,465)));
end;
Procedure BoneCollector;
begin
scriptstate=4;
timeed;
Wait(200+random(100));
Status('Collecting bones...');
x=262;
y=174;
If(FindColorSpiral(x,y,(BoneColor),5,5,515,337))then
begin
Mouse(x,y,5,5,false);
wait(50+random(25));
If(FindBitmapIn(TakeBones,x,y,5,5,515,337))then
begin
Mouse(x,y,0,0,true);
Wait(15+random(5));
BonesCollected=BonesCollected+1;
LastBuried=LastBuried+1;
MapFlag;
wait(500+random(100));
end;
If(FindBitmapIn(TakeBonesY,x,y,5,5,515,337))then
begin
Mouse(x,y,0,0,true);
Wait(15+random(5));
BonesCollected=BonesCollected+1;
LastBuried=LastBuried+1;
MapFlag;
wait(500+random(100));
end;
end;
end;
procedure zonesetup;
var
donesboolean;
begin
repeat
wait(1);
until(FindColorSpiral(ax,ay,65280,240,130,290,175));
FindColorSpiral(ax,ay,65280,240,130,290,175);
refptu=ay;
refptd=ay;
refptr=ax;
refptl=ax;
dones=false;
repeat
refptu=refptu+1;
sleep(1);
If((((getcolor(ax,refptu))=175)=false)and(((getcolor(ax,refptu))=250)=false)) then
begin
refptu=refptu-1;
dones=true;
end;
until(dones);
dones=false;
repeat
refptd=refptd-1;
sleep(1);
If((((getcolor(ax,refptd))=175)=false)and(((getcolor(ax,refptd))=250)=false)) then
begin
refptu=refptu+1;
dones=true;
end;
until(dones);
dones=false;
repeat
refptr=refptr+1;
sleep(1);
If((((getcolor(refptr,ay))=175)=false)and(((getcolor(refptr,ay))=250)=false)) then
begin
refptr=refptr-1;
dones=true;
end;
until(dones);
dones=false;
repeat
refptl=refptl-1;
sleep(1);
If((((getcolor(refptl,ay))=175)=false)and(((getcolor(refptl,ay))=250)=false)) then
begin
refptr=refptl+1;
dones=true;
end;
until(dones);
end;
Procedure zone;
var
u,l,r,d,green,offsinteger;
begin
zone1=false;
zone2=false;
u=110;
l=170;
r=360;
d=360;
offs=3;
green= 65280;
IF (FindColorSpiraltolerance(ax,ay,green,refptl,refptu,refptr,refptd,5)) then
zone1=true;
IF ((FindColorSpiraltolerance(ax,ay,green,l,u,r,refptu-offs,5))or
(FindColorSpiraltolerance(ax,ay,green,l,refptu-offs,refptl-offs,refptd+offs,5))or
(FindColorSpiraltolerance(ax,ay,green,refptr+offs,refptu-offs,r,refptd+offs,5))or
(FindColorSpiraltolerance(ax,ay,green,l,refptd+offs,r,d,5))) then zone2=true;
end;
Procedure Attack;
var
cinteger ;
begin
scriptstate=2;
timeed;
zone;
IF(zone1=false) then
begin
repeat
mcc=mcc+1;
If Mcc11 then
Mcc=1;
case mcc of
1cmc=mcolor1 ;
2cmc=mcolor2 ;
3cmc=mcolor3 ;
4cmc=mcolor4 ;
5cmc=mcolor5 ;
6cmc=mcolor6 ;
7cmc=mcolor7 ;
8cmc=mcolor8 ;
9cmc=mcolor9 ;
10cmc=mcolor10;
11cmc=mcolor11;
end;
until((cmc=0)=false);
If (FindColorSpiraltolerance(x,y,cmc,8,12,516,342,50)) then
begin
FindColorSpiraltolerance(x,y,cmc,8,12,516,342,50);
MoveMouseSmoothEx(x,y,1,5,10,20,10);
i=0;
isenemy=false;
repeat
uberwait(5);
If (Istextat2(9,9,'Attack '+mname,100)) then isenemy= true;
i=i+1;
until((I15)or (isenemy));
If (isenemy) then
begin
if(not FindColor(ax,ay,65280,ax-15,ay-30,ax+10,ay+15))and
(not(FindColor(ax,ay,65280,240,125,270,180)))then
begin
Mouse(x,y,1,1,false);
wait(150+random(50));
if(FindBitmapIn(AttackIt,x,y,10,12,516,342))or
(FindBitmapIn(AttackIt2,x,y,10,12,516,342))then
begin
ak=0;
attacking=true;
C=0;
wait(50+random(25));
Mouse(x,y,5,3,true);
for c=0 to 3 do
if(not (FindColorSpiral(ax,ay,65280,240,125,270,180)))then
begin
MapFlag;
wait(300+random(100));
FindRandoms;
end;
end else
MMouse(5,5,60,60);
end;
end;
end;
end;
end;
procedure Fightmodee;
begin
uberwait(100);
mouse((554+random(9)),(183+random(9)),1,1,true);
uberwait(777);
case fightmode of
1mouse((581+random(28)),(278+random(13)),1,1,true);
2mouse((581+random(28)),(321+random(13)),1,1,true);
3mouse((581+random(28)),(360+random(13)),1,1,true);
4mouse((581+random(28)),(405+random(13)),1,1,true);
end;
uberwait(400);
end;
Procedure Talksss;
begin
IF ((FindColorSpiraltolerance(x,y,255,44,484,62,492,10))=false) then
repeat
mouse(44+random(18),484+random(8),1,1,true);
uberwait(621);
until(FindColorSpiraltolerance(x,y,255,44,484,62,492,10));
IF ((FindColorSpiraltolerance(x,y,255,174,484,191,492,10))=false) then
repeat
mouse(174+random(17),484+random(8),1,1,true);
uberwait(621);
until(FindColorSpiraltolerance(x,y,255,174,484,191,492,10));
IF ((FindColorSpiraltolerance(x,y,255,313,484,330,492,10))=false) then
repeat
mouse(313+random(17),484+random(8),1,1,true);
uberwait(621);
until(FindColorSpiraltolerance(x,y,255,313,484,330,492,10));
end;
procedure runset;
begin
timeed;
mouse(707+random(10),475+random(10),8,8,true);
uberwait(200);
IF ((findcolorspiraltolerance(q,w,1974666,612,257,633,277,30))=false) then
mouse(615+random(15),261+random(10),8,8,true);
uberwait(200);
end;
Procedure WaitWhileAttacking;
var
c,zxinteger;
startboolean;
begin
start=false;
run=false;
CHP=false;
zx=0;
repeat
zone;
zx=zx+1;
sleep(10);
if(zone1)then
start=true
until((start)or (zx100));
if(start)then
begin
scriptstate=3;
If (killed=0) then zonesetup;
Killed=Killed+1;
Attacking=false;
ak=0;
STT=GetSystemTime;
If (true)then
begin
repeat
If ((findcolorspiraltolerance(q,w,2697339,587,175,593,185,20))=false) then
begin
mouse(584+random(8),187+random(10),1,1,true);
uberwait(100);
end;
timeed;
IF ((findcolorspiraltolerance(q,w,2697339,587,175,593,185,30))and (ak=0)) then
begin
getmousepos(q,w);
Ak=1;
IF ((q562)OR(q572)) then
movemousesmooth(562+random(10),247+random(11)+atm);
end;
TT=(GetSystemTime-STT)1000;
if(TTTimeout)then
Run=true;
if(c3)then
begin
FindRandoms;
if(GetHpCriticalHP)then
CHP=true;
c=0;
end;
c=c+1;
fightover=false;
zone;
IF ((zone1) and (zone2=false)) then fightover=true;
IF (zone1=false) then fightover=true;
until(((Fightover))or(Run)or(CHP));
if(Run)then
begin
writeln('Fight lasted too long');
RunAway;
end;
if(CHP)then
Eat;
LastFight=GetSystemTime;
If(BoneCollecting)then
BoneCollector;
uberwait(50);
end;
end;
end;
procedure Checkloginscreen;
var pinteger;
begin
if(FindBitmapspiraltolerance(CloseWindow,x,y,0,0,660,250,10))then
begin
p=0;
status('closing welcome box');
repeat
timeed;
Wait(400+random(100));
Mouse(x,y,40,4,true);
Wait(500);
p=p+1;
until(not FindBitmapspiraltolerance(CloseWindow,x,y,0,0,660,250,10))or(p=3);
end;
end;
procedure LoginIfNeededd;A stupid3ooo procedure based of many others
var counterinteger;
begin
Checkloginscreen;
if(IsTextAt2(293,251,'Username',10))then
begin
Mouse(460,322,10,2,true);
Wait(500+random(500));
end;
if(IsTextAt2(309,241,'Welcome to RuneScape',50))then
begin
Mouse(400,280,125,20,true);
Wait(200+random(100));
if(IsTextAt2(293,251,'Username',50))then
begin
status('Logging in');
Mouse(400,256,20,5,true);
Wait(50+random(25));
sendkeyssilentsmooth(username,5);
Wait(400+random(150));
sendkeyssilentsmooth(chr(13),5);
Wait(400+random(150));
sendkeyssilentsmooth(password,5);
Wait(400+random(100));
Mouse(300,322,20,5,true);
repeat
counter=counter+1
wait(100);
until(FindBitmap(CloseWindow,x,y))or(counter=150)
Checkloginscreen;
end;
end;
end;
Procedure LoadBmps;
begin
CloseWindow = BitmapFromString(43, 4,
'494034808080808080494034494034494034494034808080808080' +
'808080483E33483E33483E33808080808080483E33483E33463D32' +
'483E33483E33483E33808080000000483E33483E33483E33483E33' +
'808080000000483E33483E33000000494034808080808080808080' +
'494034494034494034494034808080808080808080808080494034' +
'000000808080494034494034808080494034000000000000000000' +
'483E33808080483E33000000808080483E33463D32483E33483E33' +
'483E33808080000000483E33808080483E33483E33808080000000' +
'483E33808080483E33494034808080000000000000808080494034' +
'494034808080494034000000808080808080000000494034808080' +
'000000494034494034808080808080494034494034494034808080' +
'808080808080483E33000000483E33483E33483E33483E33808080' +
'000000483E33808080000000483E33808080000000483E33808080' +
'000000483E33808080000000494034808080000000494034808080' +
'000000494034808080808080000000494034808080000000494034' +
'494034494034000000808080494034494034808080000000000000' +
'000000494034483E33483E33483E33483E33483E33808080483E33' +
'808080000000808080483E33000000483E33808080000000483E33' +
'808080000000494034808080000000494034808080000000494034' +
'808080');
TakeBones = BitmapFromString(70, 1,
'FFFFFFFFFFFF0000005D54475D54475D5447FFFFFFFFFFFFFFFFFF' +
'FFFFFF5D54475D54475D5447FFFFFFFFFFFF000000FFFFFFFFFFFF' +
'5D54475D54475D5447FFFFFFFFFFFFFFFFFFFFFFFF5D54475D5447' +
'5D54475D54475D54475D54475D5447FF9040FF9040FF9040FF9040' +
'FF90400000000000005D54475D5447FF9040FF9040FF9040FF9040' +
'5D54475D54475D5447FF9040FF9040FF9040FF9040FF90405D5447' +
'5D54475D54475D5447FF9040FF9040FF9040FF90405D54475D5447' +
'5D54475D5447FF9040FF9040FF9040FF9040FF9040');
TakeBonesY = BitmapFromString(70, 1,
'FFFF00FFFF000000005D54475D54475D5447FFFF00FFFF00FFFF00' +
'FFFF005D54475D54475D5447FFFF00FFFF00000000FFFF00FFFF00' +
'5D54475D54475D5447FFFF00FFFF00FFFF00FFFF005D54475D5447' +
'5D54475D54475D54475D54475D5447FF9040FF9040FF9040FF9040' +
'FF90400000000000005D54475D5447FF9040FF9040FF9040FF9040' +
'5D54475D54475D5447FF9040FF9040FF9040FF9040FF90405D5447' +
'5D54475D54475D5447FF9040FF9040FF9040FF90405D54475D5447' +
'5D54475D5447FF9040FF9040FF9040FF9040FF9040');
AttackIt = BitmapFromString(10, 6,
'FFFFFF5D54475D54475D5447FFFFFFFFFFFF5D54475D54475D5447' +
'5D5447FFFFFFFFFFFF5D54475D5447FFFFFFFFFFFF0000005D5447' +
'5D54475D5447FFFFFFFFFFFF0000005D5447FFFFFFFFFFFF000000' +
'5D54475D54475D5447FFFFFFFFFFFF0000005D5447FFFFFFFFFFFF' +
'FFFFFFFFFFFF5D54475D5447FFFFFFFFFFFF0000005D5447FFFFFF' +
'FFFFFF0000000000000000005D5447FFFFFFFFFFFF0000005D5447' +
'FFFFFFFFFFFF0000005D54475D54475D5447');
AttackIt2 = BitmapFromString(21, 7,
'5D5447FFFF00FFFF000000005D54475D54475D54475D54475D5447' +
'5D54475D54475D54475D54475D54475D54475D54475D54475D5447' +
'5D54475D54475D54475D5447FFFF00FFFF00FFFF00FFFF005D5447' +
'5D54475D5447FFFF00FFFF00FFFF00FFFF005D54475D54475D5447' +
'5D5447FFFF00FFFF00FFFF00FFFF005D54475D5447FFFF00FFFF00' +
'0000000000000000005D5447FFFF00FFFF00000000000000FFFF00' +
'FFFF005D54475D5447FFFF00FFFF00000000000000000000000000' +
'5D5447FFFF00FFFF000000005D54475D54475D54475D5447FFFF00' +
'FFFF00FFFF00FFFF00FFFF000000005D5447FFFF00FFFF00000000' +
'5D54475D54475D54475D5447FFFF00FFFF000000005D54475D5447' +
'5D5447FFFF00FFFF00000000000000FFFF00FFFF000000005D5447' +
'FFFF00FFFF000000005D54475D54475D54475D5447FFFF00FFFF00' +
'0000005D54475D54475D5447FFFF00FFFF000000005D5447FFFF00' +
'FFFF000000005D5447FFFF00FFFF000000005D54475D54475D5447' +
'5D54475D5447FFFF00FFFF00FFFF005D54475D54475D5447FFFF00' +
'FFFF00FFFF00FFFF00FFFF000000005D54475D5447FFFF00FFFF00' +
'FFFF00FFFF005D5447');
TalkW = BitmapFromString(17, 10,
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000000000' +
'000000000000000000000000000000000000FFFFFFFFFFFF000000' +
'000000FFFFFFFFFFFF000000000000000000000000000000000000' +
'000000000000000000000000000000FFFFFFFFFFFF000000000000' +
'FFFFFFFFFFFF000000000000000000000000000000000000000000' +
'000000000000000000000000FFFFFFFFFFFF000000000000FFFFFF' +
'FFFFFF000000000000000000000000000000000000000000000000' +
'000000000000000000FFFFFFFFFFFF000000000000FFFFFFFFFFFF' +
'000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFF000000' +
'000000000000FFFFFFFFFFFF000000000000FFFFFFFFFFFF000000' +
'000000000000FFFFFFFFFFFF000000000000FFFFFFFFFFFF000000' +
'000000FFFFFFFFFFFF000000000000FFFFFFFFFFFF000000000000' +
'000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000' +
'FFFFFFFFFFFF000000000000FFFFFFFFFFFF000000000000000000' +
'FFFFFFFFFFFF000000000000FFFFFFFFFFFF000000000000FFFFFF' +
'FFFFFF000000000000FFFFFFFFFFFF000000000000000000FFFFFF' +
'FFFFFF000000000000FFFFFFFFFFFF000000000000FFFFFFFFFFFF' +
'000000000000FFFFFFFFFFFF000000000000000000000000FFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFFFFFFFF');
TalkY = BitmapFromString(17, 10,
'FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00000000000000000000' +
'000000000000000000000000000000000000FFFF00FFFF00000000' +
'000000FFFF00FFFF00000000000000000000000000000000000000' +
'000000000000000000000000000000FFFF00FFFF00000000000000' +
'FFFF00FFFF00000000000000000000000000000000000000000000' +
'000000000000000000000000FFFF00FFFF00000000000000FFFF00' +
'FFFF00000000000000000000000000000000000000000000000000' +
'000000000000000000FFFF00FFFF00000000000000FFFF00FFFF00' +
'000000000000000000000000FFFF00FFFF00FFFF00FFFF00000000' +
'000000000000FFFF00FFFF00000000000000FFFF00FFFF00000000' +
'000000000000FFFF00FFFF00000000000000FFFF00FFFF00000000' +
'000000FFFF00FFFF00000000000000FFFF00FFFF00000000000000' +
'000000000000FFFF00FFFF00FFFF00FFFF00FFFF00000000000000' +
'FFFF00FFFF00000000000000FFFF00FFFF00000000000000000000' +
'FFFF00FFFF00000000000000FFFF00FFFF00000000000000FFFF00' +
'FFFF00000000000000FFFF00FFFF00000000000000000000FFFF00' +
'FFFF00000000000000FFFF00FFFF00000000000000FFFF00FFFF00' +
'000000000000FFFF00FFFF00000000000000000000000000FFFF00' +
'FFFF00FFFF00FFFF00FFFF00000000000000FFFF00FFFF00');
iLamp = BitmapFromString(17, 6,
'000001000001000001000001BAB815B2B015AEAD15ABAA159C9A12' +
'9291128C8A1275740E000001000001000001000001000001D0CE18' +
'CBC918C8C618C5C418C5C418C0BE18BAB815B5B315ABAA15A3A112' +
'99971292911284820E79780E6968095C5A09A6A415CECC18C5C418' +
'C2C118C0BE18BDBB18BAB815B8B615B5B315B2B015A8A715A3A112' +
'9C9A129594128E8D1281800E999712AEAD15CECC18CBC918C0BE18' +
'BDBB18BAB815B5B315B2B015AEAD15A8A715A3A1129F9E12999712' +
'88860E84820E8C8A129291129C9A12000001CBC918CBC918BAB815' +
'B8B615B5B315B2B015AEAD15A8A715A3A1129C9A1295941281800E' +
'79780E84820E000001000001000001CBC918CBC918C0BE18B8B615' +
'B2B015AEAD15ABAA15A6A4159F9E129997128C8A1279780E75740E' +
'000001000001C2C118');
uafpic= BitmapFromString(160, 25,
'000000000000000000000000000000000000000000000000000000' +
'000000000000000000000000000000000000000000000000000000' +
'000000000000000000000000000000000000000000000000000000' +
'000000000000000000000000000000000000000000000000000000' +
'000000000000000000000000000000000000000000000000000000' +
'000000000000000000000000000000000000000000000000000000' +
'000000000000000000000000000000000000000000000000000000' +
'000000000000000000000000000000000000000000000000000000' +
'000000000000000000000000000000000000000000000000000000' +
'000000000000000000000000000000000000000000000000000000' +
'000000000000000000000000000000000000000000000000000000' +
'000000000000000000000000000000000000000000000000000000' +
'000000000000000000000000000000000000000000000000000000' +
'000000000000000000000000000000000000000000000000000000' +
'000000000000000000000000000000000000000000000000000000' +
'000000000000000000000000000000000000000000000000000000' +
'000000000000000000000000000000000000000000000000000000' +
'000000000000000000000000000000000000000000000000FFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFF000000000000FFFFFFFFFFFFF3F3F36565657F7F7F' +
'717171CBCBCBFFFFFFFFFFFFFFFFFFFFFFFFB2B2B27171717F7F7F' +
'6F6F6FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFE4E4E45A5A5A7979798F8F8FFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF919191' +
'7474747F7F7F7777776F6F6F6F6F6F7171717A7A7A7C7C7C8B8B8B' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'000000000000FFFFFFFFFFFFFFFFFF434343000000000000F0F0F0' +
'FFFFFFFFFFFFFFFFFFFFFFFFFBFBFB000000000000000000FFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFEFEFE505050040404000000131313606060' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFD0D0D0000000000000454545FFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFDFDFD0E0E0E000000' +
'3030307777777171716363630101010000003F3F3FFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000' +
'FFFFFFFFFFFFFFFFFFFFFFFF000000DFDFDFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'BCBCBC000000737373FFFFFFFFFFFF858585000000000000FFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFDADADA000000000000FCFCFCFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF898989000000888888FFFFFF' +
'FFFFFFFFFFFFFFFFFFAAAAAA8F8F8FFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEEEEEEFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFFFFFFFF' +
'FFFFFF979797363636FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFF000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'C1C1C1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF1F1F1000000000000' +
'3D3D3DFFFFFFFFFFFFFFFFFF646464000000878787FFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFF3C3C3C000000585858FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFF808080000000808080FFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFF8585851A1A1AFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFF000000000000FFFFFFFFFFFFFEFEFE000000' +
'F7F7F7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'000000000000FFFFFFFFFFFFD0D0D0000000000000000000FFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF939393E3E3E3' +
'FFFFFFFFFFFF878787000000C5C5C5FFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF555555000000' +
'000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFF808080000000808080FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFC0C0C0000000' +
'000000777777FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFF000000000000FFFFFFFFFFFF3F3F3F1C1C1CFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000' +
'FFFFFFFFFFFFFFFFFFDEDEDE000000575757FFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'070707000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFF000000A2A2A2FFFFFF3A3A3A000000' +
'848484FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF808080' +
'000000808080FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF3F3F3F000000818181' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000' +
'000000FFFFFFFFFFFF000000656565FFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFFFFFFFF' +
'FFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFA6A6A6000000686868FFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFF000000A2A2A2FFFFFFFFFFFF4C4C4C000000000000FFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFCCCCCCBDBDBDFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF808080000000808080' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFF313131F4F4F4FFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFF868686000000898989FFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF808080FFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFF' +
'C4C4C40000007A7A7AFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFF000000000000FFFFFFFFFFFFFFFFFF2C2C2C' +
'1F1F1F4D4D4D0000000000005A5A5AFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFDCDCDC5050503C3C3C000000565656FFFFFFEBEBEBC6C6C6' +
'0F0F0F0000005C5C5C000000000000171717959595FFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF333333373737' +
'FFFFFFFFFFFF7C7C7C6565654E4E4E000000A0A0A0FFFFFFFFFFFF' +
'FFFFFFEFEFEF000000000000474747FFFFFFFFFFFF696969000000' +
'000000B5B5B5000000000000000000000000000000000000000000' +
'000000000000FFFFFFFFFFFFDCDCDC323232000000000000333333' +
'DCDCDCFFFFFFFFFFFFFFFFFF808080000000808080FFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFF5F5F5040404000000000000FFFFFF' +
'C4C4C4000000000000000000000000000000000000000000000000' +
'585858FFFFFF8080800000002A2A2A3232320000000000002C2C2C' +
'AEAEAEFFFFFF434343000000000000000000000000000000000000' +
'0000000000008E8E8EFFFFFFB3B3B33030300000000000005C5C5C' +
'FFFFFFD9D9D97E7E7E0000004F4F4F3A3A3A000000000000494949' +
'FDFDFDFFFFFFFFFFFFFFFFFF000000000000FFFFFF757575000000' +
'818181FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFF000000000000FFFFFFFFFFFF8686860000007E7E7EF3F3F3' +
'FFFFFFB5B5B50000002D2D2DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFF000000010101FFFFFFFFFFFFFFFFFF000000' +
'000000FFFFFFFFFFFF6B6B6B000000A9A9A9FFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFB8B8B8000000FFFFFFFFFFFFB2B2B2' +
'070707FFFFFFDADADA000000070707FFFFFFFFFFFFFFFFFFFFFFFF' +
'828282000000FBFBFBFFFFFFFFFFFFFFFFFF000000000000FFFFFF' +
'FFFFFFFFFFFFFAFAFA191919D3D3D3FFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFA5A5A50000008E8E8EFFFFFFFFFFFF898989000000A5A5A5' +
'FFFFFFFFFFFF808080000000808080FFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFFFFFFFFFFFFFF' +
'FFFFFF1313130A0A0AECECECFFFFFFFFFFFFFFFFFF5F5F5FFFFFFF' +
'808080000000191919F5F5F5FFFFFFFFFFFF050505000000DBDBDB' +
'FFFFFFFFFFFFFFFFFF737373585858FFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFA1A1A10000006868689595957D7D7D000000171717FFFFFF' +
'FFFFFF7F7F7F000000787878FFFFFFFFFFFF000000000000FFFFFF' +
'FFFFFFFFFFFF000000000000FFFFFFA9A9A90000007C7C7CFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000' +
'000000FFFFFFFFFFFF0000002D2D2DFFFFFFFFFFFFFFFFFFFFFFFF' +
'565656000000EBEBEBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFB3B3B3000000848484FFFFFFFFFFFF000000000000FFFFFF' +
'FFFFFF666666000000A5A5A5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFF252525424242FFFFFFF7F7F7000000FFFFFFFFFFFF' +
'FFFFFF2D2D2D000000B6B6B6FFFFFFFFFFFFFFFFFF2C2C2C3E3E3E' +
'FFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFFFFFFFFB9B9B9' +
'000000E8E8E8FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000' +
'424242FFFFFFFFFFFFFFFFFFFFFFFF3F3F3F000000FFFFFFFFFFFF' +
'808080000000808080FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFF000000000000FFFFFFFFFFFFFFFFFF0000000A0A0A' +
'FFFFFFFFFFFFFFFFFFFFFFFFD1D1D14E4E4EFFFFFF808080000000' +
'898989FFFFFFFFFFFFFFFFFFE5E5E5000000505050FFFFFFFFFFFF' +
'070707222222FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000' +
'3737377C7C7C6F6F6F7272727F7F7F686868FDFDFDFFFFFF818181' +
'000000838383FFFFFFFFFFFF000000000000FFFFFFFFFFFFFFFFFF' +
'000000000000FFFFFFF0F0F00000006C6C6CFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFF' +
'A7A7A70000007A7A7AFFFFFFFFFFFFFFFFFFFFFFFF7E7E7E000000' +
'717171FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'000000040404FFFFFFFFFFFF000000000000FFFFFF565656000000' +
'2F2F2FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'0000007F7F7FFFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFFD3D3D3' +
'0000002F2F2FFFFFFFFFFFFFEFEFEF000000757575FFFFFFFFFFFF' +
'FFFFFFFFFFFF000000000000FFFFFFFFFFFF000000535353FFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFA7A7A70000007E7E7EFFFFFF' +
'FFFFFFFFFFFFFFFFFF7B7B7B000000A7A7A7FFFFFF808080000000' +
'808080FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'000000000000FFFFFFFFFFFF5A5A5A000000EFEFEFFFFFFFFFFFFF' +
'FFFFFFFFFFFF858585434343FFFFFF808080000000808080FFFFFF' +
'FFFFFFFFFFFFFFFFFF000000080808FFFFFF787878000000FCFCFC' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFA1A1A1000000898989FFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF8080800000007C7C7C' +
'B6B6B6000000000000C1C1C1FFFFFFFFFFFFFFFFFF000000000000' +
'FFFFFFFFFFFF010101020202FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFF717171000000' +
'858585FFFFFFFFFFFFFFFFFFFFFFFF848484000000A6A6A6FFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000' +
'FFFFFFFFFFFF000000000000000000060606F1F1F1FFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFCECECE000000989898' +
'000000D5D5D5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0B0B0B000000' +
'E8E8E8FFFFFF717171000000828282FFFFFFFFFFFFFFFFFFFFFFFF' +
'000000000000FFFFFF969696000000868686FFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFF727272000000838383FFFFFFFFFFFFFFFFFF' +
'FFFFFF838383000000727272FFFFFF808080000000808080FFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000' +
'FFFFFFFFFFFF010101000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'4F4F4F4B4B4BFFFFFF808080000000808080FFFFFFFFFFFFFFFFFF' +
'FFFFFF000000000000FFFFFF000000000000FFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFF7171710000007E7E7EFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFF8080800000000909090000008D8D8D' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFFFFFFFF' +
'B2B2B2000000B1B1B1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFF000000000000FFFFFFEBEBEB000000636363FFFFFF' +
'FFFFFFFFFFFFFFFFFF626262000000FFFFFFFFFFFFFFFFFF9F9F9F' +
'D8D8D8FFFFFFFFFFFFFFFFFFFFFFFF0000003C3C3CFFFFFFFFFFFF' +
'000000000000FFFFFF0202022D2D2DFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFF7474740000000000009F9F9FFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFAFAFAF000000313131FFFFFF' +
'A6A6A60000007F7F7FFFFFFFFFFFFFFFFFFFFFFFFF000000000000' +
'FFFFFF9D9D9D0000007D7D7DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFE1E1E1000000686868FFFFFFFFFFFFFFFFFFFFFFFF6F6F6F' +
'000000E1E1E1FFFFFF8080800000008A8A8AFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFFFFFFFF' +
'000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000545454' +
'FFFFFF808080000000808080FFFFFFFFFFFFFFFFFFFFFFFF000000' +
'000000FFFFFF000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFEFEFEF000000454545FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'EAEAEAFFFFFF808080000000999999B6B6B6000000B3B3B3FFFFFF' +
'FFFFFFFFFFFFFFFFFF000000000000FFFFFFFFFFFFFFFFFF7A7A7A' +
'000000D9D9D9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFCFCFC464646' +
'000000000000FFFFFFFFFFFF2D2D2D000000FFFFFFFFFFFFFFFFFF' +
'FFFFFF0000009A9A9AFFFFFFAEAEAE000000000000717171FFFFFF' +
'FFFFFFFFFFFF353535000000E3E3E3FFFFFFFFFFFF000000000000' +
'FFFFFFFFFFFF000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFA3A3A30000006B6B6BFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFF000000000000BCBCBCFFFFFF000000' +
'313131FFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFFFFFFFF' +
'000000020202FFFFFFFFFFFFFFFFFFFFFFFF828282FFFFFFFFFFFF' +
'070707000000FFFFFFFFFFFFFFFFFFFFFFFF000000070707FFFFFF' +
'FFFFFF8080800000001F1F1F000000000000000000000000000000' +
'000000FFFFFFFFFFFF000000000000FFFFFFFFFFFF464646000000' +
'B4B4B4FFFFFFFFFFFFFFFFFF0000000000006B6B6BFFFFFF818181' +
'000000818181FFFFFFFFFFFFFFFFFFFFFFFF000000474747FFFFFF' +
'808080000000949494FFFFFFFFFFFFFFFFFFE1E1E1ADADADFFFFFF' +
'3D3D3D000000B8B8B8FFFFFFFFFFFFFFFFFF969696ACACACFFFFFF' +
'818181000000818181FFFFFFA7A7A70000009D9D9DFFFFFFFFFFFF' +
'FFFFFF000000000000FFFFFFFFFFFFFFFFFFFFFFFF9D9D9D000000' +
'1D1D1D6969697171715D5D5D4545454E4E4EFFFFFF000000000000' +
'FFFFFFFFFFFFFFFFFF2D2D2D0000006B6B6B707070000000818181' +
'FFFFFFFFFFFFFFFFFFA6A6A6000000000000666666737373000000' +
'000000DEDEDEFFFFFFFFFFFFFFFFFF000000000000FFFFFFFFFFFF' +
'FFFFFF0000000000004F4F4FC3C3C3FFFFFFFFFFFFFFFFFFFFFFFF' +
'E8E8E8131313FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFF666666000000000000FDFDFDC4C4C4000000222222' +
'7272725555559C9C9C000000000000FFFFFFFFFFFFE5E5E5000000' +
'0000006E6E6E616161000000A0A0A0FFFFFFFFFFFFFFFFFF222222' +
'000000717171707070000000222222FFFFFFFFFFFFFFFFFF808080' +
'0000008A8A8AFFFFFFFFFFFFECECEC353535000000ECECECFFFFFF' +
'FFFFFF000000000000FFFFFFFFFFFFFFFFFF0000000000006A6A6A' +
'5A5A5A373737F1F1F1000000707070FFFFFF7070700000006A6A6A' +
'FFFFFFFFFFFFFFFFFFE2E2E2000000646464FFFFFFFFFFFF5C5C5C' +
'0000004343437676762F2F2F070707FFFFFFFFFFFFFFFFFF474747' +
'0000004F4F4F7474742A2A2A5C5C5CFFFFFFFFFFFF6B6B6B000000' +
'707070FFFFFFFFFFFF9D9D9D0000002A2A2A7A7A7AFFFFFF000000' +
'000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFDCDCDC838383' +
'646464CFCFCFFFFFFFFFFFFFFFFFFF6F6F6F6F6F6FFFFFFFFFFFFF' +
'FFFFFFFFFFFFF1F1F17F7F7F888888FAFAFAFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFE7E7E7848484636363E1E1E1FFFFFFFFFFFF' +
'FFFFFFFFFFFFC5C5C5757575737373E5E5E5FFFFFFFFFFFFFFFFFF' +
'A5A5A5EBEBEBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFDFDFDFDFDFD' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'F0F0F0737373797979737373FFFFFFFFFFFF9D9D9D606060E8E8E8' +
'FFFFFF6F6F6F757575C5C5C5FFFFFFFFFFFFFFFFFFCDCDCD616161' +
'B4B4B4FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE8E8E8808080' +
'808080E7E7E7FFFFFFFFFFFFFFFFFFFFFFFF808080000000808080' +
'FFFFFFFFFFFFFFFFFFFFFFFFEEEEEEFFFFFFFFFFFFDEDEDE737373' +
'757575CCCCCCFFFFFFFFFFFFFFFFFF777777838383E6E6E6FFFFFF' +
'E2E2E2000000DEDEDEFFFFFF959595777777888888FFFFFFFFFFFF' +
'FFFFFFB5B5B56F6F6FC1C1C1FFFFFFFFFFFFFFFFFFF4F4F48D8D8D' +
'7E7E7EE1E1E1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF4F4F4818181' +
'8F8F8FF3F3F3FFFFFFFFFFFFFFFFFF7F7F7F787878959595FFFFFF' +
'FFFFFFFFFFFFE0E0E0B8B8B8FFFFFFFFFFFF000000000000FFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFF808080000000808080FFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFF818181787878FFFFFFFFFFFFFFFFFF6E6E6E000000' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFF808080000000787878FFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF979797' +
'000000FCFCFCFFFFFFFFFFFFFFFFFF0000007E7E7EFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFF000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'777777000000C3C3C3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF6F6F6F0000006C6C6C' +
'FFFFFFFFFFFF3C3C3C000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF919191FFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFA5A5A5232323000000070707' +
'797979FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000000000000000' +
'000000000000000000000000000000000000000000000000000000' +
'000000000000000000000000000000000000000000000000000000' +
'000000000000000000000000000000000000000000000000000000' +
'000000000000000000000000000000000000000000000000000000' +
'000000000000000000000000000000000000000000000000000000' +
'000000000000000000000000000000000000000000000000000000' +
'000000000000000000000000000000000000000000000000000000' +
'000000000000000000000000000000000000000000000000000000' +
'000000000000000000000000000000000000000000000000000000' +
'000000000000000000000000000000000000000000000000000000' +
'000000000000000000000000000000000000000000000000000000' +
'000000000000000000000000000000000000000000000000000000' +
'000000000000000000000000000000000000000000000000000000' +
'000000000000000000000000000000000000000000000000000000' +
'000000000000000000000000000000000000000000000000000000' +
'000000000000000000000000000000000000000000000000000000' +
'000000000000000000000000000000000000000000000000000000' +
'000000000000000000000000');
ueapicc = BitmapFromString(100, 75,
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFE3E3E3373737111111000000111111000000FFFFFFD1D1D1' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFB7B7B7000000B7B7B7F9F9F9BDBDBDFFFFFFFFFFFF000000' +
'1A1A1A353535FFFFFFFFFFFFE1E1E1FFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'DFDFDF3B3B3B020202FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFF5F5F59999990B0B0B0000007575750808080B0B0B313131' +
'A3A3A3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'E7E7E7A1A1A1757575797979FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFF2E2E2E818181FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFF3C3C3CF8F8F8FFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFBFBFBF080808FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFD3D3D3BFBFBFA9A9A9636363' +
'656565676767787878BFBFBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF9F9F9' +
'0E0E0E797979BDBDBDE1E1E13C3C3C2020209B9B9BFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFF262626C7C7C7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFD8D8D8D5D5D5FCFCFCFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFDDDDDD555555767676FFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFD3D3D3959595616161' +
'5D5D5D8D8D8DCFCFCFFFFFFFE1E1E14646464343436D6D6DB1B1B1' +
'AFAFAFDCDCDCADADADCDCDCD6B6B6B2222226969695D5D5DBFBFBF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFC5C5C5' +
'222222F8F8F8FFFFFFFFFFFFFFFFFFFFFFFFCDCDCD1A1A1AC9C9C9' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFF939393939393FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFF999999C5C5C5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF6B6B6BFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFEFEFEF5D5D5D3B3B3B3B3B3B444444232323737373696969' +
'E1E1E1FFFFFFBDBDBD919191575757040404FFFFFFA5A5A5D1D1D1' +
'D6D6D6BBBBBBFFFFFFB5B5B5D6D6D6DFDFDFCBCBCBF0F0F0DEDEDE' +
'6464648181813535355D5D5DEBEBEBFFFFFFFFFFFFFFFFFFF6F6F6' +
'353535FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE1E1E1' +
'292929DFDFDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFF040404F2F2F2FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFF2F2F2B3B3B3818181FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0F0F0242424' +
'FFFFFFFFFFFFFFFFFFFFFFFFB3B3B3FFFFFFFFFFFFFFFFFFF5F5F5' +
'7979791F1F1F656565E5E5E5C5C5C5FAFAFAAFAFAFCDCDCDC3C3C3' +
'C9C9C9B3B3B3CCCCCCE4E4E4FFFFFF939393DDDDDD1D1D1D343434' +
'777777E8E8E8B1B1B1EAEAEAECECECA1A1A1ABABAB8D8D8DE6E6E6' +
'E4E4E4BFBFBFDADADAC9C9C9E3E3E3979797000000535353ABABAB' +
'262626FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFDEDEDE313131FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFF8989895D5D5DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFE4E4E4C3C3C3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'7F7F7F6565657171714343436B6B6B595959555555636363BDBDBD' +
'060606DEDEDEB5B5B5DADADAD0D0D0B9B9B9CFCFCFBDBDBDD1D1D1' +
'EEEEEE9D9D9DFFFFFFB1B1B1CBCBCBFAFAFABBBBBBE8E8E8F6F6F6' +
'BFBFBF4141416161610C0C0C9F9F9FC7C7C7E7E7E7C3C3C3C1C1C1' +
'E4E4E4E4E4E4D1D1D1D4D4D4A7A7A7C5C5C5FFFFFFD3D3D3ECECEC' +
'474747000000070707ADADADFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFF1C1C1CFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFD6D6D6525252FFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFF646464FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFE5E5E5898989696969FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFE6E6E6C9C9C98585853D3D3DF7F7F7D7D7D7B5B5B5CBCBCB' +
'818181797979676767BBBBBBF2F2F2D0D0D0CECECEE7E7E7B9B9B9' +
'D2D2D2BDBDBDADADADB3B3B3D2D2D2CECECEE4E4E4A1A1A1CCCCCC' +
'FCFCFCA5A5A5E4E4E4C3C3C3FFFFFF959595575757232323A3A3A3' +
'BBBBBBE4E4E4BBBBBBBDBDBDC9C9C9BBBBBB5353531E1E1E656565' +
'BDBDBDBFBFBFF5F5F5FFFFFF7171715E5E5EFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFF6666667B7B7BFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFEFEFE525252FFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFACACACFFFFFFFFFFFFF6F6F6000000' +
'3B3B3B757575AFAFAFC5C5C5DFDFDF5D5D5D464646D9D9D9FFFFFF' +
'FFFFFFD7D7D7FAFAFAADADADFFFFFFE1E1E1393939222222A7A7A7' +
'FCFCFCCDCDCDF2F2F2E9E9E92121217D7D7DABABABDADADAF0F0F0' +
'BDBDBDD3D3D3A5A5A58C8C8CECECECD0D0D0B5B5B5E5E5E5C1C1C1' +
'FFFFFF000000B9B9B9C0C0C0C5C5C5D5D5D5FAFAFAE0E0E0D3D3D3' +
'ADADAD0000000B0B0BBFBFBFD7D7D74D4D4D5F5F5FF1F1F1FFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF525252FFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF303030FFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF222222FFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFCFCFCFFFFFFFFFFFFFFFFFFFB0B0B0' +
'FBFBFB4B4B4B303030A9A9A9ABABABFFFFFFD6D6D6CACACA5F5F5F' +
'9595955B5B5BE2E2E2EAEAEAFCFCFCD5D5D5FFFFFFC0C0C0FFFFFF' +
'373737686868121212E4E4E4CBCBCB999999FFFFFFA7A7A7636363' +
'636363999999F9F9F9F9F9F9ECECECE4E4E4BBBBBBD3D3D3FFFFFF' +
'7979792F2F2F000000FCFCFCB3B3B36A6A6A898989323232959595' +
'939393616161B3B3B3FFFFFF7C7C7C363636DDDDDDFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF4C4C4C' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF6C6C6CFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF020202FFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFA3A3A3FFFFFFFFFFFF' +
'B6B6B6B9B9B9B5B5B5DBDBDB6565657D7D7DF3F3F3D9D9D9EAEAEA' +
'D9D9D9E1E1E1B3B3B3393939515151E7E7E7FFFFFF9D9D9D919191' +
'5C5C5CD5D5D5757575616161B3B3B3333333B3B3B3FFFFFFF0F0F0' +
'F0F0F0F8F8F88181813E3E3E101010C5C5C5F0F0F0919191A1A1A1' +
'FEFEFE262626000000333333232323818181ADADADBBBBBBEBEBEB' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000CFCFCFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'A7A7A7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF040404' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFD1D1D1' +
'000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF8B8B8BE7E7E7FFFFFF' +
'FFFFFFB1B1B1FFFFFFB1B1B1A5A5A5FFFFFFCFCFCF7D7D7D393939' +
'D1D1D1CDCDCD717171FFFFFFC5C5C5A9A9A90000006E6E6EBABABA' +
'FFFFFFE1E1E1FFFFFFA5A5A5C4C4C4FFFFFFBFBFBFB5B5B5000000' +
'575757B3B3B3C2C2C2E0E0E0FFFFFF9D9D9D000000000000BFBFBF' +
'FFFFFF9393936363634A4A4AFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF1C1C1CFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFEFEFEAFAFAFB7B7B7FFFFFFFFFFFFFFFFFF' +
'FFFFFF5A5A5AFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'3E3E3EFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFF9B9B9B7F7F7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFC0C0C0' +
'FFFFFFFFFFFFB6B6B6C3C3C36A6A6A0000001B1B1B808080E6E6E6' +
'8B8B8B4F4F4F515151B7B7B7FFFFFFE9E9E9D2D2D2FFFFFFABABAB' +
'FFFFFF393939161616898989FAFAFA9D9D9DDCDCDCFAFAFAE0E0E0' +
'FFFFFFABABAB7B7B7B737373696969919191737373FFFFFF7A7A7A' +
'E7E7E72D2D2DABABABF0F0F0CFCFCFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFB5B5B5FFFFFF' +
'FFFFFFFFFFFFFFFFFFBFBFBF585858F6F6F6606060939393FFFFFF' +
'FFFFFFFFFFFF606060FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'E7E7E7161616FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFF6F6F6000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'C3C3C3FFFFFFFFFFFFBEBEBECCCCCC878787000000000000323232' +
'FDFDFDB9B9B9FFFFFFDCDCDC6969694A4A4A9F9F9FCFCFCFAFAFAF' +
'7D7D7DC8C8C8717171A6A6A6434343B5B5B5E8E8E8FEFEFEDBDBDB' +
'D7D7D7FFFFFFF0F0F0FFFFFF7F7F7FC4C4C4FFFFFFFFFFFFFFFFFF' +
'7A7A7A000000CDCDCDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFBDBDBD333333797979FFFFFF' +
'FFFFFFFFFFFFFFFFFFCCCCCC606060E8E8E80C0C0CFAFAFA393939' +
'FFFFFFFFFFFFFFFFFF606060FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFDDDDDD000000B9B9B9FFFFFFFFFFFF' +
'FFFFFFCACACAFFFFFFFFFFFF666666878787A1A1A14A4A4A000000' +
'000000D3D3D3BDBDBDDEDEDEE6E6E6CFCFCFE6E6E65454543A3A3A' +
'898989C1C1C1B5B5B5DDDDDD3F3F3F9999997F7F7F000000B9B9B9' +
'DCDCDCFFFFFFCFCFCFFFFFFFB7B7B7666666BEBEBEFFFFFFFFFFFF' +
'FFFFFF707070767676FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFCFCFCB9B9B99393932F2F2FC5C5C5AFAFAF8B8B8B838383' +
'FFFFFFFFFFFFFFFFFFFFFFFFCECECEB3B3B36565651C1C1CDFDFDF' +
'020202FFFFFFFFFFFFFFFFFF606060FFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFBCBCBC939393FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFC1C1C18181810606068B8B8B' +
'E1E1E1D5D5D57575759B9B9BFFFFFF6C6C6CCDCDCD4E4E4E1A1A1A' +
'000000282828BFBFBFA9A9A9E8E8E8E1E1E1222222F8F8F8D5D5D5' +
'FFFFFFB9B9B94141415151516767679D9D9DADADAD919191D7D7D7' +
'626262FFFFFF9F9F9FFFFFFFDCDCDCB5B5B5C6C6C6B3B3B3FFFFFF' +
'FFFFFFFFFFFF6C6C6C919191FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'939393B7B7B77D7D7DA5A5A5CACACA9F9F9FCFCFCFA9A9A9CDCDCD' +
'616161FFFFFFFFFFFFFFFFFFFFFFFFACACACFBFBFB343434BDBDBD' +
'9F9F9FD9D9D9FFFFFFFFFFFFFFFFFF606060FFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFF575757FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFEEEEEE262626ABABABB9B9B9FFFFFF' +
'FFFFFFFFFFFF7F7F7FC4C4C4CCCCCCECECEC6666664A4A4AE8E8E8' +
'000000000000383838A9A9A9939393DADADAA1A1A1222222CDCDCD' +
'CCCCCCFFFFFF878787C5C5C53E3E3EFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFF6C6C6CC6C6C6FFFFFFF8F8F8CFCFCFFCFCFCB5B5B5E1E1E1' +
'FFFFFFFFFFFFFFFFFF606060FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'CACACADFDFDFFFFFFF747474141414D4D4D4A5A5A55D5D5DCDCDCD' +
'DDDDDD9D9D9DFFFFFFFFFFFFFFFFFFFFFFFFDCDCDCC3C3C3E9E9E9' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF606060FFFFFFFFFFFF' +
'FFFFFFFFFFFFE2E2E27D7D7D404040B5B5B5FFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF7F7F7FCECECEFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFCCCCCCFFFFFFD1D1D1363636646464' +
'0000006666665757576B6B6B999999C3C3C3C3C3C39191912A2A2A' +
'AFAFAFD6D6D6CDCDCD000000DDDDDD6C6C6CFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFF181818FFFFFFFFFFFF9B9B9B606060FFFFFFB1B1B1' +
'F3F3F3FFFFFFFFFFFFFFFFFF686868FFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFF4C4C4CFFFFFFD3D3D39191917B7B7BBFBFBF777777060606' +
'A3A3A3B1B1B1000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF606060FFFFFF' +
'FFFFFFDBDBDBC1C1C1C0C0C0FFFFFFFFFFFFE9E9E9383838898989' +
'D5D5D5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEAEAEA505050FFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFF9595957F7F7FFFFFFFFFFFFF5A5A5A' +
'A5A5A52A2A2A0000002A2A2ABFBFBFF5F5F5E9E9E9C5C5C5919191' +
'2626260E0E0EEAEAEAA1A1A1141414C3C3C36A6A6AFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFF686868FFFFFF636363161616989898A1A1A1' +
'B8B8B8FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFF4F4F4DFDFDF323232959595464646A9A9A9616161CFCFCF' +
'696969BBBBBBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF626262' +
'FCFCFCF4F4F4BDBDBDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFF474747E6E6E6FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'000000F7F7F7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'8383838F8F8F0E0E0E1A1A1AABABABB3B3B38B8B8BD6D6D6959595' +
'999999FCFCFC000000D3D3D3BFBFBF000000BFBFBF6C6C6CFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFF7878787B7B7BCFCFCFA3A3A3666666' +
'FEFEFEB3B3B3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFA5A5A5FFFFFF7D7D7D696969818181D5D5D5E5E5E5' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFAFAFA8F8F8F3B3B3B5B5B5BB6B6B6FFFFFFFFFFFF' +
'646464EDEDEDC0C0C0FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFF2C2C2CCECECEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFD7D7D7F8F8F8FFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFF343434C1C1C1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFF8B8B8BFFFFFFFFFFFF7B7B7BFFFFFF9B9B9BC1C1C1E8E8E8' +
'919191A9A9A9E9E9E90C0C0CD5D5D5CBCBCB898989FFFFFF4E4E4E' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000BDBDBDD7D7D7E9E9E9' +
'C7C7C7737373C0C0C0EFEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFF4F4F4BBBBBBFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'E8E8E8414141414141BDBDBDB3B3B3656565FFFFFFAFAFAFFFFFFF' +
'FFFFFF666666D1D1D1E0E0E0FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'A7A7A72C2C2C404040FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFCBCBCB6E6E6EFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFF535353898989FFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFF919191B8B8B8BBBBBBDBDBDBFFFFFFFFFFFFB0B0B0' +
'FFFFFFB9B9B9EEEEEEC9C9C9000000A3A3A3999999939393C2C2C2' +
'3A3A3AFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF2A2A2AC9C9C9959595' +
'FFFFFFD7D7D7C5C5C5A9A9A9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF9D9D9D939393FFFFFFFFFFFF' +
'FFFFFFAFAFAFF2F2F2FFFFFFFFFFFFBCBCBCC5C5C5D4D4D4B3B3B3' +
'FFFFFFFFFFFF626262FFFFFFBDBDBDFFFFFFFFFFFFB7B7B75D5D5D' +
'4444448B8B8BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFADADADFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF8F8F88F8F8F606060FFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFA1A1A1676767FFFFFF' +
'FFFFFFFFFFFFFFFFFF777777F2F2F2ADADAD838383494949959595' +
'B9B9B9FEFEFE9D9D9DCECECED5D5D5B3B3B3DCDCDCA7A7A7FFFFFF' +
'FFFFFF6A6A6AFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF6A6A6AFFFFFF' +
'FFFFFFB9B9B95A5A5AC9C9C9414141FFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFBFBFBF5959595353530000000000001A1A1AFFFFFF' +
'FFFFFFFFFFFFB8B8B8999999FFFFFFFEFEFE818181CDCDCD6E6E6E' +
'D8D8D8FFFFFFFFFFFF646464FFFFFFFFFFFF505050585858BBBBBB' +
'E7E7E7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFCBCBCB2828287D7D7D' +
'FAFAFAEEEEEEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF5D5D5D' +
'797979FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFD5D5D5' +
'4A4A4AFFFFFFFFFFFFFFFFFF626262F6F6F6919191B3B3B3CBCBCB' +
'A9A9A9E6E6E6C6C6C6CFCFCFE4E4E4CDCDCDD1D1D1D6D6D6919191' +
'CDCDCDFFFFFF343434FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF444444' +
'676767424242A5A5A5F8F8F8FFFFFFB8B8B8FFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFC5C5C5' +
'8787874F4F4F000000999999353535343434A1A1A19B9B9B8B8B8B' +
'FFFFFFFFFFFFFFFFFFB4B4B4D3D3D3999999838383FFFFFF858585' +
'FFFFFF7F7F7FFAFAFAFFFFFF262626FFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFF6F6F6CBCBCB555555000000FFFFFF' +
'B5B5B5E4E4E4BFBFBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFB7B7B7' +
'FFFFFF5D5D5D676767FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFDFDFDFFFFFFFFFFFFFFFFFFF686868BFBFBFADADADA7A7A7' +
'D8D8D89F9F9FFFFFFFE0E0E0E0E0E0E2E2E2CDCDCDE8E8E8BCBCBC' +
'959595D4D4D4D4D4D4545454FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'3A3A3AFFFFFFFFFFFFFFFFFF555555C2C2C2B7B7B7FFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000' +
'2C2C2C525252464646BFBFBFDBDBDBC5C5C5FFFFFFA5A5A5D9D9D9' +
'757575FFFFFFFFFFFFFFFFFFAFAFAFFFFFFFFFFFFFB8B8B86B6B6B' +
'959595898989DFDFDFD2D2D2636363F1F1F1FFFFFFFFFFFFFFFFFF' +
'A7A7A7DDDDDDC7C7C7858585545454CDCDCD0202028F8F8FFFFFFF' +
'A5A5A5FFFFFFC1C1C1F8F8F8FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFF9F9F9FFFFFFF161616818181FEFEFEFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF5C5C5CFFFFFFBBBBBB' +
'D6D6D6D4D4D4BFBFBFE4E4E4B7B7B7E4E4E4CDCDCDB7B7B7CACACA' +
'BBBBBB919191D2D2D2F4F4F4505050FFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFF3A3A3AE3E3E3A5A5A58F8F8FC1C1C19D9D9DBABABAFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'0C0C0C8B8B8BCDCDCDF5F5F5FFFFFFE1E1E1D6D6D68D8D8DFEFEFE' +
'242424C1C1C1FFFFFFFFFFFFFFFFFFB0B0B0FFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFD6D6D6ABABABCACACAFFFFFFFFFFFFFFFFFFBBBBBB' +
'D7D7D7E1E1E1FFFFFFFFFFFFFFFFFFFFFFFFE1E1E1FDFDFDA9A9A9' +
'4C4C4CFFFFFFA5A5A5FFFFFFBDBDBDFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFCFCFCFFFFFFFE7E7E7FFFFFF585858B1B1B1E2E2E2FFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFAFAFAFC5C5C5' +
'A9A9A9BDBDBDA7A7A78F8F8FD6D6D6898989ECECECCFCFCFD1D1D1' +
'FFFFFFFFFFFFB9B9B9D2D2D2C3C3C3545454FFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFF747474939393A3A3A3ADADAD5A5A5A3E3E3ECACACA' +
'F1F1F1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFF4646465B5B5BEDEDEDADADAD6F6F6FD9D9D9BBBBBB5A5A5A' +
'CBCBCBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFA5A5A5FFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFB5B5B5515151EAEAEAFFFFFFFFFFFFA9A9A9' +
'3D3D3D4F4F4FF5F5F5FFFFFFFFFFFF818181000000DFDFDFEBEBEB' +
'252525333333878787FFFFFFA5A5A5FCFCFCFFFFFFFFFFFFFFFFFF' +
'FFFFFFD3D3D3FFFFFFBBBBBBFFFFFFD3D3D3FFFFFF282828B5B5B5' +
'FAFAFAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF656565' +
'6D6D6DAFAFAFEAEAEAD5D5D5B9B9B9EAEAEAC3C3C3B9B9B9BCBCBC' +
'838383FFFFFF7F7F7FD4D4D4D5D5D5CBCBCB545454FFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFF363636FFFFFF4B4B4B444444D9D9D9DBDBDB' +
'7B7B7BF6F6F6FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFA5A5A5BDBDBD4E4E4E7D7D7DC3C3C3ADADADFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFBFBFBF0C0C0CFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFF151515555555EEEEEEFFFFFFB7B7B7' +
'A1A1A10000000000008B8B8BCDCDCD0000008B8B8BFFFFFFF3F3F3' +
'262626EEEEEEBFBFBFFFFFFFA1A1A1FFFFFFA1A1A1FFFFFFFFFFFF' +
'FFFFFFFFFFFFD9D9D9F0F0F0DDDDDDF0F0F0DBDBDBF0F0F0FBFBFB' +
'2C2C2CB3B3B3FAFAFAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF2F2F2' +
'8F8F8FA1A1A1B5B5B5F3F3F3B5B5B5E8E8E8D1D1D18B8B8BD3D3D3' +
'E8E8E8D2D2D2E2E2E2B9B9B9ECECECA5A5A59D9D9D585858FFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFF4E4E4E818181FFFFFF8B8B8BA5A5A5' +
'575757595959FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFB1B1B1BBBBBBFCFCFCFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF6565656F6F6F9F9F9FFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFAFAFAF777777' +
'8F8F8FFFFFFFC5C5C5454545C7C7C7E5E5E55D5D5DC1C1C1535353' +
'C1C1C1D9D9D9C9C9C9E9E9E9A3A3A3FFFFFF9F9F9FFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFDDDDDDF0F0F0DFDFDFF4F4F4DDDDDDF0F0F0' +
'F6F6F6FDFDFD2E2E2EAFAFAFF8F8F8FFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFEFEFE979797414141818181CBCBCBF2F2F2D3D3D3C1C1C1' +
'EAEAEACECECEB7B7B7D0D0D0CECECED0D0D0BFBFBFB3B3B3545454' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000007575752B2B2B636363' +
'8F8F8FBFBFBF515151FFFFFFFFFFFFFFFFFFF2F2F2E1E1E1FFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFA1A1A13F3F3F696969FFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFCDCDCD0000003D3D3D' +
'B9B9B9B3B3B33B3B3BB7B7B7F9F9F9FFFFFF8D8D8D9D9D9D9F9F9F' +
'FFFFFFA7A7A7FFFFFFF0F0F0DDDDDDFFFFFFD3D3D3FFFFFF9F9F9F' +
'FFFFFFFFFFFFFFFFFFFFFFFFA3A3A3FFFFFFA7A7A7E3E3E3C1C1C1' +
'F8F8F8BFBFBFE3E3E3DFDFDF5B5B5BC3C3C3F8F8F8FFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFD1D1D17D7D7DB5B5B5626262575757B7B7B7' +
'939393BCBCBCB6B6B6D3D3D3B5B5B5E8E8E8C1C1C1D5D5D5E1E1E1' +
'686868FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF6A6A6A939393878787' +
'C9C9C96B6B6BE6E6E67D7D7DFFFFFFFFFFFFFFFFFFB8B8B85C5C5C' +
'FFFFFFFFFFFFFFFFFFC7C7C7DADADAFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFCDCDCD838383838383B5B5B5FFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFD5D5D5D1D1D11616166F6F6FB1B1B1' +
'FFFFFFC5C5C5E3E3E3FFFFFF585858959595707070979797D1D1D1' +
'FFFFFFD1D1D1FFFFFF9F9F9FFFFFFFA7A7A7DFDFDFDFDFDFBFBFBF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFCFCFCFFFFFFFD3D3D3' +
'FFFFFFD1D1D1FFFFFFD3D3D3FFFFFFEFEFEF5A5A5AB1B1B1FAFAFA' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF4F4F4FFFFFF1F1F1F7B7B7B' +
'A3A3A3BBBBBBDADADAEDEDEDE4E4E4D1D1D1F4F4F4525252C9C9C9' +
'AFAFAF6A6A6AFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0E0E0EB7B7B7' +
'FFFFFF575757878787D3D3D3707070FFFFFFFFFFFFFFFFFFBEBEBE' +
'6C6C6CFFFFFFFFFFFFFFFFFF7F7F7FD8D8D8A7A7A7FFFFFFFFFFFF' +
'6767675757579F9F9FFCFCFCFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFF5F5F5959595232323191919FFFFFFB3B3B3' +
'FFFFFFE7E7E7FFFFFFD5D5D5EEEEEEFEFEFEDDDDDDFFFFFFABABAB' +
'FFFFFF727272FFFFFF9F9F9FFFFFFFB7B7B7FFFFFFD5D5D5F6F6F6' +
'DFDFDFD3D3D3FFFFFFFFFFFFFFFFFFFFFFFF878787FFFFFFBBBBBB' +
'FFFFFFA1A1A1FFFFFFD3D3D3FFFFFFA3A3A3FFFFFFF8F8F8141414' +
'B5B5B5FCFCFCFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFD4D4D4' +
'C5C5C57272722D2D2D8B8B8B979797D8D8D8A5A5A5B1B1B1343434' +
'CBCBCBABABAB6A6A6AFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF484848' +
'CFCFCFFFFFFF1F1F1FFFFFFF3A3A3AFFFFFFFFFFFFFFFFFFFFFFFF' +
'C8C8C8343434FFFFFFFFFFFFA3A3A3F4F4F4999999FFFFFF525252' +
'4F4F4FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFF3F3F3515151000000A1A1A1F3F3F3FFFFFFA3A3A3' +
'FFFFFFB7B7B7FFFFFF9F9F9FFFFFFFEBEBEBEEEEEEFFFFFFCFCFCF' +
'FFFFFFCFCFCFFFFFFF9F9F9FFFFFFF707070FFFFFF9F9F9FFFFFFF' +
'D5D5D5DBDBDBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFD5D5D5' +
'E2E2E2C1C1C1FCFCFCD9D9D9E0E0E0C3C3C3E4E4E4DBDBDBDFDFDF' +
'FFFFFF2A2A2A9B9B9BFCFCFCFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFBDBDBD878787ABABAB6B6B6BD0D0D0BFBFBFE7E7E7' +
'0C0C0CF6F6F6FFFFFF626262FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFF2828286363637777773F3F3FFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFF898989ADADADC7C7C7FFFFFFFFFFFFBFBFBFE0E0E0CCCCCC' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFC7C7C73434344B4B4B979797FFFFFFB1B1B1FEFEFEA1A1A1' +
'FFFFFFCFCFCFFFFFFFE7E7E7FFFFFF9F9F9FFFFFFFD5D5D5D7D7D7' +
'FFFFFFCFCFCFFFFFFF9F9F9FFFFFFFB7B7B7FFFFFFB7B7B7FFFFFF' +
'9F9F9FFFFFFFD7D7D7D7D7D7FFFFFFFFFFFFFFFFFFFFFFFFD1D1D1' +
'F7F7F7DDDDDDDCDCDCDEDEDEDBDBDBDFDFDFDCDCDCE2E2E2DFDFDF' +
'DFDFDFD7D7D7FFFFFF2A2A2AB7B7B7E2E2E2FFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFD5D5D5626262B3B3B33D3D3DD5D5D5' +
'DFDFDF9D9D9DD4D4D4D2D2D2686868FFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFF000000656565000000050505B7B7B7202020595959' +
'7F7F7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'DADADA787878393939AFAFAFFFFFFFDBDBDBFFFFFFDFDFDFD5D5D5' +
'FFFFFF9F9F9FFFFFFF9F9F9FFFFFFF9F9F9FFFFFFFE7E7E7FFFFFF' +
'D7D7D7EEEEEEFFFFFFCFCFCFFFFFFF878787FFFFFF878787FFFFFF' +
'9F9F9FFFFFFFB7B7B7FFFFFFD5D5D5FFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFDADADAD7D7D7FFFFFFBBBBBBFFFFFFD3D3D3FFFFFFA7A7A7' +
'E4E4E4D7D7D7FFFFFFA3A3A3FFFFFF101010BBBBBBFCFCFCFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFEFEF6161616B6B6B' +
'494949878787B1B1B1B9B9B9EFEFEF4E4E4EFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFF7777774D4D4D6F6F6FCBCBCBFFFFFFF4F4F4F8F8F8' +
'CBCBCB585858F6F6F6FFFFFFFFFFFFFFFFFFFFFFFFE9E9E9DCDCDC' +
'505050151515EBEBEBA1A1A1FFFFFFB7B7B7FFFFFFD3D3D3DDDDDD' +
'FFFFFFCFCFCFFFFFFFB7B7B7FFFFFFB7B7B7FFFFFF707070FFFFFF' +
'A1A1A1FFFFFFD7D7D7D7D7D7FFFFFFD3D3D3FFFFFFB7B7B7FFFFFF' +
'9F9F9FFFFFFF9F9F9FFFFFFFA1A1A1FAFAFAFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFBBBBBBFFFFFF707070FFFFFF9F9F9FFFFFFFCFCFCF' +
'FFFFFFBBBBBBFFFFFFCFCFCFFFFFFFBBBBBBFFFFFF000000A5A5A5' +
'E4E4E4FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'9393935B5B5BA3A3A3CDCDCDCFCFCFFFFFFF4C4C4CFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFEDEDED3C3C3C919191FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'939393CACACAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFABABAB353535' +
'696969939393FFFFFFBDBDBDFFFFFFCFCFCFFFFFFF9F9F9FFFFFFF' +
'BFBFBFD6D6D6FFFFFFA3A3A3FFFFFF9F9F9FFFFFFFB7B7B7FFFFFF' +
'CFCFCFFFFFFF717171FFFFFFD5D5D5F2F2F2DBDBDBBFBFBFFFFFFF' +
'CFCFCFFFFFFF9F9F9FFFFFFFB7B7B7FFFFFFA1A1A1FFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFB7B7B7FFFFFF9F9F9FFFFFFFB7B7B7' +
'FFFFFF9F9F9FFFFFFFCFCFCFFFFFFF878787FFFFFF9F9F9FFFFFFF' +
'000000BFBFBFFAFAFAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFBDBDBD9797974D4D4DC7C7C7FFFFFF525252FFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'D9D9D92222228B8B8BEDEDEDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFF2F2F2EFEFEFFFFFFFFFFFFFEDEDEDB7B7B7141414838383' +
'C9C9C9EDEDEDFFFFFFB9B9B9FFFFFF9F9F9FFFFFFFB7B7B7FFFFFF' +
'B7B7B7FFFFFFEBEBEBFFFFFFE1E1E1BDBDBDFFFFFF9F9F9FFFFFFF' +
'878787FFFFFFCFCFCFFFFFFF9F9F9FFFFFFFD1D1D1FFFFFFDDDDDD' +
'BBBBBBFFFFFF9F9F9FFFFFFFB7B7B7FFFFFFB7B7B7FFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFB9B9B9FFFFFFD1D1D1FFFFFFA1A1A1' +
'FFFFFFE7E7E7FFFFFF9F9F9FFFFFFFB7B7B7FFFFFFB7B7B7FFFFFF' +
'CFCFCFFFFFFF000000BFBFBFE0E0E0FFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFCFCFCADADAD858585878787272727' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFA5A5A5' +
'101010737373FFFFFFFFFFFFFFFFFFF2F2F2DBDBDBF2F2F2FFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF656565454545171717FFFFFF' +
'E2E2E2E7E7E7DBDBDBD7D7D7FFFFFFA1A1A1FFFFFFB7B7B7FFFFFF' +
'878787FFFFFF878787FFFFFFD3D3D3E1E1E1F8F8F8BBBBBBFFFFFF' +
'B7B7B7FFFFFFCFCFCFFFFFFF575757FFFFFFCFCFCFFFFFFFA1A1A1' +
'F8F8F8FFFFFFE9E9E9FFFFFF9F9F9FFFFFFFB7B7B7FFFFFF878787' +
'FFFFFFFFFFFFFFFFFFFFFFFFECECECF4F4F4D7D7D7F2F2F2D7D7D7' +
'F8F8F8D5D5D5FFFFFFD1D1D1FFFFFFD3D3D3FFFFFFD3D3D3FFFFFF' +
'A3A3A3FFFFFFD3D3D3FFFFFF000000D4D4D4E0E0E0FFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE7E7E7757575BBBBBB' +
'717171DDDDDDFFFFFFFFFFFFFFFFFFFFFFFFE9E9E96D6D6D565656' +
'B9B9B9FFFFFFFFFFFFF4F4F4939393FCFCFCAFAFAFBBBBBBB7B7B7' +
'FFFFFFFFFFFFFFFFFFEBEBEBCDCDCD000000797979939393FFFFFF' +
'D1D1D1FFFFFFA3A3A3FFFFFFECECECEEEEEEFAFAFABBBBBBFFFFFF' +
'CFCFCFFFFFFF9F9F9FFFFFFFCFCFCFFFFFFFA5A5A5F8F8F8F2F2F2' +
'D5D5D5FFFFFFA1A1A1FFFFFFB7B7B7FFFFFF9F9F9FFFFFFFCFCFCF' +
'FFFFFFBBBBBBF0F0F0EEEEEED5D5D5FFFFFFD1D1D1FFFFFF9F9F9F' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFD5D5D5F4F4F4D5D5D5FFFFFF' +
'D5D5D5F4F4F4D7D7D7F0F0F0F0F0F0F0F0F0DBDBDBDDDDDDDDDDDD' +
'F0F0F0E1E1E1C5C5C5E1E1E1DDDDDDEBEBEB141414B7B7B7F8F8F8' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFCFCFC' +
'B9B9B9A7A7A71A1A1AE3E3E3FFFFFF878787282828898989FFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFDEDEDEBDBDBDF1F1F1EBEBEBC3C3C3' +
'777777C9C9C9FFFFFFC5C5C53333334A4A4AFFFFFFCACACAFFFFFF' +
'878787FFFFFFCFCFCFFFFFFFB7B7B7FFFFFFD5D5D5DBDBDBF8F8F8' +
'B9B9B9FFFFFFB7B7B7FFFFFF9F9F9FFFFFFFB7B7B7FFFFFFB9B9B9' +
'FFFFFFD5D5D5F0F0F0F8F8F8D1D1D1FFFFFF575757FFFFFFCFCFCF' +
'FFFFFF878787FFFFFFE9E9E9FFFFFFD7D7D7D9D9D9F4F4F4D1D1D1' +
'FFFFFF878787FFFFFFFFFFFFFFFFFFFFFFFFF6F6F6D3D3D3FFFFFF' +
'E7E7E7FFFFFFD1D1D1FFFFFFD3D3D3F6F6F6D5D5D5F8F8F8C1C1C1' +
'E3E3E3EEEEEEFAFAFAC3C3C3E5E5E5D9D9D9FCFCFCFBFBFB2E2E2E' +
'C8C8C8F5F5F5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFF8F8F89F9F9FBBBBBB282828B7B7B7FAFAFAFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFCECECEA1A1A1303030D7D7D7' +
'ADADADE5E5E50404046565655F5F5FE5E5E5FFFFFFD9D9D9FFFFFF' +
'6F6F6FFFFFFFCFCFCFFFFFFF585858FFFFFFCFCFCFFFFFFFD5D5D5' +
'F0F0F0FFFFFFE9E9E9FFFFFF9F9F9FFFFFFFCFCFCFFFFFFF878787' +
'FFFFFF9F9F9FFFFFFFD5D5D5DBDBDBFFFFFFB9B9B9FFFFFF9F9F9F' +
'FFFFFFCFCFCFFFFFFFB7B7B7FFFFFFCFCFCFFFFFFFD5D5D5F0F0F0' +
'FFFFFFB9B9B9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFA1A1A1FFFFFF' +
'9F9F9FFFFFFF9F9F9FFFFFFF9F9F9FFFFFFFB9B9B9FFFFFFD1D1D1' +
'FFFFFFA3A3A3FFFFFFA1A1A1FFFFFFA3A3A3FFFFFFA1A1A1FFFFFF' +
'C5C5C5464646DCDCDCF5F5F5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFBCBCBC5D5D5DDDDDDD' +
'2C2C2CA3A3A35E5E5E242424555555FFFFFFA5A5A5FFFFFFD7D7D7' +
'D4D4D4FFFFFF9F9F9FFFFFFFCFCFCFFFFFFF9F9F9FFFFFFFCFCFCF' +
'FFFFFFD3D3D3F0F0F0EFEFEFD3D3D3FFFFFF9F9F9FFFFFFFB7B7B7' +
'FFFFFF9F9F9FFFFFFF9F9F9FFFFFFFBBBBBBFFFFFFF6F6F6A7A7A7' +
'FFFFFFCFCFCFFFFFFF878787FFFFFFE7E7E7FFFFFF9F9F9FFFFFFF' +
'D3D3D3EFEFEFF6F6F6BBBBBBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'B7B7B7FFFFFF9F9F9FFFFFFF9F9F9FFFFFFFA1A1A1FFFFFFCFCFCF' +
'FFFFFFB9B9B9FFFFFF9F9F9FFFFFFFA3A3A3FFFFFF9F9F9FFFFFFF' +
'BBBBBBFFFFFFC5C5C55C5C5CC4C4C4F5F5F5FFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFB4B4B4FFFFFF' +
'FCFCFC424242262626000000000000FFFFFFD1D1D1FFFFFFCFCFCF' +
'FFFFFFF2F2F2BDBDBDFFFFFFB7B7B7FFFFFF585858FFFFFFCFCFCF' +
'FFFFFF878787FFFFFFD1D1D1FFFFFFF0F0F0D3D3D3FFFFFFCFCFCF' +
'FFFFFF878787FFFFFFB7B7B7FFFFFFB7B7B7FFFFFFD1D1D1F8F8F8' +
'C9C9C9D7D7D7FFFFFFB7B7B7FFFFFFB7B7B7FFFFFFCFCFCFFFFFFF' +
'9F9F9FFFFFFFEBEBEBF2F2F2F0F0F0FFFFFFFFFFFFFFFFFFFFFFFF' +
'707070FFFFFFBBBBBBFFFFFF878787FFFFFFBDBDBDFFFFFF747474' +
'FFFFFFBDBDBDFEFEFE8B8B8BFFFFFFBDBDBDE2E2E2BDBDBDFFFFFF' +
'BDBDBDE2E2E2C1C1C1E4E4E4E0E0E0404040DEDEDEF6F6F6FFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF959595' +
'9F9F9F979797191919FFFFFFC1C1C1FFFFFFA1A1A1FFFFFF707070' +
'FFFFFFB9B9B9FAFAFAD9D9D9ECECECFFFFFFCFCFCFFFFFFF9F9F9F' +
'FFFFFFCFCFCFFFFFFFB7B7B7FFFFFFB9B9B9F6F6F6F0F0F0D5D5D5' +
'FFFFFFB7B7B7FFFFFF9F9F9FFFFFFF878787FFFFFF878787FFFFFF' +
'BDBDBDE7E7E7F0F0F0EBEBEBFFFFFF9F9F9FFFFFFFCFCFCFFFFFFF' +
'575757FFFFFFCFCFCFFFFFFFBBBBBBF4F4F4FFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFD8D8D8E3E3E3DADADAFFFFFFF1F1F1DDDDDDF5F5F5' +
'FAFAFAF3F3F3DDDDDDF5F5F5F4F4F4EFEFEFF3F3F3FFFFFFEFEFEF' +
'EFEFEFF5F5F5F3F3F3F1F1F1F5F5F5DFDFDFFAFAFA3C3C3CB5B5B5' +
'C7C7C7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFCBCBCBE2E2E2292929' +
'7979794646461A1A1A5D5D5DE6E6E6FFFFFF9F9F9FFFFFFFCFCFCF' +
'FFFFFFB7B7B7FFFFFFA1A1A1FFFFFFEBEBEBEEEEEEFFFFFF717171' +
'FFFFFFCFCFCFFFFFFF9F9F9FFFFFFFCFCFCFFFFFFFB9B9B9FFFFFF' +
'D5D5D5ECECECFFFFFFA1A1A1FFFFFF9F9F9FFFFFFFCFCFCFFFFFFF' +
'B7B7B7FFFFFF8B8B8BFFFFFFEBEBEBECECECFFFFFFCFCFCFFFFFFF' +
'CFCFCFFFFFFFB7B7B7FFFFFFCFCFCFFFFFFFB9B9B9FFFFFFFFFFFF' +
'FFFFFFFFFFFFD4D4D4C5C5C5CACACAADADADE2E2E2C1C1C1E1E1E1' +
'C1C1C1E2E2E2C1C1C1E2E2E2BDBDBDFFFFFFD5D5D5DDDDDDD3D3D3' +
'FFFFFFD5D5D5DDDDDDD5D5D5FFFFFFD5D5D5E0E0E0D9D9D9FFFFFF' +
'202020E8E8E8F2F2F2FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFC5C5C5F7F7F77F7F7F3E3E3E' +
'FFFFFFCBCBCBFFFFFFD5D5D5FFFFFFF6F6F6A1A1A1FFFFFF9F9F9F' +
'FFFFFF9F9F9FFFFFFFB7B7B7FFFFFF9F9F9FFFFFFFBDBDBDF0F0F0' +
'FFFFFFB9B9B9FFFFFF9F9F9FFFFFFFB7B7B7FFFFFFB7B7B7FFFFFF' +
'B7B7B7FFFFFFEDEDEDEEEEEEFAFAFAB9B9B9FFFFFF878787FFFFFF' +
'B7B7B7FFFFFFB7B7B7FFFFFFCFCFCFFFFFFFD5D5D5F0F0F0FFFFFF' +
'B7B7B7FFFFFF575757FFFFFFB7B7B7FFFFFFB7B7B7FFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEDEDEDFFFFFFBBBBBBFFFFFF' +
'EBEBEBFFFFFFBBBBBBFFFFFFD3D3D3FFFFFF9F9F9FFFFFFFD3D3D3' +
'FFFFFF9F9F9FFFFFFFD3D3D3FFFFFF9F9F9FFFFFFFBDBDBDFEFEFE' +
'A1A1A1FFFFFF040404E7E7E7E0E0E0FFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFE3E3E3C5C5C5B1B1B1353535919191' +
'FFFFFF717171FFFFFFA3A3A3FAFAFAEDEDEDEDEDEDFFFFFFD3D3D3' +
'FFFFFFCFCFCFFFFFFF9F9F9FFFFFFF878787FFFFFFD1D1D1F6F6F6' +
'F0F0F0C1C1C1FFFFFFE9E9E9FFFFFF9F9F9FFFFFFFCFCFCFFFFFFF' +
'9F9F9FFFFFFFB9B9B9F6F6F6D7D7D7D9D9D9FFFFFFD1D1D1FFFFFF' +
'CFCFCFFFFFFF9F9F9FFFFFFF585858FFFFFFD1D1D1FAFAFABDBDBD' +
'EEEEEEFFFFFFE9E9E9FFFFFFCFCFCFFFFFFF9F9F9FFFFFFFB7B7B7' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFA1A1A1FFFFFFA1A1A1FFFFFF' +
'9F9F9FFFFFFFB7B7B7FFFFFF9F9F9FFFFFFF9F9F9FFFFFFF9F9F9F' +
'FFFFFFB7B7B7FFFFFF9F9F9FFFFFFFB7B7B7FFFFFFB7B7B7FFFFFF' +
'B9B9B9FFFFFFB7B7B7FFFFFF2222229D9D9DFCFCFCFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFC3C3C3F5F5F59B9B9B000000CFCFCF8B8B8B' +
'FFFFFFB7B7B7FFFFFFCFCFCFFFFFFFD1D1D1FFFFFFECECECD9D9D9' +
'DDDDDDBDBDBDFFFFFF9F9F9FFFFFFFB7B7B7FFFFFFB7B7B7FFFFFF' +
'D1D1D1FFFFFFBFBFBFF2F2F2F0F0F0BBBBBBFFFFFFCFCFCFFFFFFF' +
'CFCFCFFFFFFFCFCFCFFFFFFFD1D1D1FFFFFFD5D5D5F0F0F0F4F4F4' +
'A5A5A5FFFFFFB7B7B7FFFFFFCFCFCFFFFFFFB7B7B7FFFFFFB9B9B9' +
'FFFFFFEBEBEBEEEEEEF8F8F8777777FFFFFFB7B7B7FFFFFF9F9F9F' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF6F6F6D3D3D3FCFCFC' +
'B9B9B9FFFFFFB7B7B7FFFFFFB7B7B7FFFFFFB7B7B7FFFFFFB7B7B7' +
'FFFFFF9F9F9FFFFFFFB7B7B7FFFFFFB7B7B7FFFFFFB7B7B7FFFFFF' +
'9F9F9FFFFFFFB7B7B7FFFFFF6F6F6FFFFFFF262626B7B7B7C8C8C8' +
'FFFFFFFFFFFFBFBFBFEFEFEFCFCFCF282828999999F7F7F7F2F2F2' +
'FFFFFF9F9F9FFFFFFF878787FFFFFF9F9F9FFFFFFFCFCFCFFFFFFF' +
'D3D3D3FFFFFFF0F0F0E9E9E9FFFFFF9F9F9FFFFFFF878787FFFFFF' +
'CFCFCFFFFFFFCFCFCFFFFFFFD1D1D1FFFFFFF6F6F6A1A1A1FFFFFF' +
'CFCFCFFFFFFF9F9F9FFFFFFFB7B7B7FFFFFF9F9F9FFFFFFFD1D1D1' +
'FFFFFFDFDFDFD2D2D2FFFFFF9F9F9FFFFFFF707070FFFFFFCFCFCF' +
'FFFFFF878787FFFFFFD3D3D3F6F6F6CFCFCFD5D5D5FFFFFF9F9F9F' +
'FFFFFFB7B7B7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFD5D5D5FFFFFF' +
'D5D5D5FFFFFFBBBBBBFFFFFFD1D1D1FFFFFFD3D3D3FFFFFFD3D3D3' +
'FFFFFFD1D1D1FFFFFFBBBBBBFFFFFFD1D1D1FFFFFFD3D3D3FFFFFF' +
'D1D1D1FFFFFFD3D3D3FFFFFFCFCFCFFFFFFFB9B9B9FFFFFF222222' +
'D3D3D3ECECEC9D9D9DFFFFFF474747414141FFFFFFC5C5C5F8F8F8' +
'FFFFFFBBBBBBFFFFFFCFCFCFFFFFFFCFCFCFFFFFFFB7B7B7FFFFFF' +
'9F9F9FFFFFFFB9B9B9F4F4F4FFFFFFD3D3D3FFFFFFCFCFCFFFFFFF' +
'9F9F9FFFFFFF9F9F9FFFFFFF6F6F6FFFFFFFD1D1D1F2F2F2FFFFFF' +
'E9E9E9FFFFFFCFCFCFFFFFFFB7B7B7FFFFFFB7B7B7FFFFFF9F9F9F' +
'FFFFFFBBBBBBE1E1E1FFFFFFE9E9E9FFFFFFCFCFCFFFFFFFB7B7B7' +
'FFFFFF9F9F9FFFFFFFCFCFCFFFFFFFD6D6D6CBCBCBFFFFFFD1D1D1' +
'FFFFFF9F9F9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFD5D5D5' +
'F2F2F2D7D7D7F2F2F2DBDBDBD9D9D9EEEEEEFFFFFFD7D7D7DBDBDB' +
'D9D9D9F0F0F0F0F0F0D9D9D9DBDBDBF0F0F0F0F0F0D9D9D9D9D9D9' +
'EEEEEEF0F0F0D9D9D9DFDFDFC1C1C1FFFFFFD5D5D5F6F6F6D7D7D7' +
'FFFFFF101010A7A7A7858585494949DADADAFFFFFF9F9F9FFFFFFF' +
'A1A1A1FFFFFFD9D9D9D7D7D7FFFFFFA1A1A1FFFFFF9F9F9FFFFFFF' +
'CFCFCFFFFFFF9F9F9FFFFFFFBBBBBBF2F2F2D9D9D9D7D7D7FFFFFF' +
'A1A1A1FFFFFFCFCFCFFFFFFFCFCFCFFFFFFFB7B7B7FFFFFFBBBBBB' +
'F4F4F4EDEDEDEBEBEBFFFFFFA1A1A1FFFFFFB7B7B7FFFFFFB7B7B7' +
'FFFFFFCFCFCFFFFFFFA5A5A5F2F2F2EEEEEED5D5D5FFFFFFA1A1A1' +
'FFFFFFCFCFCFFFFFFF9F9F9FFFFFFFB7B7B7FFFFFF8F8F8FF6F6F6' +
'F0F0F0D5D5D5FFFFFFCFCFCFFFFFFFFFFFFFFFFFFFFFFFFFE7E7E7' +
'FFFFFFD1D1D1FFFFFFD1D1D1FFFFFFD3D3D3FFFFFFCFCFCFFFFFFF' +
'D3D3D3FFFFFFD1D1D1FFFFFFD3D3D3FFFFFFD1D1D1FFFFFFD3D3D3' +
'FFFFFFE9E9E9FFFFFFD5D5D5F8F8F8C1C1C1F4F4F4D7D7D7F6F6F6' +
'C3C3C3DDDDDDFBFBFB565656E5E5E59F9F9FFFFFFF878787FFFFFF' +
'B7B7B7FFFFFFE7E7E7FFFFFFD5D5D5EEEEEEF8F8F8D1D1D1FFFFFF' +
'B7B7B7FFFFFF9F9F9FFFFFFF9F9F9FFFFFFFE9E9E9FFFFFFD5D5D5' +
'EEEEEEFCFCFCA1A1A1FFFFFF9F9F9FFFFFFF6F6F6FFFFFFFB7B7B7' +
'FFFFFFB9B9B9FFFFFFECECECD5D5D5FAFAFAD1D1D1FFFFFFB7B7B7' +
'FFFFFF9F9F9FFFFFFF9F9F9FFFFFFFE9E9E9FFFFFFD7D7D7D7D7D7' +
'FCFCFCB9B9B9FFFFFF9F9F9FFFFFFFCFCFCFFFFFFFB7B7B7FFFFFF' +
'D1D1D1FFFFFFD7D7D7D7D7D7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFB7B7B7FFFFFF9F9F9FFFFFFFB7B7B7FFFFFF878787FFFFFF' +
'9F9F9FFFFFFF878787FFFFFFB7B7B7FFFFFF878787FFFFFFB7B7B7' +
'FFFFFF9F9F9FFFFFFFB7B7B7FFFFFFD1D1D1FFFFFFD1D1D1FFFFFF' +
'D3D3D3FCFCFCD7D7D7F6F6F6FFFFFFC1C1C1FFFFFFCFCFCFFFFFFF' +
'9F9F9FFFFFFF878787FFFFFF878787FFFFFFECECECDBDBDBFFFFFF' +
'D1D1D1FFFFFFCFCFCFFFFFFF9F9F9FFFFFFFB7B7B7FFFFFF9F9F9F' +
'FFFFFFECECECD9D9D9FFFFFFE9E9E9FFFFFFCFCFCFFFFFFFB7B7B7' +
'FFFFFF878787FFFFFFCFCFCFFFFFFFEEEEEED9D9D9FFFFFFCFCFCF' +
'FFFFFFB7B7B7FFFFFFCFCFCFFFFFFF707070FFFFFFB7B7B7FFFFFF' +
'EEEEEED9D9D9FFFFFFD1D1D1FFFFFFB7B7B7FFFFFF9F9F9FFFFFFF' +
'575757FFFFFFB7B7B7FFFFFFD5D5D5ECECECFFFFFFFFFFFFFFFFFF' +
'FFFFFF9F9F9FFFFFFF9F9F9FFFFFFF9F9F9FFFFFFF9F9F9FFFFFFF' +
'9F9F9FFFFFFF9F9F9FFFFFFF9F9F9FFFFFFFB7B7B7FFFFFF9F9F9F' +
'FFFFFF9F9F9FFFFFFF9F9F9FFFFFFF9F9F9FFFFFFF9F9F9FFFFFFF' +
'B7B7B7FFFFFFA1A1A1FFFFFFA3A3A3F6F6F6DDDDDDBDBDBDFFFFFF' +
'9F9F9FFFFFFFCFCFCFFFFFFFE7E7E7FFFFFF9F9F9FFFFFFFA5A5A5' +
'F4F4F4F0F0F0D3D3D3FFFFFFB7B7B7FFFFFFCFCFCFFFFFFFB7B7B7' +
'FFFFFF9F9F9FFFFFFFBFBFBFDDDDDDF4F4F4A3A3A3FFFFFF6F6F6F' +
'FFFFFFCFCFCFFFFFFF878787FFFFFF9F9F9FFFFFFFBBBBBBFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFB7B7B7FFFFFFCFCFCFFFFFFF' +
'9F9F9FFFFFFFBBBBBBFFFFFFEAEAEAFFFFFFFFFFFFFFFFFFFFFFFF' +
'CFCFCFFFFFFFB7B7B7FFFFFF9F9F9FFFFFFFE9E9E9FFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'CFCFCFFFFFFFCFCFCFFFFFFF9F9F9FFFFFFFD1D1D1FFFFFFECECEC' +
'FFFFFFFFFFFF6F6F6FFFFFFF6F6F6FFFFFFFB7B7B7FFFFFFCFCFCF' +
'FFFFFFD1D1D1FFFFFFEBEBEBFFFFFFFFFFFFB7B7B7FFFFFFCFCFCF' +
'FFFFFFCFCFCFFFFFFFB7B7B7FFFFFFBBBBBBFFFFFFEEEEEEFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE7E7E7' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
'FFFFFFFFFFFFFFFFFF');
end;
begin
scriptstate=1;
width= WandH;
height= WandH;
xx=-width;
x2=0;
yy=0;
debugpic=loadbitmap('uf.bmp');
image = BitmapFromString(width, height,'');
DisplayDebugImgWindow(width+300,height+100);
cubecolor=clblack;
copycanvas(getbitmapcanvas(debugpic), GetDebugCanvas, 0, 0, width+300, height+100, 0, 0, width+300, height+100);
Cube(Rate);
writeln('Formed readout');
writeln('-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-');
writeln(' Uber Fighter V 2.b');
writeln('');
writeln(' by GenoDemoN');
writeln('-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-');
setmousemode(false);
clearreport;
Setup;
SetupOSi;
Report2=ST;
LoadBmps;
callmenuform;
IF (uchar1) then
begin
uc=uc+1;
username=username1;
password=password1;
end;
IF (uchar2) then
begin
uc=uc+1;
username=username2;
password=password2;
end;
IF (uchar3) then
begin
uc=uc+1;
username=username3;
password=password3;
end;
IF (uchar4) then
begin
uc=uc+1;
username=username4;
password=password4;
end;
IF (uchar5) then
begin
uc=uc+1;
username=username5;
password=password5;
end;
If (uc=1) then
begin
scriptstate=4;
timeed;
LoginIfNeededd;
FightModee;
runset;
OpenBag;
talksss;
uberwait(100);
SendArrowSilentWait(0,(1000+random(333)));
uberwait(100);
if(BoneCollecting)then
GetBoneInvColor;
LFTimeout=LFTimeout60000;
LastFight=GetSystemTime;
case RunWhere of
'N'begin RWX=-1; RWY=-48; end;
'S'begin RWX=1; RWY=48; end;
'E'begin RWX=-58; RWY=-1; end;
'W'begin RWX=58; RWY=1; end;
end;
repeat
LoginIfNeededd;
timeed;
FindRandoms;
uberwait(22);
Att=False;
Attack;
WaitWhileAttacking;
If(BoneCollecting)and(LastBuried4)then
BoneBurier;
ProgressReport;
until(GetSystemTime-LastFightLFTimeout);
end;
If ((uc=1)=false) then
writeln(' No user info was entered');
writeln('--Script Ended--');
end.