RosettaCodeData/Task/Character-codes/Commodore-BASIC/character-codes.basic

5 lines
180 B
Plaintext

10 CH = 65: REM IN PETSCII CODE FOR 'A' IS 65
20 D$ = "B": REM D$ HOLDS THE CHARACTER 'B'
30 PRINT CHR$(CH): REM THIS PRINTS 'A'
40 PRINT ASC(D$): REM THIS PRINTS 66