b_blue = rb.lcd_rgbpack(0, 63, 255)
h_blue = rb.lcd_rgbpack(0, 136, 255)
black = rb.lcd_rgbpack(0, 0, 0)
white = rb.lcd_rgbpack(255,255,255)
shadow_grey1 = rb.lcd_rgbpack(132,130,132)
shadow_grey2 = rb.lcd_rgbpack(189,195,198)

pos = 0

breakout = 0

while breakout <400
do
  rb.lcd_set_background(white)
  repnum = pos
  rb.lcd_clear_display()

  rb.lcd_set_foreground(b_blue)
  rb.lcd_fillrect(10, 20, 220, 40)


  for i = 0, 219 do
    if repnum <21 then
      rb.lcd_set_foreground(h_blue)
      rb.lcd_vline(10+i, 20, 59)
    end

    if repnum == 40 then
      repnum = 0
    else
      repnum = repnum + 1
    end

  end

  --make the pretty corners and shadows
  rb.lcd_set_foreground(white)
  rb.lcd_drawpixel(10, 20)
  rb.lcd_set_foreground(shadow_grey1)
  rb.lcd_drawpixel(10, 59)
  rb.lcd_drawpixel(229, 59)
  rb.lcd_hline(229,11,60)
  rb.lcd_vline(230,21,59)
  rb.lcd_set_foreground(shadow_grey2)
  rb.lcd_drawpixel(229, 20)
  rb.lcd_drawpixel(10, 60)
  rb.lcd_drawpixel(230, 60)
  rb.lcd_hline(229,11,61)
  rb.lcd_vline(231,22,59)



  rb.lcd_update()
  rb.yield()
  rb.sleep(rb.HZ/39)

  if pos==0 then
    pos=40
  else
    pos = pos-1
  end
  breakout = breakout+1
end

return