dither.p8.lua

-- dither - 8x8.me fill patterns
-- public domain (cc0) by aced

-- setup custom font as 8x8px
poke(0x5600,8,8,8,0,0)


-- 97 'a' bayerdither00
poke(0x5600+(8* 97),
   0, -- ▒▒▒▒▒▒▒▒
   0, -- ▒▒▒▒▒▒▒▒
   0, -- ▒▒▒▒▒▒▒▒
   0, -- ▒▒▒▒▒▒▒▒
   0, -- ▒▒▒▒▒▒▒▒
   0, -- ▒▒▒▒▒▒▒▒
   0, -- ▒▒▒▒▒▒▒▒
   0  -- ▒▒▒▒▒▒▒▒
)
-- setup: ?"⁶!5600⁸x⁸\0\0"
-- spr 0: print"⁶c0ᵉa"for i=0,7do memcpy(i*64,24576+i*64,4)end cstore()
-- magic: ?"⁶.\0\0\0\0\0\0\0\0"
-- fillp(0)


-- 98 'b' bayerdither01
poke(0x5600+(8* 98),
  17, -- █▒▒▒█▒▒▒
   0, -- ▒▒▒▒▒▒▒▒
   0, -- ▒▒▒▒▒▒▒▒
   0, -- ▒▒▒▒▒▒▒▒
  17, -- █▒▒▒█▒▒▒
   0, -- ▒▒▒▒▒▒▒▒
   0, -- ▒▒▒▒▒▒▒▒
   0  -- ▒▒▒▒▒▒▒▒
)
-- setup: ?"⁶!5600⁸x⁸\0\0"
-- spr 0: print"⁶c0ᵉb"for i=0,7do memcpy(i*64,24576+i*64,4)end cstore()
-- magic: ?"⁶.■\0\0\0■\0\0\0"
-- fillp(32768)


-- 99 'c' bayerdither02
poke(0x5600+(8* 99),
  17, -- █▒▒▒█▒▒▒
   0, -- ▒▒▒▒▒▒▒▒
  68, -- ▒▒█▒▒▒█▒
   0, -- ▒▒▒▒▒▒▒▒
  17, -- █▒▒▒█▒▒▒
   0, -- ▒▒▒▒▒▒▒▒
  68, -- ▒▒█▒▒▒█▒
   0  -- ▒▒▒▒▒▒▒▒
)
-- setup: ?"⁶!5600⁸x⁸\0\0"
-- spr 0: print"⁶c0ᵉc"for i=0,7do memcpy(i*64,24576+i*64,4)end cstore()
-- magic: ?"⁶.■\0D\0■\0D\0"
-- fillp(32800)


-- 100 'd' bayerdither03
poke(0x5600+(8* 100),
  17, -- █▒▒▒█▒▒▒
   0, -- ▒▒▒▒▒▒▒▒
  85, -- █▒█▒█▒█▒
   0, -- ▒▒▒▒▒▒▒▒
  17, -- █▒▒▒█▒▒▒
   0, -- ▒▒▒▒▒▒▒▒
  85, -- █▒█▒█▒█▒
   0  -- ▒▒▒▒▒▒▒▒
)
-- setup: ?"⁶!5600⁸x⁸\0\0"
-- spr 0: print"⁶c0ᵉd"for i=0,7do memcpy(i*64,24576+i*64,4)end cstore()
-- magic: ?"⁶.■\0U\0■\0U\0"
-- fillp(32928)


-- 101 'e' bayerdither04
poke(0x5600+(8* 101),
  85, -- █▒█▒█▒█▒
   0, -- ▒▒▒▒▒▒▒▒
  85, -- █▒█▒█▒█▒
   0, -- ▒▒▒▒▒▒▒▒
  85, -- █▒█▒█▒█▒
   0, -- ▒▒▒▒▒▒▒▒
  85, -- █▒█▒█▒█▒
   0  -- ▒▒▒▒▒▒▒▒
)
-- setup: ?"⁶!5600⁸x⁸\0\0"
-- spr 0: print"⁶c0ᵉe"for i=0,7do memcpy(i*64,24576+i*64,4)end cstore()
-- magic: ?"⁶.U\0U\0U\0U\0"
-- fillp(41120)


