谁嫩帮我看下我的这个代码 怎么老是不行

bo583863359

我做的这个就是想从外部读取想要颜色的值  不知道哪里错了 还请大家指点
4 z6 h. J$ q7 P0 P* G8 j5 e4 t
ENTITY/box
STRING/k(100),ch(10)
  W. ^/ T; o6 u6 ^. j0 kFETCH/txt,1,'D:\sz.txt',IFERR,MG:
RESET/1
READ/1,LINNO,10,ch
, H$ b5 n* [9 B7 V3 Wk=VALF(ch)
. y/ g* ~3 c% J# u& ~MASK/71
9 o$ g4 r. D& }8 O8 H
L10:
9 a9 l8 i4 \! w     CHOOSE/'选择颜色',$
            '颜色',resp
3 S  l3 X$ l) u, s) q) v# `0 `     JUMP/L10:,END:,,,L20:,RESP

$ i$ X; B; d/ S/ `+ xL20:
  _7 L" {7 C) C' m- b& E2 s' Z     IDENT/'选择一个面',box,cnt,num,resp
& u/ D: G. f) b* I6 [' {3 l" q     JUMP/L10:,END:,,resp
     &COLOR(box)=k
     JUMP/L10:
END:
/ y) u: N7 g" z% ~( \/ P
6 g; S: y8 [+ l! b4 L& M2 U" MHALT
; i3 {$ ?/ V# Y: D1 q
6 M' q1 I" o1 LMG:
) Q! {: z/ b; a     MESSG/'没有找到 D:\A.txt 文件'
! J% a- C4 }, g9 n; Q7 S/ s2 R

victor_tech

一直用API，不会grip，只能帮你顶一下！

-KASA-

1. CHOOSE语句多余，删掉吧
2. IDENT 不要多选，单选就好。

bo583863359

-KASA- 发表于 2015-3-2 12:12
) Q- T4 {3 s" @: \! p1. CHOOSE语句多余，删掉吧
! b8 L  i' h+ H) p( ^( ~" U9 t2. IDENT 不要多选，单选就好。

改了以后还是这个样子
9 ^/ l; ^+ p- ^4 O+ b

-KASA-

先想清楚，K是字符串，还是数值

18006779302

&COLOR(box)=k"
改为
DO/A:,I,1,num
&COLOR(box(i))=ch
A:
欧了，k是变量number,字符串变量不要，去掉

bo583863359

谢谢各位的指点，问题解决了 ，是我把读入得值整成字符了