Add assembler macro variable

.gitignore

@@ -1,4 +1,5 @@
 # cadius disk files
-*.2mg
+*.2mg 
+*.po
 # merlin assembly listings
 *_output.txt

appy.yaml

@@ -1,4 +1,5 @@
 assemble: [testsrc/sp.s, testsrc/pc.s, testsrc/fmt.s]
+assembleflags: "-V"
 indent: [testsrc/fmt2.s]
 disks:
 - name: mydiskimage

core/assembler.go

@@ -13,8 +13,9 @@ func Assemble() {
 	// assemble all files in list
 	for _, filename := range project.AppyProj.Assemble {
 		fmt.Printf("Assembling %v\n", filename)
+		fmt.Printf(">> %v %v %v\n", project.LocalConf.Programs.Merlin32, project.AppyProj.AssembleFlags, filename)
 
-		out, err := exec.Command(project.LocalConf.Programs.Merlin32, "-V", filename).Output()
+		out, err := exec.Command(project.LocalConf.Programs.Merlin32, project.AppyProj.AssembleFlags, filename).Output()
 		if err != nil {
 			color.Cyan(string(out))
 			log.Fatal(err)

core/project/project.go

@@ -10,10 +10,11 @@ import (
 )
 
 type Project struct {
-	name     string
+	name          string
-	Disks    []Disk
+	Disks         []Disk
-	Assemble []string
+	Assemble      []string
-	Indent   []string
+	Indent        []string
+	AssembleFlags string
 }
 
 type Disk struct {
@@ -47,6 +48,7 @@ var LocalConf LocalConfig
 
 func SelfConfigure() {
 	AppyProj.name = "Default"
+	AppyProj.AssembleFlags = ""
 	LocalConf.Programs.Merlin32 = Merlin32Path
 	LocalConf.Programs.Cadius = CadiusPath
 	LocalConf.Programs.Gsplus = GsplusPath

testsrc/fmt.s

@@ -9,7 +9,7 @@ main nop
   sta   :jo+1
 
 
-:jo+1   lda $400
+:jo   lda $400
              lda   $400
                  rts
 
@@ -21,7 +21,8 @@ HEXDEC	mx %11
                 STA DEC8+1
                 STA DEC8+2
                 STA DEC8+3
-ReallyThisisaLoooooongLabelwith stal $e12000,y  ; look at this long line
+ReallyThisisaLoooooongLabelwith stal $e12000,x  ; look at this long line
 
 * TABS....
 * $D5	$0008	 sequence [Application Specific]
+DEC8 ds                                                      24