kos-functions.ks

function resForParts { parameter partList to list().
    from { local x is 0. } until x >= toTanks:length STEP { set x to x + 1. } DO {
	  	for res in partList[x]:resources   {
    		print (" [" + x + "] " + res:name):padright(21)
		      + round(res:amount / res:capacity * 100):tostring():padright(4)
		      + round(res:amount,1):tostring():padright(8)
		      + "/ "
		      + round(res:capacity,1):tostring().
  		}
    }
}