Ok so my bowstringer looks like this right now
SCAR Code:
program BowStringer;
{.include SRL/SRL.scar}
type
TBowType = (Short,Long,OakShort,OakLong,WillowShort,WillowLong,MapleShort,MapleLong,YewShort,YewLong);
const
MyBow = YewLong;//which bow+type(short or long)you can choose,yewlong,yewshort
x,y : integer;
procedure DeclarePlayers;
begin
HowManyPlayers:=4;
NumberOfPlayers(HowManyPlayers);
CurrentPlayer:=0;
Players[0].Name :='Username';
Players[0].Pass :='Password';
Players[0].Nick :='Nickname';
Players[0].Active:=True;
Players[1].Name :='Username';
Players[1].Pass :='Password';
Players[1].Nick :='Nickname';
Players[1].Active:=True;
Players[2].Name :='Username';
Players[2].Pass :='Password';
Players[2].Nick :='Nickname';
Players[2].Active:=True;
Players[3].Name :='Username';
Players[3].Pass :='Password';
Players[3].Nick :='Nickname';
Players[3].Active:=True;
end;
procedure LoadBitmap;
begin
Short := DTMFromString('78DA6314606060E0634001C5FEBC609A11CA6' +
'7140712ECA86A422D3950D53001093102E6F00009615435060A0A' +
'A86A405A0418D00023AA1A0920C184AA22C00CCD3D92408219BF5' +
'D007EE50478');
Long := DTMFromString('78DA6364656060006124D016CD0BA619A17C4' +
'67620C18EAA26CE9E03550D3F90E0415563A0A080AA46144888A3' +
'AAA90F43B34B004808A0AAC9F14053C382E9E6627F34352079365' +
'43501661C24BB0700B45506B5');
OakShort:= DTMFromString('78DA6314646060E06540016DB9100146289F5' +
'11C4830A1AA490FE140550392176340038CA86A9831D518282860' +
'AA11465533AB4E10550D3F90E027E066414C35E8760100C002059' +
'8');
OakLong := DTMFromString('78DA636465606060634001C9011C609A11CA6' +
'7E40712FCA86ABA0A0451D5880009315435CD59BCA86A4431D5C0' +
'64E16AC430D5182828A0AA110712B2F8DD030033DE0527');
WillowShort := DTMFromString('78DA6314606060E0634001D525DA609A11CA6' +
'71403125CA86AE2A21451D5480009565435060A0AA86AC431D5C0' +
'64E16AD8808430AA8A965A7D54359C404208554D53952EAA1A264' +
'C7326761AA3A80100194F06D9');
WillowLong := DTMFromString('78DA63E461606060634001AB16D8806946289' +
'F910F487032A001464C353CA82A5A6AF551D580E4B950D504F9CA' +
'A0AA610712ACA86AF2D25551D588000911543515859AA86A58800' +
'4337EF7000072580751');
MapleShort := DTMFromString('78DA6314616060E064400193AA8BC1342394C' +
'F0892174455D35F5984AA861548081330871B538D818202AA1A31' +
'20C184AAA6262309558D38A69AE4107F5435A240821B554D51623' +
'4A65DDCF8CD0100234D0A5A');
MapleLong := DTMFromString('78DA63E461606060674001DB664D00D38C503' +
'E232B90604555931CE28FAA460C4848A0AA99D15081AA4614534D' +
'69720CAA1A3E20C18BAAA6BFB208530D0FAA9A432B17A2AAE1071' +
'2DCA86A0C141450D40000668D0A76');
YewShort := DTMFromString('78DA63E4676060106040016DA5BC609A11CA6' +
'764061222A86A66B50BA2AA110512EC04CC01A9E14155539C8AA6' +
'4602538D818202AA1A3120C18AAAA63C03CD1C7120C18CAA263D8' +
'A03550D1790104655D35581EA2F00DBC30859');
YewLong := DTMFromString('78DA63E4676060E06340015D1582609A11CA6' +
'7E404126CA86A964F124155C304249851D5D4E7F3A2AA11031292' +
'A86AA634A1D9250A242450D59467A09903D2C28FAA66E72234F78' +
'0E4B951D5182828A0A801002F400823');
end;
procedure Bank;
begin
openbankquiet('veb');
fixbank;
if
end;
begin
DeclarePlayers;
If Not Loggedin Then
Bank;
end.
If u run that ull notice ull get a error
Line 13: [Error] (12244:2): is ('=') expected in script
and i want it to work...