For all of the SRL procedures that you have in there.. Just use them normally by including it. And then typing in the name of the procedure. So say i wanted to find my axe. I would say
FindHead;
And i wouldnt have to copy the whole function, and rename it…
Also, i thought InventoryFull was just InvFull?
For
until(loads=0)
I dont see anything that says loads = loads - 1.. Is there anything in there? For loads, i would put loads as the constant and make a variable of Loadz. Then after DropAll; I would put Loadz = Loadz + 1
And that at the end for until… I would put Until ( Loadz >= Loads)
Thats all i cought by looking through, a good first try though, try updating it with those things, and you will be good off..