Adapt a314fs to work on PiStorm + A314 emulation

[pistorm] / a314 / software-amiga / a314fs_pistorm / bcpl_start.asm

diff --git a/a314/software-amiga/a314fs_pistorm/bcpl_start.asm b/a314/software-amiga/a314fs_pistorm/bcpl_start.asm
new file mode 100644 (file)
index 0000000..748c350
--- /dev/null
+++ b/a314/software-amiga/a314fs_pistorm/bcpl_start.asm
@@ -0,0 +1,8 @@
+               dc.l    0
+
+               movem.l a0-a6,-(a7)
+               lsl.l   #2,d1
+               move.l  d1,a0
+               bsr     _start
+               movem.l (a7)+,a0-a6
+               jmp     (a6)