subscribe to codewalrus
Started by 123outerme, February 23, 2017, 11:42:53 pm
0 Members and 1 Guest are viewing this topic.
.nolist#include "ti83plus.inc"#define ProgStart $9D95.list.org ProgStart - 2.db t2ByteTok, tAsmCmp ;b_call(_RunIndicOff) b_call(_ClrLCDFull) ld HL, numVar b_call(_DispHL) KeyLoop: b_call(_GetCSC) cp skUp ; If the up arrow key was pressed. JR Z, Increase cp skDown ; If the down arrow key was pressed. JR Z, Decrease cp skClear ; If the CLEAR key was pressed. JR Z, Finish JR KeyLoop ; If any other key was pressed, or none, redo _GetCSC.Increase: ld A, H cp 255 JR Z, KeyLoop inc HL ld (numVar), HL JR PrintHLDecrease: ld A, H cp 0 JR Z, KeyLoop dec HL ld (numVar), HLPrintHL: b_call(_ClrLCDFull) b_call(_DispHL) JR KeyLoopFinish: ;b_call(_RunIndicOn) b_call(_ClrLCDFull) retnumVar: .db 0.end
Quote from: tr1p1ea on February 24, 2017, 09:03:03 amWith BRASS have you included the '.binarymode ti8x' directive?http://www.benryves.com/bin/brass/
CodeWalr.us 2.0 © 2019, DJ Omnimaga & Juju
Page created in 0.036 seconds with 37 queries.