poz2test

--poz2test
--program to test theinsektAPIs/poz2

os.loadAPI("theinsektAPIs/poz2")
local pos=poz2.getNewPosT()
local args={...}


local comnr=1
local nrargs=0
local com=nil
local dir=nil
local opt=nil
for index,value in pairs(args) do
    nrargs=nrargs+1
    if nrargs==1 then
            com=args[index]
    end
    if nrargs==2 then
            dir=args[index]
        end
    if nrargs==3 then
        opt=args[index]
        print(comnr,": (",com,", ",dir,", ",opt,") running...")
        local res=poz2.doCommand(com,dir,pos,opt)
        print("returned: ",res)

        nrargs=0
        comnr=comnr+1
    end

end

if nrargs==0 and comnr==1 then
 print("usage: poz2test <command1> <direction1> <extra1> <command2> <direction2> <extra2> ...")
 print("example: poz2test go f - go f - ddgloop b 2 turn n -")
 print("commands: turn, go, attack, dig, place, detect, compare, drop, suck, ddgloop")
 return
end

if comnr>1 then
print("final position values: ")
for key,value in pairs(pos) do
    print(key," ",value)
end
end

if nrargs==1 then
 print(poz2.commandUsageT[com])
 print("directions: n,e,s,w,u,d,f,b,r,l")
end
if nrargs==2 then
 print("the previous command requires 2 arguments not 1")
 print(poz2.commandUsageT[com])
 print("directions: n,e,s,w,u,d,f,b,r,l")
end