I think I got it but it seems sloppy:
First include:
////////////////////////////////////////////////////////////////////////////
//////////////////////////////SOULSPLIT INCLUDE/////////////////////////////
//////////////////////////Credits to Flight for Base////////////////////////
//////////////////////////////////Revision 3////////////////////////////////
////////////////////////////////////////////////////////////////////////////
{$include SoulSplit/Skills/Skills.simba}
{$include SoulSplit/Skills/Test.simba}
Const
SS_IX = 543; //Inventory
SS_IY = 223; //Inventory
SS_IX2 = 744; //Inventory
SS_IY2 = 494; //Inventory
SS_WSX = 0; //Whole Screen
SS_WSY = 0; //Whole Screen
SS_WSX2 = 766; //Whole Screen
SS_WSY2 = 522; //Whole Screen
SS_MSX1 = 4; //Main Screen
SS_MSY1 = 4; //Main Screen
SS_MSX2 = 520; //Main Screen
SS_MSY2 = 338; //Main Screen
SS_MMX = 627; //MiniMap
SS_MMY = 268; //MiniMap
SS_MMX2 = 842; //MiniMap
SS_MMY2 = 426; //MiniMap
SS_CX = 9; // Chat box
SS_CY = 363; // Chat box
SS_CX2 = 525; // Chat box
SS_CY2 = 502; // Chat box
SS_PX = 211; // Area around player
SS_PY = 140; // Area around player
SS_PX2 = 294; // Area around player
SS_PY2 = 259; // Area around player
Skills Include:
Var
Raw_Shark, Raw_RockTail, Raw_Manta: Integer;
Cook_Shark, Cook_RockTail, Cook_Manta: Integer;
Tab_Cb, Tab_Skills, Tab_Inventory, Tab_Wear:Integer;
Tab_Pray, Tab_Spell:Integer;
Cure_Me,SS_Test:Integer;
Procedure SI_SetDTMs;
begin
// Cooking and fishing
Raw_Shark := DTMFromString('mWAAAAHicY2FgYMhnYmDIBuICIC4BYklGBgZZIJYDYhkgbqqsZJjZ3wemp3V3MfAD9SBjRjQMAgDJYwjI');
Raw_RockTail := DTMFromString('mbQAAAHicY2VgYChiYmAoBuJyKJ0LxE6MDAx2QOwMxG5A7ALEptoSYBxbEgvGrhZyDPxA/eiYEQsGAwAm6gfV');
Raw_Manta := DTMFromString('mbQAAAHicY2VgYChmYmCoBOJCIM4B4iIg/gkU/wfF34H4CxAnpk9g8A0sZEjOnMhQUr0GzOcHiqNjRiwYDADW0g4y');
Cook_Shark := DTMFromString('mggAAAHicY2NgYJjHxMCwCIjnAvFMIJ4FxEuBWJaRgUESiCWgWA6IFYA4M9CKYVZdBkNHQQxDf1kCmL+6t4SBE2gWNsyIA0MAAAV5DHs=');
Cook_RockTail := DTMFromString('mbQAAAHicY2VgYDjDxMBwCogvAPFpID4KxH+A4l+A+CcQMzIyMPwG0laSDAyh9hwM5XHxDJ05uQzVMbwMnEBxdMyIBYMBAK45DIc=');
Cook_Manta := DTMFromString('mggAAAHicY2NgYChkYmAoBeJ8IM6C0iD+Q6DcEyi+D8R3gPgeEBeHOzDEe5qB6YoYZ4aCUFuGMAd9Bk6gHDbMiANDAACxLg4E');
// Tabs
Tab_Cb := DTMFromString('mwQAAAHic42RgYFBkYmDQgGIZIJYCYgUgVmeCyEkA8Q6gug1AvB+I90LZ64F4OxDvA+JtQFyTH8Lw6+9vhmVmAgwfukXA7Ekt+QwxIZ4MydE+DJ216QycQHWEMCMRGA4AKgYWng==');
Tab_Skills := DTMFromString('mbQAAAHicY2VgYPBgYmBwB2IHIA6Ass8BxY8B8XkgvgDEl4E4aFIcw6wL/Qw7nZwYTOY/BvN5gOLomBELBgMAbcsNLQ==');
Tab_Inventory := DTMFromString('mlwAAAHicY2dgYOhmguDJUNwFxC1A3ArE54Hyx4D4JAOEfRlKg/gyPKwMa4rVGObEqjK4qQgw1HpJAUUZwWxOIAsXZsSDoQAA0yAOKQ==');
Tab_Wear := DTMFromString('mggAAAHicY2NgYFjLBMEboPQyKD4HlDvOAKEvAfFFID4FxNLSkgxT56xmcLCyALMzSysYJs2ZysANlMOGGXFgCAAAOtgPcw==');
Tab_Pray := DTMFromString('mlwAAAHicY2dgYDjNxMBwBojPA/ElKPsEEB8H4nNA+WNAfJIBwr4ExBdAeoD419/fDIdu3WYwDo8Cs0G45fAhMJ8TKI8LM+LBUAAAD0UapQ==');
Tab_Spell := DTMFromString('mlwAAAHicY2dgYHjLxMDwBog/A/EnIH4HxM+g+BxQ/hgQnwLiC0B8BYgvAfFpIM70VAOSjAzTiizAuCdHh6E9WImhtSqVgRMogwsz4sFQAADn1RNQ');
// Spells
Cure_Me := DTMFromString('mlwAAAHicY2dgYJBmZmCQAGIZIFZghvDFgVgEiG2YGBjMgdgEiK2B2AmIbaFs47MMDDPu1IBx+A09MAaJgWguoLm4MCMeDAUAP8cMwA==');
Test include:
// Cooking and fishing
SS_TEST := DTMFromString('mlwAAAHicY2dgYKhgYmAoA+JiIC4C4nIgrgHiKiC+x8jAcAuI7wDxQyB+DKVvA/F8yySGPS5lDLtcShi2ORUybHLIZ6jW8QFjfqC5uDAjHgwFAB7WErM=');
end;
Procedure FreeSI;
begin
FreeDTM(Raw_Shark);
FreeDTM(Raw_RockTail);
FreeDTM(Raw_Manta);
FreeDTM(Cook_Shark);
FreeDTM(Cook_RockTail);
FreeDTM(Cook_Manta);
FreeDTM(Tab_Cb);
FreeDTM(Tab_Skills);
FreeDTM(Tab_Inventory);
FreeDTM(Tab_Wear);
FreeDTM(Tab_Pray);
FreeDTM(Tab_Spell);
FreeDTM(Cure_Me);
FreeDTM(SS_Test);
end;
Procedure SetupSoulInclude;
begin
AddOnTerminate('FreeSI');
SI_SetDTMs;
Writeln('SoulInclude setup');
end;