2014-03-13 8 views
1

Commodore BASIC에서 A $ (X, X)를 "."로 채우려고합니다.

이것은 내가 지금까지 가지고있는 것입니다.하지만 ASCII 값과 관련하여 무엇을해야할지 잘 모르겠습니다. 모든 논평? 나는 아직도 PET BASIC의 API에 극단적으로 혼란 스러워요

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

은 ... 모든 제안을 크게 감상 할 수있다.

답변

5

내 대답은 Commodore 64 앞에있는 청소년을 기반으로하며 PET 시리즈에는 완전히 맞지 않을 수 있습니다. 그러나 당신이 아직 다른 답변을 얻지 못했기 때문에 나는 그것을 대담하게 할 것입니다.

코드의 첫 번째 줄에서 사용자로부터 문자열을 요청하고 A$에 저장하고 있습니다. 달러 기호는 변수가 문자열임을 나타냅니다. 두 번째 줄에서는 A$을 2 차원 배열로 다시 정의합니다. 크기가 정의되지 않은 X입니다. 나는 반환 값을 가지고 DIM을 회상하지 않지만 틀릴 수 있습니다.

기능 숯불이 ASC()이다에서 ASCII 값을 얻기 위해 당신이 CHR$() 등 사용 다시 변환 : 당신이 알아야 할

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

뭔가가 이러한 기능이 약간 다르다 "PET ASCII"를 사용하는 것이이다 ASCII. 그것은 나에게 아무런 문제도 일으키지 않았지만 기억해야 할 어떤 것.

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

당신이 달성하기 위해 노력하고 있지만, 다행스럽게도 필자는 적어도 당신만큼 조각을 해결하기 위해 주어진 것을 완전히 명확하지 않다 :

FOR 루프는 항상 같은 블록을 종료하는 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