utput as #1
'
'
'
write #1, "**s1sp01"+Ex"\t"+linksp[1]
write #1, "**s1sp02"+Ex"\t"+linksp[2]
write #1, "**s1sp03"+Ex"\t"+linksp[3]
write #1, "**s1sp04"+Ex"\t"+linksp[4]
write #1, "**s1sp05"+Ex"\t"+linksp[5]
'
write #1, "**s1L01"+Ex"\t"+linkl[1]
write #1, "**s1L02"+Ex"\t"+linkl[2]
write #1, "**s1L03"+Ex"\t"+linkl[3]
write #1, "**s1L04"+Ex"\t"+linkl[4]
write #1, "**s1L05"+Ex"\t"+linkl[5]
write #1, "**s1L06"+Ex"\t"+linkl[6]
write #1, "**s1L07"+Ex"\t"+linkl[7]
'
write #1, "**s1R01"+Ex"\t"+linkr[1]
write #1, "**s1R02"+Ex"\t"+linkr[2]
write #1, "**s1R03"+Ex"\t"+linkr[3]
write #1, "**s1R04"+Ex"\t"+linkr[4]
write #1, "**s1R05"+Ex"\t"+linkr[5]
'
n=1
'
for i=1 to 10
keyn[i]=keynelm[Int(Rnd()*50+1)]
keyp[i]=keypelm[Int(Rnd()*50+1)]
keyq[i]=keyqelm[Int(Rnd()*50+1)]
next i
'
'
'stselm=1
stselm[1]="今日は良い天気ですが"+keyt[1]+"についても驚きの新展開がありますかね。"+keyn[1]+"や"+keyn[2]+"と一緒にがん