Fixes slot sprite and ammo sprites overlapping left side border. There is still the issue that boxes should be 32px between borders, but right now they are 33px on all but the first row (since the outside border overlaps it by 1px) causing the slot sprite to have 2px of border on the left and 1px of border on the right.
system;
type
Integer = integer;
LongInt = integer;
LongWord = integer;
Cardinal = integer;
PtrInt = integer;
Word = integer;
Byte = integer;
SmallInt = integer;
ShortInt = integer;
pointer = pointer;
PChar = pointer;
double = float;
real = float;
float = float;
boolean = boolean;
LongBool = boolean;
string = string;
shortstring = string;
ansistring = string;
char = char;
PByte = ^Byte;
PLongInt = ^LongInt;
PLongWord = ^LongWord;
PInteger = ^Integer;
var
false, true: boolean;
write, writeLn, read, readLn, inc, dec: procedure;
StrLen, ord, Succ, Pred : function : integer;
Low, High : function : integer;
Now : function : integer;
StrPas, FormatDateTime : function : shortstring;
exit : procedure;