setVariable("iketyanURLpass", createArray())


def UrlSetPass(n,p)
getVariable("iketyanURLpass")[n] = p
end

def UrlSetPass(n) 
f = false
param = getURLParam()
pass = getVariable("iketyanURLpass")[n]
a = splitString(param,"_")
pass = splitString(getVariable(pass,"_")


if getArrayLength(a) == 4
 h = createArray()
 
 i = 0
 while i < getArrayLength(a)
   h[i] = a[i]
   i = i + 1
 end
speak(pass," ",h)
 fa = 0 ; i = 0 ;
 while i != 4
  if pass[i] == h[i]
  fa = fa + 1
  end
 speak(pass[i]," ",h[i]," ",fa)
 i = i + 1
 end

  if fa == 4
   f = true
  end

return f
end


UrlSetPass(0,"a1_b2_3c_4d") #テスト
if UrlSetPass(0)
speak("ok")
else
speak("bad")
end