harvest1

-- ################################
-- 9*9の小麦畑を収穫するプログラム vol.1
-- ################################

-- #############
-- setting
--  チェスト位置を収穫のスタート地点とする
--|W|W|W|W|W|W|W|W|W|
--|W|W|W|W|W|W|W|W|W|
--|W|W|W|W|W|W|W|W|W|
--|W|W|W|W|W|W|W|W|W|
--|W|W|W|W| |W|W|W|W|
--|W|W|W|W|W|W|W|W|W|
--|W|W|W|W|W|W|W|W|W|
--|W|W|W|W|W|W|W|W|W|
--|W|W|W|W|W|W|W|W|W| W:小麦(wheat)
--                |C| C:チェスト(chest)
--                    空欄には水源

-- 最初に決められたスロットにアイテムを入れておくこと
WHEAT_SLOT = 1  --小麦はスロット1
SEED_SLOT = 2   --種はスロット2
FUEL_SLOT = 3   --石炭・木炭はスロット3

-- #############
-- define functions
function plantSeedAndHarvest(num) --収穫と種植え
    for i=1,num do
        turtle.select(WHEAT_SLOT)
        turtle.digDown()
        turtle.select(SEED_SLOT)
        turtle.placeDown()
        turtle.forward()
    end
    turtle.select(WHEAT_SLOT)
    turtle.digDown()
    turtle.select(SEED_SLOT)
    turtle.placeDown()
    print "Turn"
end

function repeatPSH(num)
    for i=1,num do
        -- 左旋回
        if(i%2 ~= 0) then
            plantSeedAndHarvest(num)
            turtle.turnLeft()
            turtle.forward()
            turtle.turnLeft()
        -- 右旋回
        else
            plantSeedAndHarvest(num)
            turtle.turnRight()
            turtle.forward()
            turtle.turnRight()
        end
    end
end

function goBackHome(...)
    --チェストの位置まで戻る
    turtle.turnLeft()
    turtle.turnLeft()
    for i=1,9 do
        turtle.forward()
    end
    turtle.turnLeft()
    for i=1,8 do
        turtle.forward()
    end
    turtle.turnLeft()
    print "I'm home!"
end

function inChest(...)
   for i=4,16 do               --スロット1,2,3は預けない
       turtle.select(i)
       r,e = turtle.dropDown() --rはtrueかfalseを返してくれる
       print (e)
   end
end
-- #############
-- Main
print(turtle.getFuelLevel()) -- 燃料を確認
turtle.select(FUEL_SLOT)     -- スロット3には燃料を入れておく
turtle.refuel(2)             -- (9*9 + 9 + 8) < 80*2 で十分足りる
print(turtle.getFuelLevel()) -- 燃料を確認

-- 収穫
print "PSH start!"   -- 収穫・種植え開始
turtle.forward()     -- まず1マス進む
repeatPSH(8)
plantSeedAndHarvest(8)
print "PSH finish!"  -- 収穫・種植え終了

-- 帰還
goBackHome()

-- 荷物を預ける
r = 0
e = 0
inChest()  -- スロット1,2,3は預けない