// fork from tw:ina_ani:extimg
// fork from tw:ina_ani:nenga2014
!str = getExternalVar("文字", "好きなセリフを")
!str2 = getExternalVar("文字2", "   入れよう")

!a = 0
loop(10)
 scale(a * 0.1 + 1)
  circle()
 !a = a + 1
scale(5)
 fs("black")
  write("drawExtImage http://tiqav.com/1vn.jpg")

scale(0.3,0.6)
 shift(-1.8,-0.1)
  col("white")
   rect()

shift(0,-0.7)
 scale(0.09)
  lw(300)
   ss("white")
    text("外部画像読み込みテスト")
  fs("black")
   text("外部画像読み込みテスト")

shift(-0.6,-0.3)
 scale(0.06)
  fs("black")
   !a = 0;
   loop(stringLength(str))
    shift(2,a * 1.5)
     font("DejimaMincho")
      text(stringCharAt(str,a))
    !a = a + 1;
   !a = 0;
   loop(stringLength(str2))
    shift(0,a * 1.5)
     font("DejimaMincho")
      text(stringCharAt(str2,a))
    !a = a + 1;