Skip to content

Instantly share code, notes, and snippets.

@larsbrinkhoff
Created March 6, 2018 09:22
Show Gist options
  • Save larsbrinkhoff/642f52133fc7194e45fe51a6f5906435 to your computer and use it in GitHub Desktop.
Save larsbrinkhoff/642f52133fc7194e45fe51a6f5906435 to your computer and use it in GitHub Desktop.
MIDAS 16K, instructions below 100
000000: 200400005425 move 10, 5425 ;"0$ L5"
000001: 312400005421 came 10, 5421 ;"94 L1"
000002: 254000012007 jrst 12007 ;"5@ !0'"
000003: 260040013224 pushj 1, 13224 ;"6 @!:4"
000004: 205400100000 movsi 10, 100000 ;"0L ( "
000005: 254000011767 jrst 11767 ;"5@ !/W"
000006: 262040000006 pop 1, 6 ;"60@ &"
000007: 211440003177 movni 11, 3177 ;"1,@ 9_"
000010: 260040012412 pushj 1, 12412 ;"6 @!4*"
000011: 200246020500 move 5, 20500(6) ;"0"F"% " " \n0! "
000012: 621240740000 tlz 5, 740000 ;"R*@\ "
000013: 322240012021 jumpe 5, 12021 ;":2@!01"
000014: 271300000002 addi 6, 2 ;"7+ ""
000015: 301300006376 cail 6, 6376 ;"8+ S^"
000016: 201300000000 movei 6, 0 ;"0+ " " ,\0\0\0"
000017: 346440012011 aojn 11, 12011 ;"<T@!0)"
000020: 250740000026 exch 17, 26 ;"5'@ 6"
000021: 270740000026 add 17, 26 ;"7'@ 6"
000022: 251755000000 blt 17, (15) ;"5/M " "*>h\0\0"
000023: 200740000026 move 17, 26 ;"0'@ 6"
000024: 251740000017 blt 17, 17 ;"5/@ /"
000025: 043300000010 .core 10 ;"$; ("
000026: 012000000000 ;"!0 "
000027: 043200000000 .value 0 ;"$: "
000034: 254000000020 jrst 20 ;"5@ 0"
000035: 045700000000 .break 16, 0 ;"$O " "\t<\0\0\0"
000036: 045740000000 .break 17, 0 ;"$O@ " "\t>\0\0\0"
000041: 264000013745 jsr 13745 ;"6@ !?E"
000044: 264000001654 jsr 1654 ;"6@ .L"
000045: 264000001654 jsr 1654 ;"6@ .L"
000046: 264000001176 jsr 1176 ;"6@ )^"
000047: 000000000000 ;" "
000050: 264000000463 jsr 463 ;"6@ $S"
000054: 264000000514 jsr 514 ;"6@ %,"
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment