coco3: Add assembler source for even lower calls

diff --git a/Kernel/platform-coco3/videoll.s b/Kernel/platform-coco3/videoll.s
new file mode 100644 (file)
index 0000000..7a247f6
--- /dev/null
+++ b/Kernel/platform-coco3/videoll.s
@@ -0,0 +1,32 @@
+;;;
+;;;  Low-Level Video Routines
+;;;
+;;;
+
+       .globl  _memset
+       .globl  _memcpy
+       
+       .area .video
+
+;;;   void *memset(void *d, int c, size_t sz)
+_memset:
+       pshs    x,y
+       ldb     7,s
+       ldy     8,s
+a@     stb     ,x+
+       leay    -1,y
+       bne     a@
+       puls    x,y,pc
+
+
+
+;;;   void *memcpy(void *d, const void *s, size_t sz)
+_memcpy:
+       pshs    x,y,u
+       ldu     8,s
+       ldy     10,s
+a@     ldb     ,u+
+       stb     ,x+
+       leay    -1,y
+       bne     a@
+       puls    x,y,u,pc
\ No newline at end of file