-- 102 'f' bayerdither05
poke(0x5600+(8* 102),
  85, -- █▒█▒█▒█▒
  34, -- ▒█▒▒▒█▒▒
  85, -- █▒█▒█▒█▒
   0, -- ▒▒▒▒▒▒▒▒
  85, -- █▒█▒█▒█▒
  34, -- ▒█▒▒▒█▒▒
  85, -- █▒█▒█▒█▒
   0  -- ▒▒▒▒▒▒▒▒
)
-- setup: ?"⁶!5600⁸x⁸\0\0"
-- spr 0: print"⁶c0ᵉf"for i=0,7do memcpy(i*64,24576+i*64,4)end cstore()
-- magic: ?"⁶.U\"U\0U\"U\0"
-- fillp(42144)


-- 103 'g' bayerdither06
poke(0x5600+(8* 103),
  85, -- █▒█▒█▒█▒
  34, -- ▒█▒▒▒█▒▒
  85, -- █▒█▒█▒█▒
 136, -- ▒▒▒█▒▒▒█
  85, -- █▒█▒█▒█▒
  34, -- ▒█▒▒▒█▒▒
  85, -- █▒█▒█▒█▒
 136  -- ▒▒▒█▒▒▒█
)
-- setup: ?"⁶!5600⁸x⁸\0\0"
-- spr 0: print"⁶c0ᵉg"for i=0,7do memcpy(i*64,24576+i*64,4)end cstore()
-- magic: ?"⁶.U\"U☉U\"U☉"
-- fillp(42145)


-- 104 'h' bayerdither07
poke(0x5600+(8* 104),
  85, -- █▒█▒█▒█▒
  34, -- ▒█▒▒▒█▒▒
  85, -- █▒█▒█▒█▒
 170, -- ▒█▒█▒█▒█
  85, -- █▒█▒█▒█▒
  34, -- ▒█▒▒▒█▒▒
  85, -- █▒█▒█▒█▒
 170  -- ▒█▒█▒█▒█
)
-- setup: ?"⁶!5600⁸x⁸\0\0"
-- spr 0: print"⁶c0ᵉh"for i=0,7do memcpy(i*64,24576+i*64,4)end cstore()
-- magic: ?"⁶.U\"UちU\"Uち"
-- fillp(42149)


-- 105 'i' bayerdither08
poke(0x5600+(8* 105),
  85, -- █▒█▒█▒█▒
 170, -- ▒█▒█▒█▒█
  85, -- █▒█▒█▒█▒
 170, -- ▒█▒█▒█▒█
  85, -- █▒█▒█▒█▒
 170, -- ▒█▒█▒█▒█
  85, -- █▒█▒█▒█▒
 170  -- ▒█▒█▒█▒█
)
-- setup: ?"⁶!5600⁸x⁸\0\0"
-- spr 0: print"⁶c0ᵉi"for i=0,7do memcpy(i*64,24576+i*64,4)end cstore()
-- magic: ?"⁶.UちUちUちUち"
-- fillp(42405)


-- 106 'j' bayerdither09
poke(0x5600+(8* 106),
  85, -- █▒█▒█▒█▒
 187, -- ██▒███▒█
  85, -- █▒█▒█▒█▒
 170, -- ▒█▒█▒█▒█
  85, -- █▒█▒█▒█▒
 187, -- ██▒███▒█
  85, -- █▒█▒█▒█▒
 170  -- ▒█▒█▒█▒█
)
-- setup: ?"⁶!5600⁸x⁸\0\0"
-- spr 0: print"⁶c0ᵉj"for i=0,7do memcpy(i*64,24576+i*64,4)end cstore()
-- magic: ?"⁶.UめUちUめUち"
-- fillp(44453)


