AMAZING NEW FEATURES ldn, bfio

examples/buf_io.csn

@@ -0,0 +1,53 @@
+(
+    (mkbf r0)
+
+    ; Default mode - queue
+    (ld @r0 1)
+    (ld @r0 2)
+    (ld @r0 3)
+    (bfrd r1 @r0 2) (cmp r1 3 (ne? (fault))) ; last is 3
+    (ld r1 @r0) (cmp r1 1 (ne? (fault)))
+    (ld r1 @r0) (cmp r1 2 (ne? (fault)))
+    (ld r1 @r0) (cmp r1 3 (ne? (fault)))
+
+    (bfio @r0 BFIO_QUEUE)
+    (ld @r0 1)
+    (ld @r0 2)
+    (ld @r0 3)
+    (bfrd r1 @r0 2) (cmp r1 3 (ne? (fault))) ; last is 3
+    (ld r1 @r0) (cmp r1 1 (ne? (fault)))
+    (ld r1 @r0) (cmp r1 2 (ne? (fault)))
+    (ld r1 @r0) (cmp r1 3 (ne? (fault)))
+
+    (bfio @r0 BFIO_RQUEUE)
+    (ld @r0 1)
+    (ld @r0 2)
+    (ld @r0 3)
+    (bfrd r1 @r0 0) (cmp r1 3 (ne? (fault)))
+    (bfrd r1 @r0 2) (cmp r1 1 (ne? (fault))) ; last is 1
+    (ld r1 @r0) (cmp r1 1 (ne? (fault)))
+    (ld r1 @r0) (cmp r1 2 (ne? (fault)))
+    (ld r1 @r0) (cmp r1 3 (ne? (fault)))
+
+    (bfio @r0 BFIO_STACK)
+    (ld @r0 1)
+    (ld @r0 2)
+    (ld @r0 3)
+    (bfrd r1 @r0 0) (cmp r1 1 (ne? (fault)))
+    (bfrd r1 @r0 2) (cmp r1 3 (ne? (fault)))
+    (ld r1 @r0) (cmp r1 3 (ne? (fault)))
+    (ld r1 @r0) (cmp r1 2 (ne? (fault)))
+    (ld r1 @r0) (cmp r1 1 (ne? (fault)))
+
+    (bfio @r0 BFIO_RSTACK)
+    (ld @r0 1)
+    (ld @r0 2)
+    (ld @r0 3)
+    (bfrd r1 @r0 0) (cmp r1 3 (ne? (fault)))
+    (bfrd r1 @r0 2) (cmp r1 1 (ne? (fault)))
+    (ld r1 @r0) (cmp r1 3 (ne? (fault)))
+    (ld r1 @r0) (cmp r1 2 (ne? (fault)))
+    (ld r1 @r0) (cmp r1 1 (ne? (fault)))
+
+    (del @r0)
+)

examples/buf_multi.csn

@@ -0,0 +1,7 @@
+(
+    (mkbf r0)
+    (ldn @r0 @cin 5)
+    (bfrev @r0)
+    (ldn @cout @r0 5)
+    (del @r0)
+)

examples/screen_bounce.csn

@@ -1,8 +1,8 @@
 ; Set log level to "info" or above for the best results!
 (
     (sc-init 800 600)
-    (sc-opt 1 1) ; auto blit
-    (sc-opt 2 25) ; frame rate
+    (sc-opt SCREEN_AUTO_BLIT 1)
+    (sc-opt SCREEN_FPS 25)
 
     (sym x r0) (sym y r1) (sym dx r2) (sym dy r3) (sym color r5)