我想做一个authorware计分小系统，已经实现了下面的功能：1. 可以读取外部的记事本文件，在authorware中显示文本内容，包括题干和选项2. 制作了四个按钮分别对应每个选项，可以实现单选3. 用dalist数组记录用户选择的答案，用dblist数组记录标准答案可是无法实现计分的功能，我用下面这段语句来计分，但无法完成：a:=""b:=""i:=0fen:=0 ——记录最后得分的变量repeat while i<50   a:=dalist[i]    b:=dblist[]    if a=b then    fen:=fen+1    end if  i:=i+1end repeat请各位看一下，这段程序什么地方有问题，每次运行之后，fen=1，次次如此。我快崩溃了！！请大家不吝赐教！！多谢多谢！

a:=""
b:=""
i:=1
fen:=0 ——记录最后得分的变量
repeat while i<50
   a:=dalist[i]
    b:=dblist[i]
   if a=b then
       fen:=fen+1
    end if
     i:=i+1
end repeat