Log inRegister an accountBrowse CSDbHelp & documentationFacts & StatisticsThe forumsAvailable RSS-feeds on CSDbSupport CSDb Commodore 64 Scene Database
You are not logged in - nap
CSDb User Forums


Forums > C64 Coding > Assembler with dynamic symbol creation
2016-06-12 06:19
Hypnosis

Registered: Mar 2015
Posts: 36
Assembler with dynamic symbol creation

I have read some documentation for an assembler that allowed labels or symbols to be created dynamically, basically by concatenating strings. Which assembler was that?
 
... 15 posts hidden. Click here to view all posts....
 
2016-06-15 20:16
soci

Registered: Sep 2003
Posts: 480
Example of doynax translated:
smc_store       .segment name
\{name}_value   = *+1
                lda #$00
\{name}_addr    = *+1
                sta @w$0000
                .endm

                *= $1000
                #smc_store test
                sta test_value
But don't do it, this is evil ;)
smc_store       .macro
value           = *+1
                lda #$00
addr            = *+1
                sta @w$0000
                .endm

                *= $1000
test            #smc_store
                sta test.value
Somewhat better.

Hypnosis: Later 64tass versions tolerate "wrong" definition and use ordering.
					    *= $1000
.1000	4c 06 10	jmp $1006	    jmp l[0]
.1003	4c 07 10	jmp $1007	    jmp l[1]

=[$1006,$1007]				l   = [b1, b2]

.1006	ea		nop		b1  nop
.1007	ea		nop		b2  nop
Unsurprisingly it has suboptimal performance compared to proper ordering.

Slammer: I was thinking about this sort of list generation some time ago for .rept when it was still hard to implement it. Now it'd be much easier, but I can't think of a compelling use for it in my sources (yet). Even if it'd be available now probably I'd still write the above example like this:
    *= $1000
count = 25
    .for i = 0, i < count, i = i + 1
    lda #i
    sta (+)+1
    .section speedcode
+    lda #0
     sta $d020
    .send
    .next

    .dsection speedcode ; right after the modifier
This compiles the two code parts in tandem so an anonymous label is good enough. Results in:
.1000	a9 01		lda #$00	    lda #i
.1002	8d 7e 10	sta $107e	    sta (+)+1
.107d	a9 00		lda #$00	+    lda #0
.107f	8d 20 d0	sta $d020	     sta $d020
.1005	a9 01		lda #$01	    lda #i
.1007	8d 83 10	sta $1083	    sta (+)+1
.1082	a9 00		lda #$00	+    lda #0
.1084	8d 20 d0	sta $d020	     sta $d020
...
In case of more labels it'd name them properly and stick in a .block scope to avoid the symbol collisions.
2016-06-16 05:23
Hypnosis

Registered: Mar 2015
Posts: 36
Interesting use of sections!
2016-06-16 05:27
Hypnosis

Registered: Mar 2015
Posts: 36
Quoting Slammer
Scoping solution = you access the scope instance of a given iteration of the loop


Ah, that was the missing part in my puzzle. I haven't seen this before.
2016-06-19 11:15
Slammer

Registered: Feb 2004
Posts: 416
Soci: I prefer the scoping solution so I will stick to that, but I guess its a matter of taste. And nobody says you can't do both. Seems like we pretty much agree on scoping for macro executions...
.macro smc_store() {
      .label value =*+1
      lda #$00
      .label addr = *+1
      sta.a $0000
}

      *= $1000
test: smc_store()
      sta test.value 
2016-06-22 10:48
Peacemaker

Registered: Sep 2004
Posts: 275
at the moment i doing it like this with kickass:

.const count=25
loop1: .for(var i=0; i<count; i++) {
lda #i
sta loop2+1+i*5
}


loop2: .for(var i=0; i<count; i++) {
color: lda #0
sta $d020
}
2016-06-22 11:49
Oswald

Registered: Apr 2002
Posts: 5094
Quote: at the moment i doing it like this with kickass:

.const count=25
loop1: .for(var i=0; i<count; i++) {
lda #i
sta loop2+1+i*5
}


loop2: .for(var i=0; i<count; i++) {
color: lda #0
sta $d020
}


lda #i
ldy #$01
sta (fe),y

lda fe
clc
adc #$05
sta fe
bcc *+4
inc ff
2016-06-22 11:52
Peacemaker

Registered: Sep 2004
Posts: 275
thanks oswald, but that is slower =)
2016-06-22 12:14
Oswald

Registered: Apr 2002
Posts: 5094
no, thats the generator. just wanted to show how simple is it you macro nerds :)
2016-06-22 12:35
Compyx

Registered: Jan 2005
Posts: 631
But what are 'fe' and 'ff', macro's? ;)
2016-06-22 12:37
chatGPZ

Registered: Dec 2001
Posts: 11386
those are not macros, those are labels!
Previous - 1 | 2 | 3 - Next
RefreshSubscribe to this thread:

You need to be logged in to post in the forum.

Search the forum:
Search   for   in  
All times are CET.
Search CSDb
Advanced
Users Online
LordCrass
Freeze/Blazon
Didi/Laxity
Guests online: 120
Top Demos
1 Next Level  (9.7)
2 13:37  (9.7)
3 Mojo  (9.7)
4 Coma Light 13  (9.6)
5 Edge of Disgrace  (9.6)
6 What Is The Matrix 2  (9.6)
7 The Demo Coder  (9.6)
8 Uncensored  (9.6)
9 Comaland 100%  (9.6)
10 Wonderland XIV  (9.6)
Top onefile Demos
1 No Listen  (9.6)
2 Layers  (9.6)
3 Cubic Dream  (9.6)
4 Party Elk 2  (9.6)
5 Copper Booze  (9.6)
6 Dawnfall V1.1  (9.5)
7 Rainbow Connection  (9.5)
8 Onscreen 5k  (9.5)
9 Morph  (9.5)
10 Libertongo  (9.5)
Top Groups
1 Performers  (9.3)
2 Booze Design  (9.3)
3 Oxyron  (9.3)
4 Triad  (9.3)
5 Censor Design  (9.3)
Top NTSC-Fixers
1 Pudwerx  (10)
2 Booze  (9.7)
3 Stormbringer  (9.7)
4 Fungus  (9.6)
5 Grim Reaper  (9.3)

Home - Disclaimer
Copyright © No Name 2001-2024
Page generated in: 0.046 sec.