"bubblesort"
By GGMethos (https://pastebin.com/u/GGMethos)

URL: https://pastebin.com/PBwFQSt5
Created on: Thursday 3rd of October 2013 10:30:59 AM CDT
Retrieved on: Monday 26 of October 2020 05:56:08 AM UTC


LXI H F000h
MOV C M
LOOP1: LXI H F001h
MOV A M
MOV E A
DCR C
MOV B C
JZ END
LOOP2: INX H
CMP M
JNC SWAP
HERE: DCR B
JNZ LOOP2
JMP LOOP1
SWAP: MOV D A
MOV A M
MOV M D
DCX H
MOV M A
INX H
MOV A E
JMP HERE
END: HLT