$dat[0] = "sen;$sen,gou;$gou,haka;$haka,ikki;$ikki,syokai;$syokai,noukai;$noukai,la;$la,nm;$in{'nm'},pw;$in{'pw'},id;$in{'id'},sei;$in{'sei'},