📄 led.rom
字号:
@0003AD FF00 // st AL,@$rg+H'7e
@0003AE 1E25
@0003AF 0414 // ld AL,#4
@0003B0 FF00 // st AL,@$rg+H'9b
@0003B1 3B25
@0003B2 EE00 // ld AL,@do_pattern
@0003B3 F615
@0003B4 0184 // cmp AL,#1
@0003B5 05F0 // bne ?L8F1
@0003B6 1C9C // bsr pattern
@0003B7 0014 // ld AL,#0
@0003B8 EE00 // st AL,@do_pattern
@0003B9 F625
@0003BA F8E0 // bra ?L5F1
@0003BB DB01 // st flags,@(-37,Y)
@0003BC DC0A // st XH,@(-36,Y)
@0003BD DD2B // st X,@(-35,Y)
@0003BE DE23 // st AH,@(-34,Y)
@0003BF DF27 // st AL,@(-33,Y)
@0003C0 DB17 // ld AL,@(-37,Y)
@0003C1 10B4 // or AL,#16
@0003C2 DB27 // st AL,@(-37,Y)
@0003C3 FF00 // ld AL,@$fd+H'9f
@0003C4 3F15
@0003C5 04B4 // or AL,#4
@0003C6 FF00 // st AL,@$fd+H'9f
@0003C7 3F25
@0003C8 0114 // ld AL,#1
@0003C9 EE00 // st AL,@do_pattern
@0003CA F625
@0003CB DB3C // add Y,#-37
@0003CC 253C // add Y,#37
@0003CD DF17 // ld AL,@(-33,Y)
@0003CE DE13 // ld AH,@(-34,Y)
@0003CF DD1B // ld X,@(-35,Y)
@0003D0 DC0E // ld XH,@(-36,Y)
@0003D1 DB0D // rti @(-37,Y)
@0003D2 FE0A // st XH,@(-2,Y)
@0003D3 FF2B // st X,@(-1,Y)
@0003D4 EE00 // ld AL,@pattern?count
@0003D5 F515
@0003D6 0134 // add AL,#1
@0003D7 0FC4 // and AL,#15
@0003D8 EE00 // st AL,@pattern?count
@0003D9 F525
@0003DA 0D14 // ld AL,#'\r'
@0003DB FE3C // add Y,#-2
@0003DC 789C // bsr $putchar
@0003DD 2014 // ld AL,#' '
@0003DE 769C // bsr $putchar
@0003DF 0210 // ld AH,#2
@0003E0 0514 // ld AL,#5
@0003E1 0100 // bsr $lcd_xy
@0003E2 199C
@0003E3 EE00 // ld AL,@pattern?count
@0003E4 F515
@0003E5 08C4 // and AL,#8
@0003E6 0BF4 // beq ?L4F3
@0003E7 0010 // ld AH,#0
@0003E8 0314 // ld AL,#3
@0003E9 0100 // bsr $gpio_wr
@0003EA 369C
@0003EB 4F14 // ld AL,#'O'
@0003EC 0100 // bsr $lcd_putc
@0003ED 699C
@0003EE 4F14 // ld AL,#'O'
@0003EF 659C // bsr $putchar
@0003F0 0AE0 // bra ?L8F3
@0003F1 0110 // ld AH,#1
@0003F2 0314 // ld AL,#3
@0003F3 0100 // bsr $gpio_wr
@0003F4 2C9C
@0003F5 5814 // ld AL,#'X'
@0003F6 0100 // bsr $lcd_putc
@0003F7 5F9C
@0003F8 5814 // ld AL,#'X'
@0003F9 5B9C // bsr $putchar
@0003FA 2014 // ld AL,#' '
@0003FB 599C // bsr $putchar
@0003FC 0210 // ld AH,#2
@0003FD 0714 // ld AL,#7
@0003FE 0100 // bsr $lcd_xy
@0003FF FC9C
@000400 EE00 // ld AL,@pattern?count
@000401 F515
@000402 04C4 // and AL,#4
@000403 0BF4 // beq ?L11F3
@000404 0010 // ld AH,#0
@000405 0214 // ld AL,#2
@000406 0100 // bsr $gpio_wr
@000407 199C
@000408 4F14 // ld AL,#'O'
@000409 0100 // bsr $lcd_putc
@00040A 4C9C
@00040B 4F14 // ld AL,#'O'
@00040C 489C // bsr $putchar
@00040D 0AE0 // bra ?L15F3
@00040E 0110 // ld AH,#1
@00040F 0214 // ld AL,#2
@000410 0100 // bsr $gpio_wr
@000411 0F9C
@000412 5814 // ld AL,#'X'
@000413 0100 // bsr $lcd_putc
@000414 429C
@000415 5814 // ld AL,#'X'
@000416 3E9C // bsr $putchar
@000417 2014 // ld AL,#' '
@000418 3C9C // bsr $putchar
@000419 0210 // ld AH,#2
@00041A 0914 // ld AL,#9
@00041B 0100 // bsr $lcd_xy
@00041C DF9C
@00041D EE00 // ld AL,@pattern?count
@00041E F515
@00041F 02C4 // and AL,#2
@000420 0BF4 // beq ?L18F3
@000421 0010 // ld AH,#0
@000422 0114 // ld AL,#1
@000423 0100 // bsr $gpio_wr
@000424 FC9C
@000425 4F14 // ld AL,#'O'
@000426 0100 // bsr $lcd_putc
@000427 2F9C
@000428 4F14 // ld AL,#'O'
@000429 2B9C // bsr $putchar
@00042A 0AE0 // bra ?L22F3
@00042B 0110 // ld AH,#1
@00042C 0114 // ld AL,#1
@00042D 0100 // bsr $gpio_wr
@00042E F29C
@00042F 5814 // ld AL,#'X'
@000430 0100 // bsr $lcd_putc
@000431 259C
@000432 5814 // ld AL,#'X'
@000433 219C // bsr $putchar
@000434 2014 // ld AL,#' '
@000435 1F9C // bsr $putchar
@000436 0210 // ld AH,#2
@000437 0B14 // ld AL,#11
@000438 0100 // bsr $lcd_xy
@000439 C29C
@00043A EE00 // ld AL,@pattern?count
@00043B F515
@00043C 01C4 // and AL,#1
@00043D 0BF4 // beq ?L25F3
@00043E 0010 // ld AH,#0
@00043F 0014 // ld AL,#0
@000440 0100 // bsr $gpio_wr
@000441 DF9C
@000442 4F14 // ld AL,#'O'
@000443 0100 // bsr $lcd_putc
@000444 129C
@000445 4F14 // ld AL,#'O'
@000446 0E9C // bsr $putchar
@000447 0AE0 // bra ?L29F3
@000448 0110 // ld AH,#1
@000449 0014 // ld AL,#0
@00044A 0100 // bsr $gpio_wr
@00044B D59C
@00044C 5814 // ld AL,#'X'
@00044D 0100 // bsr $lcd_putc
@00044E 089C
@00044F 5814 // ld AL,#'X'
@000450 049C // bsr $putchar
@000451 023C // add Y,#2
@000452 FE0E // ld XH,@(-2,Y)
@000453 FFE3 // bra @(-1,Y)
@000454 FF27 // st AL,@(-1,Y)
@000455 FD0A // st XH,@(-3,Y)
@000456 FE2B // st X,@(-2,Y)
@000457 FC27 // st AL,@(-4,Y)
@000458 FC17 // ld AL,@(-4,Y)
@000459 FB3C // add Y,#-5
@00045A 0100 // bsr $duart_a_tx
@00045B 459C
@00045C 0117 // ld AL,@(1,Y)
@00045D 0100 // bsr $duart_b_tx
@00045E 539C
@00045F 0117 // ld AL,@(1,Y)
@000460 053C // add Y,#5
@000461 FD0E // ld XH,@(-3,Y)
@000462 FEE3 // bra @(-2,Y)
@000463 FE0A // st XH,@(-2,Y)
@000464 FF2B // st X,@(-1,Y)
@000465 0014 // ld AL,#0
@000466 FC3C // add Y,#-4
@000467 0127 // st AL,@(1,Y)
@000468 0113 // ld AH,@(1,Y)
@000469 4600 // cmp AH,#18000
@00046A 5080
@00046B 06FC // bcs ?L4F1
@00046C 07E0 // bra ?L7F1
@00046D 0117 // ld AL,@(1,Y)
@00046E 0134 // add AL,#1
@00046F 0127 // st AL,@(1,Y)
@000470 F8E0 // bra ?L5F1
@000471 0000 // nop
@000472 FBE0 // bra ?L6F1
@000473 043C // add Y,#4
@000474 FE0E // ld XH,@(-2,Y)
@000475 FFE3 // bra @(-1,Y)
@000476 FE0A // st XH,@(-2,Y)
@000477 FF2B // st X,@(-1,Y)
@000478 0200 // ld AL,#546
@000479 2214
@00047A AF25 // st AL,@$rg+H'10f
@00047B 0400 // ld AL,#1092
@00047C 4414
@00047D AF25 // st AL,@$rg+H'10f
@00047E 4400 // ld AL,#17472
@00047F 4014
@000480 B125 // st AL,@$rg+H'111
@000481 0414 // ld AL,#4
@000482 B225 // st AL,@$rg+H'112
@000483 0000 // nop
@000484 0314 // ld AL,#3
@000485 FE3C // add Y,#-2
@000486 0100 // bsr $_lcd_nibble_wr
@000487 3B9C
@000488 DB9C // bsr delay_5ms
@000489 0314 // ld AL,#3
@00048A 0100 // bsr $_lcd_nibble_wr
@00048B 379C
@00048C D79C // bsr delay_5ms
@00048D 0314 // ld AL,#3
@00048E 0100 // bsr $_lcd_nibble_wr
@00048F 339C
@000490 D39C // bsr delay_5ms
@000491 0214 // ld AL,#2
@000492 0100 // bsr $_lcd_nibble_wr
@000493 2F9C
@000494 CF9C // bsr delay_5ms
@000495 2814 // ld AL,#40
@000496 0100 // bsr $_lcd_cmd_wr
@000497 6C9C
@000498 0C14 // ld AL,#12
@000499 0100 // bsr $_lcd_cmd_wr
@00049A 699C
@00049B 0114 // ld AL,#1
@00049C 0100 // bsr $_lcd_cmd_wr
@00049D 669C
@00049E 0614 // ld AL,#6
@00049F 0100 // bsr $_lcd_cmd_wr
@0004A0 639C
@0004A1 C29C // bsr delay_5ms
@0004A2 023C // add Y,#2
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -