试图理解HTBasic代码的问题

时间:2017-05-29 12:00:54

标签: basic

  IF Y$="" THEN
      REPEAT
          INPUT "FILE NAME**strong text** ?",Y$
          Y$=TRIM$(Y$)
      UNTIL LEN(Y$)<8
  END IF

  DISP "enr "&Ld$&"\";Y$
  Nb_rc=VAL(Mesu$(0,5))+1
  ON ERROR CALL Ges_err
  CREATE BDAT Y$&"t",VAL(Mesu$(0,5))+2,7*34
      1   ASSIGN @Voie_0 TO Y$&"t"
      2   OUTPUT @Voie_0;Mesu$(*)
      3   ASSIGN @Voie_0 TO *
  CREATE BDAT Y$&"v",VAL(Mesu$(0,6)),(VAL(Mesu$(0,5))+1)*8
  ASSIGN @Voie_0 TO Y$&"v"
  OUTPUT @Voie_0;V(*)
  ASSIGN @Voie_0 TO *
  OFF ERROR
  RETURN

这是一些HTBasic代码,我无法理解这些行(1,2,3)的作用。

1 个答案:

答案 0 :(得分:0)

我发现了这些线的意思。

第1行:在名为@ Voie_0的“全局变量”中分配文件的路径 第2行:在文件中写入选项卡Mesu的值 第3行:清除全局变量