在Commodore BASIC中填充A $(X,X)数组？

Question

我试图用Commodore BASIC中的"."填充A $(X,X).

这就是我到目前为止所拥有的......但我不确定如何处理ASCII值等等.任何评论？

INPUT A$
FOR I = 0 TO X = DIM A$(X,X)
A$(".",x)

我仍然对PET BASIC的API感到非常困惑......任何建议都会非常感激.

Answer 1

我的答案是基于Commodore 64前面的一个年轻人,可能不完全正确的PET系列.但看到你还没有任何其他答案,我会给它一个bash.

在代码的第一行,您要求用户输入一个字符串并将其存储在其中A$.美元符号表示变量是一个字符串.在第二行中,您将重新定义A$为二维数组.尺寸都X没有定义.我不记得DIM有回报值,但我可能是错的.

从char获取ASCII值的函数是ASC()和转换回来使用CHR$()这样的:

10 NUMA = ASC("A"): REM NUMA now contains 65
20 CHARA$ = CHR$(NUMA): REM CHARA$ now contains "A"

您应该知道的是,这些函数使用的"PET ASCII"与ASCII略有不同.它从来没有给我带来任何问题,但它需要记住.

FOR循环总是有一个NEXT结束块这样:

10 FOR A = 1 TO 10
20 PRINT A: REM Displays series of numbers.
30 NEXT

我并不完全清楚你想要达到的目标,但希望我至少能给你足够多的东西来解决它.据我所知,你需要这样的东西:

10 INPUT "Please enter a number:", X
20 DIM A$(X, X)
30 FOR I = 0 TO X
40 FOR J = 0 TO X
50 A$(I, J) = "."
60 NEXT
70 NEXT