//ロゴを作ってみる
addDescription("h1","偽物語")
addDescription("","好きな文字にかえられます")

!sr = \(s)
 font("IPAMincho")
  scale(0.08,0.1)
   skew(0,-0.1)
    bs("gray")
     blur(10)
      ssgrad()
       lgrad(0,-10,0,10)
        cs(0,"#0dd")
        cs(1,"#0d0")
       lw(100)
        text(s)
   fs("white")
    ss("white")
     blur(0)
      lw(1)
       skew(0,-0.1)
        text(s)
!ssr = \(s)
 font("UmeGothic")
  scale(0.08,0.1)
   skew(0,-0.1)
    bs("gray")
     blur(10)
      ssgrad()
       lgrad(0,-10,0,10)
        cs(0,"#0dd")
        cs(1,"#0d0")
       lw(200)
        text(s)
   fs("white")
    ss("white")
     blur(0)
      lw(1)
       skew(0,-0.1)
        text(s)
!title = getExternalVar("漢字3文字","偽物語")
!kana1 = getExternalVar("カタカナ1","ニセモノ")
!kana2 = getExternalVar("カタカナ2","ガタリ")
scale(1.7)
 scale(2)
  shift(-0.18,0)
   sr(stringCharAt(title,0))
  shift(-0,0)
   sr(stringCharAt(title,1))
  shift(0.18,0)
   sr(stringCharAt(title,2))
 !a = 0
 !max = stringLength(kana1)
 scale(0.5)
  shift(-0.47,0.05)
   loop(max)
    shift(0.3/max*a,0)
     ssr(stringCharAt(kana1,a))
    !a = a + 1
 !a = 0
 !max = stringLength(kana2)
 scale(0.5)
  shift(0.25,0.05)
   loop(max)
    shift(0.3/max*a,0)
     ssr(stringCharAt(kana2,a))
    !a = a + 1