首页
学习
活动
专区
圈层
工具
发布
社区首页 >问答首页 >6510/6502 C64键盘输入打印到屏幕并存储内存问题

6510/6502 C64键盘输入打印到屏幕并存储内存问题
EN

Stack Overflow用户
提问于 2021-07-03 23:05:48
回答 1查看 354关注 0票数 0

通过查看我的c64参考书中的屏幕显示部分,我在下面输入的字符正在正确地打印屏幕,但是当回忆以后再次从内存中打印出来时,它们就不是了。:(

基本上,如果输入一个"A“,我得到黑桃符号,"S”作为心脏符号回来,"X“作为一个俱乐部回来。我必须声明这种情况不会发生,因为我输入的用户,并看到我的文本打印到屏幕-这是很好的工作。只有当我按回车时才会出错,因为我认为用户和字符存储在$1000,x( inx发生在按下键后)在分配区域的更低处显示为符号,后面是@符号,以构成我所能看到的其余字节中的空空间。

不好意思,杂乱无章的/新设计的代码,我已经学习了一个星期左右-只有基本的作为一个排序的基础。

我运行调试器,当在程序中输入"ASX“时,通过调试器的内存位置看起来如下.

41 53 58 00 00 00♠♥♣@

代码语言:javascript
复制
;USER INPUTS NAME OF CORPORATION

getnamea
        ldx #00
        ldy #00
        jmp getnameb

getnameb
       ; ldx $0900   ; transfer the x value here to a safe address

        jsr $FF9F   ;SCNKEY, place ASCII character into keyboard queue
        jsr $FFE4   ;GETIN, this places the ASCII value into the Accumulator 

        BEQ getnameb ;loop until keys are pressed. Branch if zero
        
        JSR $FFD2    ;CHROUT, print it to the screen as it is being typed in.
        CMP #13      ; CMP looks for the carrige return
        BEQ Name2    ; if we find it we branch using BEQ to name2 for msg2 
        ldx $0900
        STA $1000,x  ; also store what is being typed in consecutively? 
        INX
        INY
        stx $0900
        JMP getnameb ; if we don't we loop!        
                    
                    ; * store exactly what has been typed by the user into a place 
                    ;   in memory and give it the varible name: corpname
                    ; * display some more program defined text that includes the 
                    ; users inputted string

msg1    text 'What is the name of your corporation?'
        byte 0

;------------------------------------------------------------------------------------------------------

;PRINT MSG 2

Name2   LDX #00       ; load into the x registry zero


cycle2  LDA msg2,x    ; load into A the msg2, the x sequence.
        CMP #00       ; compare memory and accumulator to the value 0?    
        BEQ reveal   ; branch/jump if the result in A is 0
        STA 1704,x    ; where on the screen does msg2 start?
        INX           ; inc x to move the print along 1 space?
        
        JMP cycle2    ; jump back to the beginning of cycle and do it all again.

; WHAT DOES THIS DO WHEN WE JUST CALL THE ADDRESS $1000?

reveal  LDX #00
reveal1 
        LDA $1000,x
        STA 1784,x
        INX
        TXA
        CMP #16
        BEQ exit
        JMP reveal1
exit    jsr *



msg2    text `New astro mining corp registration...
        byte 0
EN

回答 1

Stack Overflow用户

发布于 2021-07-04 10:15:47

问题解决了,但我想知道是否有更好的方法.

代码语言:javascript
复制
        CLC            ; clear the carry
        LDA $1000,x    ; load the character
        SBC #63        ; subtract 63 from it to get the right character in the first set
票数 1
EN
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接:

https://stackoverflow.com/questions/68240543

复制
相关文章

相似问题

领券
问题归档专栏文章快讯文章归档关键词归档开发者手册归档开发者手册 Section 归档