(4.1.3)この調子で右の壁や底も描く

-- 4.1.3 この調子で右の壁や底も描く
local w = platform.window.width()   -- 画面の幅を取得して w に代入
local h = platform.window.height()  -- 画面の高さを取得して h に代入
local sideLen = math.floor(h/25)    -- 四角の 1 辺の長さを指定して sideLen に代入
local dansa = math.floor(h/20)      -- 1 段の長さを指定して dansa に代入
function on.paint(gc)
     for i = 0, 19 do  
         gc:fillRect(0,            -- 左の壁。四角を 20 個積む。
                     i * dansa,    
                     sideLen,     
                     sideLen)     
         gc:fillRect(11 * dansa,   -- 右の壁。四角を 20 個積む。
                     i * dansa,    
                     sideLen,     
                     sideLen)
     end
     for i = 0, 9 do              -- 底
         gc:fillRect(dansa + (i * dansa),
                     dansa * 19,
                     sideLen,     
                     sideLen) 
     end
end

ハンドへルド・ビュー:
f:id:ti-nspire:20150209140124j:plain


参考文献: