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

bo583863359

我做的这个就是想从外部读取想要颜色的值  不知道哪里错了 还请大家指点

ENTITY/box
STRING/k(100),ch(10)
FETCH/txt,1,'D:\sz.txt',IFERR,MG:
RESET/1
READ/1,LINNO,10,ch
# x7 x! ^3 w$ E2 ok=VALF(ch)
' ~. Z' l1 u) b9 }% J1 XMASK/71

, D6 n+ e+ z. e3 x+ RL10:
% N$ T# Q! d0 \3 ?' W' ]5 z9 ]     CHOOSE/'选择颜色',$
            '颜色',resp
     JUMP/L10:,END:,,,L20:,RESP
( l0 u2 ]- e# X2 y, k' v
6 A4 x7 ?" M8 Y# K# H$ VL20:
$ l) c- x  k$ Y     IDENT/'选择一个面',box,cnt,num,resp
     JUMP/L10:,END:,,resp
1 [$ C, e0 ]4 {: ~" O# c     &COLOR(box)=k
; Y  r; w' E" ]     JUMP/L10:
; }8 `9 |6 o; J) J% bEND:

# u5 Z: l% n) |, E3 ?. H4 w" q( [HALT

MG:
     MESSG/'没有找到 D:\A.txt 文件'

victor_tech

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

-KASA-

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

bo583863359

-KASA- 发表于 2015-3-2 12:12
1. CHOOSE语句多余，删掉吧
8 ?+ i9 y4 o9 c4 _/ [) s+ P2. IDENT 不要多选，单选就好。

改了以后还是这个样子

-KASA-

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

18006779302

&COLOR(box)=k"
3 |  R' P# w0 ~' I9 s  s改为
$ p8 q& L* z) p& {) ^DO/A:,I,1,num
: \; U& [( r# {$ q  e &COLOR(box(i))=ch
A:
  ]5 t$ [( h% s4 u9 f3 Y欧了，k是变量number,字符串变量不要，去掉

bo583863359

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