-- 107 'k' bayerdither10
poke(0x5600+(8* 107),
  85, -- █▒█▒█▒█▒
 187, -- ██▒███▒█
  85, -- █▒█▒█▒█▒
 238, -- ▒███▒███
  85, -- █▒█▒█▒█▒
 187, -- ██▒███▒█
  85, -- █▒█▒█▒█▒
 238  -- ▒███▒███
)
-- setup: ?"⁶!5600⁸x⁸\0\0"
-- spr 0: print"⁶c0ᵉk"for i=0,7do memcpy(i*64,24576+i*64,4)end cstore()
-- magic: ?"⁶.UめUモUめUモ"
-- fillp(44455)


-- 108 'l' bayerdither11
poke(0x5600+(8* 108),
  85, -- █▒█▒█▒█▒
 187, -- ██▒███▒█
  85, -- █▒█▒█▒█▒
 255, -- ████████
  85, -- █▒█▒█▒█▒
 187, -- ██▒███▒█
  85, -- █▒█▒█▒█▒
 255  -- ████████
)
-- setup: ?"⁶!5600⁸x⁸\0\0"
-- spr 0: print"⁶c0ᵉl"for i=0,7do memcpy(i*64,24576+i*64,4)end cstore()
-- magic: ?"⁶.UめU◝UめU◝"
-- fillp(44463)


-- 109 'm' bayerdither12
poke(0x5600+(8* 109),
  85, -- █▒█▒█▒█▒
 255, -- ████████
  85, -- █▒█▒█▒█▒
 255, -- ████████
  85, -- █▒█▒█▒█▒
 255, -- ████████
  85, -- █▒█▒█▒█▒
 255  -- ████████
)
-- setup: ?"⁶!5600⁸x⁸\0\0"
-- spr 0: print"⁶c0ᵉm"for i=0,7do memcpy(i*64,24576+i*64,4)end cstore()
-- magic: ?"⁶.U◝U◝U◝U◝"
-- fillp(44975)


-- 110 'n' bayerdither13
poke(0x5600+(8* 110),
 119, -- ███▒███▒
 255, -- ████████
  85, -- █▒█▒█▒█▒
 255, -- ████████
 119, -- ███▒███▒
 255, -- ████████
  85, -- █▒█▒█▒█▒
 255  -- ████████
)
-- setup: ?"⁶!5600⁸x⁸\0\0"
-- spr 0: print"⁶c0ᵉn"for i=0,7do memcpy(i*64,24576+i*64,4)end cstore()
-- magic: ?"⁶.w◝U◝w◝U◝"
-- fillp(61359)


-- 111 'o' bayerdither14
poke(0x5600+(8* 111),
 119, -- ███▒███▒
 255, -- ████████
 221, -- █▒███▒██
 255, -- ████████
 119, -- ███▒███▒
 255, -- ████████
 221, -- █▒███▒██
 255  -- ████████
)
-- setup: ?"⁶!5600⁸x⁸\0\0"
-- spr 0: print"⁶c0ᵉo"for i=0,7do memcpy(i*64,24576+i*64,4)end cstore()
-- magic: ?"⁶.w◝ツ◝w◝ツ◝"
-- fillp(61375)


-- 112 'p' bayerdither15
poke(0x5600+(8* 112),
 119, -- ███▒███▒
 255, -- ████████
 255, -- ████████
 255, -- ████████
 119, -- ███▒███▒
 255, -- ████████
 255, -- ████████
 255  -- ████████
)
-- setup: ?"⁶!5600⁸x⁸\0\0"
-- spr 0: print"⁶c0ᵉp"for i=0,7do memcpy(i*64,24576+i*64,4)end cstore()
-- magic: ?"⁶.w◝◝◝w◝◝◝"
-- fillp(61439)


-- 113 'q' bayerdither16
poke(0x5600+(8* 113),
 255, -- ████████
 255, -- ████████
 255, -- ████████
 255, -- ████████
 255, -- ████████
 255, -- ████████
 255, -- ████████
 255  -- ████████
)
-- setup: ?"⁶!5600⁸x⁸\0\0"
-- spr 0: print"⁶c0ᵉq"for i=0,7do memcpy(i*64,24576+i*64,4)end cstore()
-- magic: ?"⁶.◝◝◝◝◝◝◝◝"
-- fillp(65535)