6502/acme
1
0
Fork 0
mirror of https://github.com/uffejakobsen/acme.git synced 2025-02-16 19:32:16 +00:00
Code Issues Projects Releases Wiki Activity

added examples to docs on how to iterate over list args in macros

Browse Source 
git-svn-id: https://svn.code.sf.net/p/acme-crossass/code-0/trunk@375 4df02467-bbd4-4a76-a152-e7ce94205b78
This commit is contained in:
marcobaye 2024-06-24 13:37:50 +00:00
parent 0e20eeafd5
commit b643115017
1 changed files with 32 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

35
docs/AllPOs.txt
View File

@ -20,10 +20,13 @@ Section: How to insert values
Call: !8 EXPRESSION [, EXPRESSION]* Call: !8 EXPRESSION [, EXPRESSION]*
Purpose: Insert 8-bit values. Purpose: Insert 8-bit values.
Parameters: EXPRESSION: Any formula the value parser accepts. Parameters: EXPRESSION: Any formula the value parser accepts.
"list" objects will be treated as if all their items
were given separately.
Aliases: "!08", "!by", "!byte" Aliases: "!08", "!by", "!byte"
Examples: !08 127, symbol, -128 ; output some values Examples: !08 127, symbol, -128 ; output some values
!by 14, $3d, %0110, &304, <*, 'c' !by 14, $3d, %0110, &304, <*, 'c'
!byte 3 - 4, symbol1 XOR symbol2, 2 ^ tz, (3+4)*7 !byte 3 - 4, symbol1 XOR symbol2, 2 ^ tz, (3+4)*7
!byte [2, 3, 5, 7], other_list ; iterate over items
Call: !16 EXPRESSION [, EXPRESSION]* Call: !16 EXPRESSION [, EXPRESSION]*
@ -35,6 +38,7 @@ Aliases: "!wo", "!word" (and because all currently supported
Examples: !16 65535, symbol, -32768 ; output some values Examples: !16 65535, symbol, -32768 ; output some values
!wo 14, $4f35, %100101010010110, &36304, *, 'c' !wo 14, $4f35, %100101010010110, &36304, *, 'c'
!word 3000 - 4, a1 AND a2, 2 ^ tz, (3+4)*70, l1 & .j2 !word 3000 - 4, a1 AND a2, 2 ^ tz, (3+4)*70, l1 & .j2
!word [2, 3, 5, 7], other_list ; iterate over items
Call: !le16 EXPRESSION [, EXPRESSION]* Call: !le16 EXPRESSION [, EXPRESSION]*
Purpose: Insert 16-bit values in little-endian byte order. Purpose: Insert 16-bit values in little-endian byte order.
@ -44,6 +48,7 @@ Aliases: None (but because all currently supported CPUs are
Examples: !le16 65535, symbol, -32768 ; output some values Examples: !le16 65535, symbol, -32768 ; output some values
!le16 14, $4f35, %100101010010110, &36304, *, 'c' !le16 14, $4f35, %100101010010110, &36304, *, 'c'
!le16 3000 - 4, a1 AND a2, 2 ^ tz, (3+4)*70, l1 & .j2 !le16 3000 - 4, a1 AND a2, 2 ^ tz, (3+4)*70, l1 & .j2
!le16 [2, 3, 5, 7], other_list ; iterate over items
Call: !be16 EXPRESSION [, EXPRESSION]* Call: !be16 EXPRESSION [, EXPRESSION]*
Purpose: Insert 16-bit values in big-endian byte order. Purpose: Insert 16-bit values in big-endian byte order.
@ -52,6 +57,7 @@ Aliases: None
Examples: !be16 65535, symbol, -32768 ; output some values Examples: !be16 65535, symbol, -32768 ; output some values
!be16 14, $4f35, %100101010010110, &36304, *, 'c' !be16 14, $4f35, %100101010010110, &36304, *, 'c'
!be16 3000 - 4, a1 AND a2, 2 ^ tz, (3+4)*70, l1 & .j2 !be16 3000 - 4, a1 AND a2, 2 ^ tz, (3+4)*70, l1 & .j2
!be16 [2, 3, 5, 7], other_list ; iterate over items
Call: !24 EXPRESSION [, EXPRESSION]* Call: !24 EXPRESSION [, EXPRESSION]*
@ -62,6 +68,7 @@ Aliases: None (but because all currently supported CPUs are
Examples: !24 16777215, symbol, -8388608, 14, $6a4f35 Examples: !24 16777215, symbol, -8388608, 14, $6a4f35
!24 %10010110100101010010110, &47336304, *, 'c' !24 %10010110100101010010110, &47336304, *, 'c'
!24 300000 - 4, a1 AND a2, 2 ^ tz, (3+4)*70, l1 & .j2 !24 300000 - 4, a1 AND a2, 2 ^ tz, (3+4)*70, l1 & .j2
!24 [2, 3, 5, 7], other_list ; iterate over items
Call: !le24 EXPRESSION [, EXPRESSION]* Call: !le24 EXPRESSION [, EXPRESSION]*
Purpose: Insert 24-bit values in little-endian byte order. Purpose: Insert 24-bit values in little-endian byte order.
@ -71,6 +78,7 @@ Aliases: None (but because all currently supported CPUs are
Examples: !le24 16777215, symbol, -8388608, 14, $6a4f35 Examples: !le24 16777215, symbol, -8388608, 14, $6a4f35
!le24 %10010110100101010010110, &47336304, *, 'c' !le24 %10010110100101010010110, &47336304, *, 'c'
!le24 300000 - 4, a1 AND a2, 2 ^ tz, (3+4)*70, l1 & .j2 !le24 300000 - 4, a1 AND a2, 2 ^ tz, (3+4)*70, l1 & .j2
!le24 [2, 3, 5, 7], other_list ; iterate over items
Call: !be24 EXPRESSION [, EXPRESSION]* Call: !be24 EXPRESSION [, EXPRESSION]*
Purpose: Insert 24-bit values in big-endian byte order. Purpose: Insert 24-bit values in big-endian byte order.
@ -79,6 +87,7 @@ Aliases: None
Examples: !be24 16777215, symbol, -8388608, 14, $6a4f35 Examples: !be24 16777215, symbol, -8388608, 14, $6a4f35
!be24 %10010110100101010010110, &47336304, *, 'c' !be24 %10010110100101010010110, &47336304, *, 'c'
!be24 300000 - 4, a1 AND a2, 2 ^ tz, (3+4)*70, l1 & .j2 !be24 300000 - 4, a1 AND a2, 2 ^ tz, (3+4)*70, l1 & .j2
!be24 [2, 3, 5, 7], other_list ; iterate over items
Call: !32 EXPRESSION [, EXPRESSION]* Call: !32 EXPRESSION [, EXPRESSION]*
@ -89,6 +98,7 @@ Aliases: None (but because all currently supported CPUs are
Examples: !32 $7fffffff, symbol, -$80000000, 14, $46a4f35 Examples: !32 $7fffffff, symbol, -$80000000, 14, $46a4f35
!32 %1001011010010101001011010010, &4733630435, *, 'c' !32 %1001011010010101001011010010, &4733630435, *, 'c'
!32 300000 - 4, a AND a2, 2 ^ tz, (3+4)*70, l1 & .j2 !32 300000 - 4, a AND a2, 2 ^ tz, (3+4)*70, l1 & .j2
!32 [2, 3, 5, 7], other_list ; iterate over items
Call: !le32 EXPRESSION [, EXPRESSION]* Call: !le32 EXPRESSION [, EXPRESSION]*
Purpose: Insert 32-bit values in little-endian byte order. Purpose: Insert 32-bit values in little-endian byte order.
@ -98,6 +108,7 @@ Aliases: None (but because all currently supported CPUs are
Examples: !le32 $7fffffff, symbol, -$80000000, 14, $46a4f35 Examples: !le32 $7fffffff, symbol, -$80000000, 14, $46a4f35
!le32 %1001011010010101001011010010, &4733630435, *, 'c' !le32 %1001011010010101001011010010, &4733630435, *, 'c'
!le32 300000 - 4, a AND a2, 2 ^ tz, (3+4)*70, l1 & .j2 !le32 300000 - 4, a AND a2, 2 ^ tz, (3+4)*70, l1 & .j2
!le32 [2, 3, 5, 7], other_list ; iterate over items
Call: !be32 EXPRESSION [, EXPRESSION]* Call: !be32 EXPRESSION [, EXPRESSION]*
Purpose: Insert 32-bit values in big-endian byte order. Purpose: Insert 32-bit values in big-endian byte order.
@ -106,6 +117,7 @@ Aliases: None
Examples: !be32 $7fffffff, symbol, -$80000000, 14, $46a4f35 Examples: !be32 $7fffffff, symbol, -$80000000, 14, $46a4f35
!be32 %1001011010010101001011010010, &4733630435, *, 'c' !be32 %1001011010010101001011010010, &4733630435, *, 'c'
!be32 300000 - 4, a AND a2, 2 ^ tz, (3+4)*70, l1 & .j2 !be32 300000 - 4, a AND a2, 2 ^ tz, (3+4)*70, l1 & .j2
!be32 [2, 3, 5, 7], other_list ; iterate over items
Call: !hex PAIRS_OF_HEX_DIGITS Call: !hex PAIRS_OF_HEX_DIGITS
@ -811,9 +823,26 @@ or type (call-by-value vs. call-by-reference). So
can *all* be used at the same time without any name clash. can *all* be used at the same time without any name clash.
Since release 0.97, lists are supported. This is useful for macros if Since release 0.97, lists are supported. This is useful for macros if
you want an arbitrary number of arguments: Just define the macro with you want an arbitrary number of arguments: Just pass a list or string
a single argument, then pass a list and have the macro iterate over as one of the arguments and have the macro iterate over its contents.
its contents. Examples: ; a macro to store any number of arguments as 16-bit values:
!macro iter_example @iterable {
!for @item in @iterable {
!16 @item
}
}
+iter_example [2, 3, 5, 7] ; iterate over list items
+iter_example "string" ; iterate over characters
; a macro to "encrypt" each argument with its index:
!macro scramble @iterable {
@length = len(@iterable)
!for @index, 0, @length - 1 {
!byte @iterable[@index] xor @index
}
}
+scramble [2, 3, 5, 7] ; iterate over list items
+scramble "string" ; iterate over characters
---------------------------------------------------------------------- ----------------------------------------------------------------------