SCAR Code:
procedure Choose;
begin
case EndSkill of
1, 2, 3, 4, 5, 6: ItemToCraft := 'gloves';
7, 8: ItemToCraft := 'boots';
9, 10: ItemToCraft := 'cowl';
11, 12, 13: ItemToCraft := 'vambraces';
14, 15, 16, 17: ItemToCraft := 'body';
18, 19, 20, 21, 22, 23,
24, 25, 26, 27, 28, 29, 30, 31, 32,
33, 34, 35, 36, 37, 38, 39, 40, 41,
42, 43, 44, 45, 46, 47, 48, 49, 50: ItemToCraft := 'chaps';
end;
end;
procedure PickXandY;
begin
case ItemTocraft of
'gloves':begin
XItem := 191;
Yitem := 117;
end;
'boots': begin
XItem := 316;
Yitem := 114;
end;
'cowl': begin
XItem := 382;
Yitem := 234;
end;
'vambraces': begin
XItem := 445;
Yitem := 247;
end;
'body': begin
XItem := 72;
Yitem := 109;
end;
'chaps': begin
XItem := 126;
Yitem := 247;
end;
end;
end;