Write language name in 3D ASCII: Difference between revisions

Content added Content deleted
Line 1,058: Line 1,058:
2 7 \ we use bits 7 to 2
2 7 \ we use bits 7 to 2
DO
DO
dup I bit? \ check bit I in the matrix-byte on stack
dup I bit? \ check bit I in the matrix-byte on stack
IF bannerstr count TYPE \ if BIT=TRUE
IF bannerstr count TYPE \ if BIT=TRUE
ELSE bannerstr len SPACES \ if BIT=false
ELSE bannerstr len SPACES \ if BIT=false
THEN
THEN
-1 +LOOP \ loop backwards
-1 +LOOP \ loop backwards