mirror of
https://gitlab.com/camelot/kickc.git
synced 2025-08-07 22:25:13 +00:00
Added fragments from @Majikeyric
This commit is contained in:
@@ -1,4 +1,4 @@
|
|||||||
lda m1}
|
lda {m1}
|
||||||
sta {c1},x
|
sta {c1},x
|
||||||
lda {m1}+1
|
lda {m1}+1
|
||||||
sta {c1}+1,x
|
sta {c1}+1,x
|
||||||
|
@@ -1,4 +1,4 @@
|
|||||||
lda m1}
|
lda {m1}
|
||||||
sta {c1},y
|
sta {c1},y
|
||||||
lda {m1}+1
|
lda {m1}+1
|
||||||
sta {c1}+1,y
|
sta {c1}+1,y
|
||||||
|
@@ -0,0 +1,20 @@
|
|||||||
|
lda {m1}
|
||||||
|
sta $fe
|
||||||
|
lda {m1}+1
|
||||||
|
sta $ff
|
||||||
|
sec
|
||||||
|
lda ($fe),y
|
||||||
|
sbc {m2}
|
||||||
|
sta ($fe),y
|
||||||
|
iny
|
||||||
|
lda ($fe),y
|
||||||
|
sbc {m2}+1
|
||||||
|
sta ($fe),y
|
||||||
|
iny
|
||||||
|
lda ($fe),y
|
||||||
|
sbc {m2}+2
|
||||||
|
sta ($fe),y
|
||||||
|
iny
|
||||||
|
lda ($fe),y
|
||||||
|
sbc {m2}+3
|
||||||
|
sta ($fe),y
|
@@ -0,0 +1,20 @@
|
|||||||
|
lda {m1}
|
||||||
|
sta $fe
|
||||||
|
lda {m1}+1
|
||||||
|
sta $ff
|
||||||
|
clc
|
||||||
|
lda ($fe),y
|
||||||
|
adc {m2}
|
||||||
|
sta ($fe),y
|
||||||
|
iny
|
||||||
|
lda ($fe),y
|
||||||
|
adc {m2}+1
|
||||||
|
sta ($fe),y
|
||||||
|
iny
|
||||||
|
lda ($fe),y
|
||||||
|
adc {m2}+2
|
||||||
|
sta ($fe),y
|
||||||
|
iny
|
||||||
|
lda ($fe),y
|
||||||
|
adc {m2}+3
|
||||||
|
sta ($fe),y
|
@@ -0,0 +1,24 @@
|
|||||||
|
lda {m1}
|
||||||
|
sta $fc
|
||||||
|
lda {m1}+1
|
||||||
|
sta $fd
|
||||||
|
lda {m2}
|
||||||
|
sta $fe
|
||||||
|
lda {m2}+1
|
||||||
|
sta $ff
|
||||||
|
sec
|
||||||
|
lda ($fe),y
|
||||||
|
sbc {m3}
|
||||||
|
sta ($fc),y
|
||||||
|
iny
|
||||||
|
lda ($fe),y
|
||||||
|
sbc {m3}+1
|
||||||
|
sta ($fc),y
|
||||||
|
iny
|
||||||
|
lda ($fe),y
|
||||||
|
sbc {m3}+2
|
||||||
|
sta ($fc),y
|
||||||
|
iny
|
||||||
|
lda ($fe),y
|
||||||
|
sbc {m3}+3
|
||||||
|
sta ($fc),y
|
@@ -0,0 +1,24 @@
|
|||||||
|
lda {m2}
|
||||||
|
sta $fc
|
||||||
|
lda {m2}+1
|
||||||
|
sta $fd
|
||||||
|
lda {m1}
|
||||||
|
sta $fe
|
||||||
|
lda {m1}+1
|
||||||
|
sta $ff
|
||||||
|
clc
|
||||||
|
lda ($fc),y
|
||||||
|
adc {m3}
|
||||||
|
sta ($fe),y
|
||||||
|
iny
|
||||||
|
lda ($fc),y
|
||||||
|
adc {m3}+1
|
||||||
|
sta ($fe),y
|
||||||
|
iny
|
||||||
|
lda ($fc),y
|
||||||
|
adc {m3}+2
|
||||||
|
sta ($fe),y
|
||||||
|
iny
|
||||||
|
lda ($fc),y
|
||||||
|
adc {m3}+3
|
||||||
|
sta ($fe),y
|
@@ -1,5 +1,5 @@
|
|||||||
clc
|
clc
|
||||||
adc {m2}
|
adc m2}
|
||||||
sta {m1}
|
sta {m1}
|
||||||
lda #0
|
lda #0
|
||||||
adc {m2}+1
|
adc {m2}+1
|
||||||
|
@@ -0,0 +1,21 @@
|
|||||||
|
lda {m1}
|
||||||
|
sta $fc
|
||||||
|
lda {m1}+1
|
||||||
|
sta $fd
|
||||||
|
lda {m2}
|
||||||
|
sta $fe
|
||||||
|
lda {m2}+1
|
||||||
|
sta $ff
|
||||||
|
lda ($fe),y
|
||||||
|
pha
|
||||||
|
iny
|
||||||
|
lda ($fe),y
|
||||||
|
pha
|
||||||
|
txa
|
||||||
|
tay
|
||||||
|
iny
|
||||||
|
pla
|
||||||
|
sta ($fc),y
|
||||||
|
dey
|
||||||
|
pla
|
||||||
|
sta ($fc),y
|
@@ -0,0 +1,17 @@
|
|||||||
|
lda {m1}
|
||||||
|
sta $fe
|
||||||
|
lda {m1}+1
|
||||||
|
sta $ff
|
||||||
|
lda ($fe),y
|
||||||
|
pha
|
||||||
|
iny
|
||||||
|
lda ($fe),y
|
||||||
|
pha
|
||||||
|
txa
|
||||||
|
tay
|
||||||
|
iny
|
||||||
|
pla
|
||||||
|
sta ($fe),y
|
||||||
|
dey
|
||||||
|
pla
|
||||||
|
sta ($fe),y
|
@@ -0,0 +1,12 @@
|
|||||||
|
lda {m1}
|
||||||
|
sta $fe
|
||||||
|
lda {m1}+1
|
||||||
|
sta $ff
|
||||||
|
sec
|
||||||
|
lda ($fe),y
|
||||||
|
sbc #<{c1}
|
||||||
|
sta ($fe),y
|
||||||
|
iny
|
||||||
|
lda ($fe),y
|
||||||
|
sbc #>{c1}
|
||||||
|
sta ($fe),y
|
@@ -0,0 +1,12 @@
|
|||||||
|
lda {m1}
|
||||||
|
sta $fe
|
||||||
|
lda {m1}+1
|
||||||
|
sta $ff
|
||||||
|
sec
|
||||||
|
lda ($fe),y
|
||||||
|
sbc {m2}
|
||||||
|
sta ($fe),y
|
||||||
|
iny
|
||||||
|
lda ($fe),y
|
||||||
|
sbc {m2}+1
|
||||||
|
sta ($fe),y
|
@@ -0,0 +1,12 @@
|
|||||||
|
lda {m1}
|
||||||
|
sta $fe
|
||||||
|
lda {m1}+1
|
||||||
|
sta $ff
|
||||||
|
clc
|
||||||
|
lda ($fe),y
|
||||||
|
adc #<{c1}
|
||||||
|
sta ($fe),y
|
||||||
|
iny
|
||||||
|
lda ($fe),y
|
||||||
|
adc #>{c1}
|
||||||
|
sta ($fe),y
|
@@ -0,0 +1,12 @@
|
|||||||
|
lda {m1}
|
||||||
|
sta $fe
|
||||||
|
lda {m1}+1
|
||||||
|
sta $ff
|
||||||
|
clc
|
||||||
|
lda ($fe),y
|
||||||
|
adc {m2}
|
||||||
|
sta ($fe),y
|
||||||
|
iny
|
||||||
|
lda ($fe),y
|
||||||
|
adc {m2}+1
|
||||||
|
sta ($fe),y
|
@@ -0,0 +1,16 @@
|
|||||||
|
lda {m1}
|
||||||
|
sta $fe
|
||||||
|
lda {m1}+1
|
||||||
|
sta $ff
|
||||||
|
lda {m2}
|
||||||
|
sta $fc
|
||||||
|
lda {m2}+1
|
||||||
|
sta $fd
|
||||||
|
sec
|
||||||
|
lda ($fc),y
|
||||||
|
sbc {m3}
|
||||||
|
sta ($fe),y
|
||||||
|
iny
|
||||||
|
lda ($fc),y
|
||||||
|
sbc {m3}+1
|
||||||
|
sta ($fe),y
|
@@ -0,0 +1,16 @@
|
|||||||
|
lda {m1}
|
||||||
|
sta $fe
|
||||||
|
lda {m1}+1
|
||||||
|
sta $ff
|
||||||
|
lda {m2}
|
||||||
|
sta $fc
|
||||||
|
lda {m2}+1
|
||||||
|
sta $fd
|
||||||
|
clc
|
||||||
|
lda ($fc),y
|
||||||
|
adc {m3}
|
||||||
|
sta ($fe),y
|
||||||
|
iny
|
||||||
|
lda ($fc),y
|
||||||
|
adc {m3}+1
|
||||||
|
sta ($fe),y
|
@@ -0,0 +1,9 @@
|
|||||||
|
lda {m1}
|
||||||
|
sta $fe
|
||||||
|
lda {m1}+1
|
||||||
|
sta $ff
|
||||||
|
lda #<{c2}
|
||||||
|
sta ($fe),y
|
||||||
|
iny
|
||||||
|
lda #>{c2}
|
||||||
|
sta ($fe),y
|
@@ -0,0 +1,9 @@
|
|||||||
|
lda {m1}
|
||||||
|
sta $fe
|
||||||
|
lda {m1}+1
|
||||||
|
sta $ff
|
||||||
|
lda {m2}
|
||||||
|
sta ($fe),y
|
||||||
|
iny
|
||||||
|
lda {m2}+1
|
||||||
|
sta ($fe),y
|
1
src/main/fragment/mos6502-common/vbum1=vbsaa.asm
Normal file
1
src/main/fragment/mos6502-common/vbum1=vbsaa.asm
Normal file
@@ -0,0 +1 @@
|
|||||||
|
sta {m1}
|
@@ -0,0 +1,7 @@
|
|||||||
|
lda {m2}
|
||||||
|
sta $fe
|
||||||
|
lda {m2}+1
|
||||||
|
sta $ff
|
||||||
|
lda ($fe),y
|
||||||
|
cmp {m1}
|
||||||
|
beq {la1}
|
@@ -0,0 +1,15 @@
|
|||||||
|
lda {m2}
|
||||||
|
sta $fe
|
||||||
|
lda {m2}+1
|
||||||
|
sta $ff
|
||||||
|
lda ($fe),y
|
||||||
|
sta {m1}
|
||||||
|
iny
|
||||||
|
lda ($fe),y
|
||||||
|
sta {m1}+1
|
||||||
|
iny
|
||||||
|
lda ($fe),y
|
||||||
|
sta {m1}+2
|
||||||
|
iny
|
||||||
|
lda ($fe),y
|
||||||
|
sta {m1}+3
|
@@ -0,0 +1,20 @@
|
|||||||
|
lda {m2}
|
||||||
|
sta $fe
|
||||||
|
lda {m2}+1
|
||||||
|
sta $ff
|
||||||
|
clc
|
||||||
|
lda ($fe),y
|
||||||
|
adc #<{c1}
|
||||||
|
sta {m1}
|
||||||
|
iny
|
||||||
|
lda ($fe),y
|
||||||
|
adc #>{c1}
|
||||||
|
sta {m1}+1
|
||||||
|
iny
|
||||||
|
lda ($fe),y
|
||||||
|
adc #<{c1}>>16
|
||||||
|
sta {m1}+2
|
||||||
|
iny
|
||||||
|
lda ($fe),y
|
||||||
|
adc #>{c1}>>16
|
||||||
|
sta {m1}+3
|
@@ -0,0 +1,5 @@
|
|||||||
|
lda {m1}
|
||||||
|
ora {m1}+1
|
||||||
|
ora {m1}+2
|
||||||
|
ora {m1}+3
|
||||||
|
bne {la1}
|
10
src/main/fragment/mos6502-common/vdum1=_dword_vwsm2.asm
Normal file
10
src/main/fragment/mos6502-common/vdum1=_dword_vwsm2.asm
Normal file
@@ -0,0 +1,10 @@
|
|||||||
|
lda {m2}
|
||||||
|
sta {m1}
|
||||||
|
lda {m2}+1
|
||||||
|
sta {m1}+1
|
||||||
|
ora #$7f
|
||||||
|
bmi !+
|
||||||
|
lda #0
|
||||||
|
!:
|
||||||
|
sta {m1}+2
|
||||||
|
sta {m1}+3
|
4
src/main/fragment/mos6502-common/vwsm1=_sword_vdum2.asm
Normal file
4
src/main/fragment/mos6502-common/vwsm1=_sword_vdum2.asm
Normal file
@@ -0,0 +1,4 @@
|
|||||||
|
lda {m2}
|
||||||
|
sta {m1}
|
||||||
|
lda {m2}+1
|
||||||
|
sta {m1}+1
|
@@ -0,0 +1,9 @@
|
|||||||
|
lda {m2}
|
||||||
|
sta $fe
|
||||||
|
lda {m2}+1
|
||||||
|
sta $ff
|
||||||
|
lda ($fe),y
|
||||||
|
sta {m1}
|
||||||
|
iny
|
||||||
|
lda ($fe),y
|
||||||
|
sta {m1}+1
|
@@ -0,0 +1,17 @@
|
|||||||
|
lda {m2}
|
||||||
|
sta $fe
|
||||||
|
lda {m2}+1
|
||||||
|
sta $ff
|
||||||
|
clc
|
||||||
|
iny
|
||||||
|
lda ($fe),y
|
||||||
|
pha
|
||||||
|
dey
|
||||||
|
lda ($fe),y
|
||||||
|
ldy #{c2}
|
||||||
|
adc ($fe),y
|
||||||
|
sta {m1}
|
||||||
|
iny
|
||||||
|
pla
|
||||||
|
adc ($fe),y
|
||||||
|
sta {m1}+1
|
@@ -0,0 +1,17 @@
|
|||||||
|
sta $fd
|
||||||
|
lda {m2}
|
||||||
|
sta $fe
|
||||||
|
lda {m2}+1
|
||||||
|
sta $ff
|
||||||
|
lda ($fe),y
|
||||||
|
clc
|
||||||
|
adc $fd
|
||||||
|
sta {m1}
|
||||||
|
iny
|
||||||
|
lda $fd
|
||||||
|
ora #$7f
|
||||||
|
bmi !+
|
||||||
|
lda #0
|
||||||
|
!:
|
||||||
|
adc ($fe),y
|
||||||
|
sta {m1}+1
|
@@ -0,0 +1,24 @@
|
|||||||
|
lda {m2}
|
||||||
|
sta $fc
|
||||||
|
lda {m2}+1
|
||||||
|
sta $fd
|
||||||
|
lda {m3}
|
||||||
|
sta $fe
|
||||||
|
lda {m3}+1
|
||||||
|
sta $ff
|
||||||
|
iny
|
||||||
|
lda ($fe),y
|
||||||
|
pha
|
||||||
|
dey
|
||||||
|
lda ($fe),y
|
||||||
|
pha
|
||||||
|
txa
|
||||||
|
tay
|
||||||
|
pla
|
||||||
|
sec
|
||||||
|
sbc ($fc),y
|
||||||
|
sta {m1}
|
||||||
|
iny
|
||||||
|
pla
|
||||||
|
sbc ($fc),y
|
||||||
|
sta {m1}+1
|
@@ -0,0 +1,24 @@
|
|||||||
|
lda {m2}
|
||||||
|
sta $fc
|
||||||
|
lda {m2}+1
|
||||||
|
sta $fd
|
||||||
|
lda {m3}
|
||||||
|
sta $fe
|
||||||
|
lda {m3}+1
|
||||||
|
sta $ff
|
||||||
|
iny
|
||||||
|
lda ($fe),y
|
||||||
|
pha
|
||||||
|
dey
|
||||||
|
lda ($fe),y
|
||||||
|
pha
|
||||||
|
txa
|
||||||
|
tay
|
||||||
|
pla
|
||||||
|
clc
|
||||||
|
adc ($fc),y
|
||||||
|
sta {m1}
|
||||||
|
iny
|
||||||
|
pla
|
||||||
|
adc ($fc),y
|
||||||
|
sta {m1}+1
|
@@ -273,14 +273,20 @@ public class KickC implements Callable<Integer> {
|
|||||||
compiler.getLog().setVerboseFragmentLog(true);
|
compiler.getLog().setVerboseFragmentLog(true);
|
||||||
}
|
}
|
||||||
compiler.getLog().setSysOut(true);
|
compiler.getLog().setSysOut(true);
|
||||||
final AsmFragmentTemplateMasterSynthesizer masterSynthesizer = compiler.getAsmFragmentMasterSynthesizer();
|
try {
|
||||||
final AsmFragmentTemplateSynthesizer cpuSynthesizer = masterSynthesizer.getSynthesizer(program.getTargetCpu());
|
final AsmFragmentTemplateMasterSynthesizer masterSynthesizer = compiler.getAsmFragmentMasterSynthesizer();
|
||||||
Collection<AsmFragmentTemplate> fragmentTemplates = cpuSynthesizer.getBestTemplates(fragment, compiler.getLog());
|
final AsmFragmentTemplateSynthesizer cpuSynthesizer = masterSynthesizer.getSynthesizer(program.getTargetCpu());
|
||||||
for(AsmFragmentTemplate fragmentTemplate : fragmentTemplates) {
|
Collection<AsmFragmentTemplate> fragmentTemplates = cpuSynthesizer.getBestTemplates(fragment, compiler.getLog());
|
||||||
AsmFragmentTemplateUsages.logTemplate(compiler.getLog(), fragmentTemplate, "");
|
for(AsmFragmentTemplate fragmentTemplate : fragmentTemplates) {
|
||||||
}
|
AsmFragmentTemplateUsages.logTemplate(compiler.getLog(), fragmentTemplate, "");
|
||||||
if(fragmentTemplates.size()==0) {
|
}
|
||||||
compiler.getLog().append("Cannot create "+fragment);
|
if(fragmentTemplates.size() == 0) {
|
||||||
|
compiler.getLog().append("Cannot create " + fragment);
|
||||||
|
return COMPILE_ERROR;
|
||||||
|
}
|
||||||
|
} catch (CompileError e) {
|
||||||
|
// Print the error and exit with compile error
|
||||||
|
System.err.println(e.format());
|
||||||
return COMPILE_ERROR;
|
return COMPILE_ERROR;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
@@ -295,7 +301,7 @@ public class KickC implements Callable<Integer> {
|
|||||||
if(outputDir != null)
|
if(outputDir != null)
|
||||||
program.getOutputFileManager().setOutputDir(outputDir);
|
program.getOutputFileManager().setOutputDir(outputDir);
|
||||||
|
|
||||||
if(outputFileName!=null)
|
if(outputFileName != null)
|
||||||
program.getOutputFileManager().setOutputFileName(outputFileName);
|
program.getOutputFileManager().setOutputFileName(outputFileName);
|
||||||
|
|
||||||
if(optimizeNoUplift)
|
if(optimizeNoUplift)
|
||||||
|
@@ -18,6 +18,7 @@ public class AsmParser {
|
|||||||
KickCLexer kickCLexer = new KickCLexer(fragmentCharStream, cParser);
|
KickCLexer kickCLexer = new KickCLexer(fragmentCharStream, cParser);
|
||||||
kickCLexer.pushMode(KickCLexer.ASM_MODE);
|
kickCLexer.pushMode(KickCLexer.ASM_MODE);
|
||||||
KickCParser kickCParser = new KickCParser(new CommonTokenStream(kickCLexer), cParser);
|
KickCParser kickCParser = new KickCParser(new CommonTokenStream(kickCLexer), cParser);
|
||||||
|
kickCParser.removeErrorListeners();
|
||||||
kickCParser.addErrorListener(new BaseErrorListener() {
|
kickCParser.addErrorListener(new BaseErrorListener() {
|
||||||
@Override
|
@Override
|
||||||
public void syntaxError(Recognizer<?, ?> recognizer, Object offendingSymbol, int line, int charPositionInLine, String msg, RecognitionException e) {
|
public void syntaxError(Recognizer<?, ?> recognizer, Object offendingSymbol, int line, int charPositionInLine, String msg, RecognitionException e) {
|
||||||
|
Reference in New Issue
Block a user