diff --git a/gem/darena.gmi b/gem/darena.gmi index e2dfadf..b76ccb6 100644 --- a/gem/darena.gmi +++ b/gem/darena.gmi @@ -54,81 +54,37 @@ you can also find the code in the ( cc0 sejo 12021 ) %DEBUG { .Console/byte DEO #0a .Console/char DEO } - -=> ./ .Console/byte DEO #0a .Console/char DEO .gmi { .Console/byte DEO #0a .Console/char DEO } %DEBUG2 { .Console/short DEO2 #0a .Console/char DEO } -=> ./ .Console/short DEO2 #0a .Console/char DEO .gmi { .Console/short DEO2 #0a .Console/char DEO } - ( parameters ) %nrocks { #1f } - -=> ./ #1f .gmi { #1f } %nrocks-1 { #1e } - -=> ./ #1e .gmi { #1e } %nrocks_mask { #1f } - -=> ./ #1f .gmi { #1f } %minposx { #0f } - -=> ./ #0f .gmi { #0f } %minposy { #0f } - -=> ./ #0f .gmi { #0f } %maxposx { #f1 } - -=> ./ #f1 .gmi { #f1 } %maxposy { #f1 } - -=> ./ #f1 .gmi { #f1 } %anispeedmask_normal { #03 } - -=> ./ #03 .gmi { #03 } %anispeedmask_slow { #07 } -=> ./ #07 .gmi { #07 } - %c_color_normal { #33 } - -=> ./ #33 .gmi { #33 } %c_color_flipx { #73 } - -=> ./ #73 .gmi { #73 } %index_norock { #ff } -=> ./ #ff .gmi { #ff } - ( output macros ) %out_screen_x { LDA #00 SWP .Screen/x DEO2 } ( ;addr ) - -=> ./ LDA #00 SWP .Screen/x DEO2 .gmi { LDA #00 SWP .Screen/x DEO2 } %out_screen_y { LDA #00 SWP .Screen/y DEO2 } ( ;addr ) -=> ./ LDA #00 SWP .Screen/y DEO2 .gmi { LDA #00 SWP .Screen/y DEO2 } - ( helper macros ) %get_bit_n { SFT #01 AND } - -=> ./ SFT #01 AND .gmi { SFT #01 AND } %get_nibble_h { #04 SFT #0f AND } - -=> ./ #04 SFT #0f AND .gmi { #04 SFT #0f AND } %get_nibble_l { #0f AND } -=> ./ #0f AND .gmi { #0f AND } - %is_bit_n_set { get_bit_n #01 EQU } -=> ./ get_bit_n #01 EQU .gmi { get_bit_n #01 EQU } - %set_animate { #01 ;c_state LDA ORA ;c_state STA } - -=> ./ #01 ;c_state LDA ORA ;c_state STA .gmi { #01 ;c_state LDA ORA ;c_state STA } %rst_animate { #00 ;c_state STA } -=> ./ #00 ;c_state STA .gmi { #00 ;c_state STA } - ( devices ) |00 @System [ &vector $2 &wst $1 &rst $1 &pad $4 &r $2 &g $2 &b $2 ] diff --git a/gem2gem.awk b/gem2gem.awk index 6f1ff5f..6537d79 100644 --- a/gem2gem.awk +++ b/gem2gem.awk @@ -17,7 +17,8 @@ } # si tienen sintaxis de wikilink, y no son líneas de enlace, agrega el link -/^[^=].+{.+}/{ +# (el % es por las líneas de uxn jaja) +/^[^=%].+{.+}/{ i = match( $0, /{.+}/) ifinal = index($0, "}") # índice del } final