You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
33 lines
1.1 KiB
NASM
33 lines
1.1 KiB
NASM
|
|
; Multiply 7 with 10 and print the result
|
|
; For testing this program was assembled with c64 (using the -R option):
|
|
; https://www.aartbik.com/MISC/c64.html
|
|
|
|
strout .equ $1100 ; console output address
|
|
print_flag .equ $009E ; str print flag address
|
|
|
|
; FAST MULTIPLY program from:
|
|
; http://6502.org/source/integers/fastx10.htm
|
|
main LDA #7 ; load 7 into the accumulator
|
|
ASL ;multiply by 2
|
|
STA TEMP ;temp store in TEMP
|
|
ASL ;again multiply by 2 (*4)
|
|
ASL ;again multiply by 2 (*8)
|
|
CLC
|
|
ADC TEMP ;as result, A = x*8 + x*2
|
|
|
|
; PRINT RESULT
|
|
STA strout ; store A into the console output address
|
|
LDX #0 ; 0xA2, 0x00, ; null terminator
|
|
STX strout+1 ; store null terminator to output addr + 1
|
|
|
|
; Set flag to do the print
|
|
LDX #1 ; 0xA2, 0x01,
|
|
STX $9F ; 0x86, 0x9F, ; Print byte flag is at 0x9F
|
|
|
|
; End the program
|
|
RTS ; 0x60
|
|
|
|
; Variables
|
|
TEMP .byte 0
|