La directiva 'str' me sonaba que existía, pero imagino que es más compatible con otros ensambladores si usamos 'db' y sumamos #80 al último carácter. Ahora bien, la directiva 'charset' no la conocía y es muy interesante, gracias
He aprovechado para currarme el set completo con 'charset' y aplicarlo a la última rutina que puse:
Código: Seleccionar todo
ORG #6000
ld hl,hello
;and a ; borra el flag del carry (puede no ser necesario)
loop: ld a,(hl)
inc hl ; podria ser inc l
rra
call #bb5a
jr nc,loop
ret
hello db "Hello, World","!"+1
charset #20,#40:charset #21,#42:charset #22,#44:charset #23,#46:charset #24,#48:charset #25,#4a
charset #26,#4c:charset #27,#4e:charset #28,#50:charset #29,#52:charset #2a,#54:charset #2b,#56
charset #2c,#58:charset #2d,#5a:charset #2e,#5c:charset #2f,#5e:charset #30,#60:charset #31,#62
charset #32,#64:charset #33,#66:charset #34,#68:charset #35,#6a:charset #36,#6c:charset #37,#6e
charset #38,#70:charset #39,#72:charset #3a,#74:charset #3b,#76:charset #3c,#78:charset #3d,#7a
charset #3e,#7c:charset #3f,#7e:charset #40,#80:charset #41,#82:charset #42,#84:charset #43,#86
charset #44,#88:charset #45,#8a:charset #46,#8c:charset #47,#8e:charset #48,#90:charset #49,#92
charset #4a,#94:charset #4b,#96:charset #4c,#98:charset #4d,#9a:charset #4e,#9c:charset #4f,#9e
charset #50,#a0:charset #51,#a2:charset #52,#a4:charset #53,#a6:charset #54,#a8:charset #55,#aa
charset #56,#ac:charset #57,#ae:charset #58,#b0:charset #59,#b2:charset #5a,#b4:charset #5b,#b6
charset #5c,#b8:charset #5d,#ba:charset #5e,#bc:charset #5f,#be:charset #60,#c0:charset #61,#c2
charset #62,#c4:charset #63,#c6:charset #64,#c8:charset #65,#ca:charset #66,#cc:charset #67,#ce
charset #68,#d0:charset #69,#d2:charset #6a,#d4:charset #6b,#d6:charset #6c,#d8:charset #6d,#da
charset #6e,#dc:charset #6f,#de:charset #70,#e0:charset #71,#e2:charset #72,#e4:charset #73,#e6
charset #74,#e8:charset #75,#ea:charset #76,#ec:charset #77,#ee:charset #78,#f0:charset #79,#f2
charset #7a,#f4:charset #7b,#f6:charset #7c,#f8:charset #7d,#fa:charset #7e,#fc:charset #7f,#fe
la rutina es TXT_OUTPUT (&bb5a)
dentro de los bucles hay que procurar evitar los RET condicionales porque son costosos. En tu ejemplo tenemos al final:
, pero sí, me dí cuenta después.. De todos modos la rutina del firmware es tan lenta que ni se iba a notar.
. pero bueno ya tenemos ofuscamiento, en nuestras cadenas y dominamos el arte de mover un bit pa' cá y otro pa' yá.
rascar un byte es casi un milagro cuando se trata de una subrutina que ocupa solo 10 bytes
