请教IC卡CPU卡问题？？？？

我复位正确后，建立主文件，代码如下，
但是返回值st=－205（正确:st＝0），请高手分析一下。
ReDim wdata(100) As Byte
    ReDim rdata(100) As Byte
    Dim i As Integer
    wdata(0) = &H80        'nad
    wdata(1) = &HE0      'pcb    
    wdata(2) = &H1B       'length    
    wdata(3) = &H0
    wdata(4) = &H0
    wdata(5) = &H18
    wdata(6) = &HFF
    wdata(7) = &HFF
    wdata(8) = &HFF
    wdata(9) = &HFF
    wdata(10) = &HFF
    wdata(11) = &HFF
    wdata(12) = &HFF
    wdata(13) = &HFF
    wdata(14) = &HF
    wdata(15) = &H1
    wdata(16) = &H31
    wdata(17) = &H50
    wdata(18) = &H41
    wdata(19) = &H59
    wdata(20) = &H2E
    wdata(21) = &H53
    wdata(22) = &H59
    wdata(23) = &H53
    wdata(24) = &H2E
    wdata(25) = &H44
    wdata(26) = &H44
    wdata(27) = &H46
    wdata(28) = &H30
    wdata(29) = &H31           
    wdata(30) = &H0        'bcc
    For i = 0 To 29
        wdata(30) = wdata(i) Xor wdata(30)     'bcc calculation
    Next i
    st = cpu_protocol(icdev, 31, wdata(0), rdata(0))   'create mf