Compare commits
21 Commits
trans_prid
...
f35e4abd46
Author | SHA1 | Date | |
---|---|---|---|
f35e4abd46
|
|||
021ea9f68e
|
|||
fb1bfe7c0d
|
|||
00d37880bb
|
|||
16aa48a4ab
|
|||
3022d3cb3d
|
|||
f37476f148
|
|||
e97cfc0fec
|
|||
83685b19e8
|
|||
e69ae6f37e
|
|||
38bac54ff0
|
|||
1529548d61
|
|||
873722b1ac
|
|||
db7ce90182
|
|||
ebf8c3921e
|
|||
033a71d767
|
|||
ff60db72ad
|
|||
ef59dc3f6a
|
|||
d5647a0328
|
|||
a659679b6b
|
|||
cc4b6bffd3
|
39
font2map.p8
39
font2map.p8
@ -9,9 +9,12 @@ function _init()
|
||||
end
|
||||
|
||||
function _update()
|
||||
?"\^@56000800⁴⁵⁷\0\0¹\0\0\0\0\0\0\0`w\0g \0aw\0⁶⁶\0\0\0\0\0fw⁷¹\0\0\0`⁷'\0\0\0▮ \0pp\0\0\0¹▮`\0 ■▮\0▮!\0\0⁶q33⁙■⁙3□⁙3▮33■wf\0v\0ヨu◆▶g○w☉vp●「\"s◝◆◝¹◝◝メ◝▒◝◆○▒☉ヲ\0◝◆◝¹◝◝モ◝☉☉☉⁸▒☉☉ユ\0⁷⁷⁷⁷⁷\0\0\0\0⁷⁷⁷\0\0\0\0\0⁷⁵⁷\0\0\0\0\0⁵²⁵\0\0\0\0\0⁵\0⁵\0\0\0\0\0⁵⁵⁵\0\0\0\0⁴⁶⁷⁶⁴\0\0\0¹³⁷³¹\0\0\0⁷¹¹¹\0\0\0\0\0⁴⁴⁴⁷\0\0\0⁵⁷²⁷²\0\0\0\0\0¹\0\0\0\0\0\0\0\0¹²\0\0\0\0\0\0³³\0\0\0⁵⁵\0\0\0\0\0\0²⁵²\0\0\0\0\0\0\0\0\0\0\0\0\0¹¹¹\0¹\0\0\0⁵⁵\0\0\0\0\0\0\n゜\n゜\n\0\0\0²⁷³⁶⁷²\0\0⁵⁴²¹⁵\0\0\0²⁵ᵉ⁵ᵉ\0\0\0¹¹\0\0\0\0\0\0²¹¹¹²\0\0\0¹²²²¹\0\0\0⁵²⁷²⁵\0\0\0\0²⁷²\0\0\0\0\0\0\0\0¹¹\0\0\0\0⁷\0\0\0\0\0\0\0\0\0¹\0\0\0⁴⁴²¹¹\0\0\0²⁵⁵⁵²\0\0\0²³²²⁷\0\0\0³⁴²¹⁷\0\0\0³⁴²⁴³\0\0\0⁵⁵⁷⁴⁴\0\0\0⁷¹³⁴³\0\0\0⁶¹³⁵²\0\0\0⁷⁴⁴²²\0\0\0²⁵²⁵²\0\0\0²⁵⁶⁴³\0\0\0\0¹\0¹\0\0\0\0\0\0¹\0¹¹\0\0\0²¹²\0\0\0\0\0³\0³\0\0\0\0\0¹²¹\0\0\0\0³⁴²\0²\0\0\0⁶\t\r¹⁶\0\0\0\0³⁶⁵⁷\0\0\0¹³⁵⁵³\0\0\0\0⁶¹¹⁶\0\0\0⁴⁶⁵⁵⁶\0\0\0\0²⁵³⁶\0\0\0⁴²⁷²²\0\0\0\0⁶⁵⁶⁴³\0\0¹¹³⁵⁵\0\0\0¹\0¹¹¹\0\0\0²\0²²²¹\0\0¹⁵³⁵⁵\0\0\0¹¹¹¹²\0\0\0\0ᶠ‖‖‖\0\0\0\0³⁵⁵⁵\0\0\0\0²⁵⁵²\0\0\0\0³⁵⁵³¹\0\0\0⁶⁵⁵⁶⁴\0\0\0³⁵¹¹\0\0\0\0⁶³⁶³\0\0\0²⁷²²⁶\0\0\0\0\t\t\t⁶\0\0\0\0⁵⁵⁵³\0\0\0\0■■‖\n\0\0\0\0⁵²⁵⁵\0\0\0\0⁵⁵⁵⁶³\0\0\0⁷⁶³⁷\0\0\0³¹¹¹³\0\0\0¹²²²⁴\0\0\0³²²²³\0\0\0²⁵\0\0\0\0\0\0\0\0\0\0⁷\0\0\0²⁴\0\0\0\0\0\0²⁵⁷⁵⁵\0\0\0³⁵³⁵³\0\0\0⁶¹¹¹⁶\0\0\0⁷\t\t\t⁷\0\0\0⁷¹³¹⁷\0\0\0⁷¹³¹¹\0\0\0ᵉ¹\r\t⁶\0\0\0⁵⁵⁷⁵⁵\0\0\0¹¹¹¹¹\0\0\0⁴⁴⁴⁴⁵²\0\0⁵⁵³⁵⁵\0\0\0¹¹¹¹⁷\0\0\0■•‖■■\0\0\0\tᵇᶠ\r\t\0\0\0⁶\t\t\t⁶\0\0\0³⁵³¹¹\0\0\0⁶\t\t\r⁶⁸\0\0³⁵³⁵⁵\0\0\0⁶¹²⁴³\0\0\0⁷²²²²\0\0\0\t\t\t\t⁶\0\0\0\t\t\t⁵³\0\0\0■■‖•■\0\0\0⁵⁵²⁵⁵\0\0\0⁵⁵²²²\0\0\0⁷⁴²¹⁷\0\0\0⁶²¹²⁶\0\0\0¹¹\0¹¹\0\0\0³²⁴²³\0\0\0\0\0\n⁵\0\0\0\0³³\0\0\0\0\0\0○○○○○○\0\0u*u*u*\0\0a○]]>\0\0\0>ccw>\0\0\0■d■d■d\0\0²゛ᵉᶠ⁸\0\0\0ᵉ▶゜゜ᵉ\0\0\0•゜゜ᵉ⁴\0\0\0、6w6、\0\0\0ᵉᵉ゜ᵉ\n\0\0\0、>○*:\0\0\0>gcg>\0\0\0?-?!?\0\0\0、⁴⁴⁷⁷\0\0\0>ckc>\0\0\0⁴ᵉ゜ᵉ⁴\0\0\0\0\0u\0\0\0\0\0>scs>\0\0\0⁸、○>\"\0\0\0゜ᵉ⁴ᵉ゜\0\0\0>wcc>\0\0\0\0⁵r \0\0\0\0\0■*d\0\0\0\0>kwk>\0\0\0゜\0゜\0゜\0\0\0‖‖‖‖‖\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0¹\0¹¹¹\0\0\0⁴ᵉ⁵ᵉ⁴\0\0ᶜ²⁷²ᶠ\0\0\0■ᵉ\nᵉ■\0\0\0⁵⁵²⁷²\0\0\0¹¹\0¹¹\0\0\0⁶³⁵⁶³\0\0\0⁵\0\0\0\0\0\0\0⁶\t\r\t⁶\0\0\0³⁶⁵⁷\0\0\0\0\0□\t□\0\0\0\0\0\0⁷⁴\0\0\0\0\0\0\0\0\0\0\0\0³⁵³⁵\0\0\0\0⁷\0\0\0\0\0\0\0²⁵²\0\0\0\0\0²⁷²\0⁷\0\0\0³²¹³\0\0\0\0¹³²¹\0\0\0\0²¹\0\0\0\0\0\0\0\0⁵⁵³¹\0\0ᶠᵇᵇ\n\n\0\0\0\0\0¹\0\0\0\0\0\0\0\0\0²³\0\0²³²²\0\0\0\0²⁵²\0\0\0\0\0\0\t□\t\0\0\0\0■\t⁵*9 \0\0■\t。□\t「\0\0!⁙\nur@\0\0\0²\0²¹⁶\0\0²⁴³⁶⁵⁷\0\0²¹³⁶⁵⁷\0\0²⁵³⁶⁵⁷\0\0\n⁵³⁶⁵⁷\0\0⁵\0³⁶⁵⁷\0\0²\0³⁶⁵⁷\0\0\0ᵇ◀\r゜\0\0\0\0\0ᵉ¹ᵉ⁴\0\0²⁴²⁵³⁶\0\0²¹²⁵³⁶\0\0²⁵²⁵³⁶\0\0⁵\0²⁵³⁶\0\0¹²\0\0²²\0\0²¹\0\0¹¹\0\0²⁵\0\0²²\0\0⁵\0\0\0²²\0\0ᵉ□▶□ᵉ\0\0\0\n⁵\0⁷\t\t\0\0¹²\0²⁵²\0\0⁴²\0²⁵²\0\0²⁵\0²⁵²\0\0\n⁵\0⁶\t⁶\0\0⁵\0\0²⁵²\0\0\0⁵²⁵\0\0\0\0▮ᵉ‖□\r\0\0\0²⁴\0\t\t⁶\0\0⁴²\0\t\t⁶\0\0⁶\t\0\t\t⁶\0\0\t\0\0\t\t⁶\0\0⁴²\0⁵⁵⁶³\0¹⁵ᵇᵇ⁵¹\0\0⁶\t⁵\t⁵\0\0\0²⁴²⁵⁷⁵\0\0²¹²⁵⁷⁵\0\0²⁵²⁵⁷⁵\0\0\n⁵⁶\tᶠ\t\0\0⁵\0²⁵⁷⁵\0\0²\0²⁵⁷⁵\0\0゛⁵ᶠ⁵。\0\0\0ᵉ¹¹¹ᵉ⁴\0\0²⁴⁷³¹⁷\0\0²¹⁷³¹⁷\0\0²⁵⁷³¹⁷\0\0⁵\0⁷³¹⁷\0\0¹²\0²²²\0\0²¹\0¹¹¹\0\0²⁵\0²²²\0\0⁵\0\0²²²\0\0²⁵ᵉ\t\t⁶\0\0\n⁵\tᵇ\r\t\0\0²⁴⁶\t\t⁶\0\0⁴²⁶\t\t⁶\0\0²⁵⁶\t\t⁶\0\0\n⁵⁶\t\t⁶\0\0\t\0⁶\t\t⁶\0\0²\0⁷\0²\0\0\0◀\t‖□\r\0\0\0²⁴\t\t\t⁶\0\0⁴²\t\t\t⁶\0\0²⁵⁸\t\t⁶\0\0\t\0\t\t\t⁶\0\0⁴²⁵⁵²²\0\0¹⁷\t\t⁷¹\0\0⁵\0⁵⁵²²\0"
|
||||
--small font
|
||||
--?"\^@56000800⁴⁵⁷\0\0¹\0\0\0\0\0\0\0`w\0g \0aw\0⁶⁶\0\0\0\0\0fw⁷¹\0\0\0`⁷'\0\0\0▮ \0pp\0\0\0¹▮`\0 ■▮\0▮!\0\0⁶q33⁙■⁙3□⁙3▮33■wf\0v\0ヨu◆▶g○w☉vp●「\"s◝◆◝¹◝◝メ◝▒◝◆○▒☉ヲ\0◝◆◝¹◝◝モ◝☉☉☉⁸▒☉☉ユ\0⁷⁷⁷⁷⁷\0\0\0\0⁷⁷⁷\0\0\0\0\0⁷⁵⁷\0\0\0\0\0⁵²⁵\0\0\0\0\0⁵\0⁵\0\0\0\0\0⁵⁵⁵\0\0\0\0⁴⁶⁷⁶⁴\0\0\0¹³⁷³¹\0\0\0⁷¹¹¹\0\0\0\0\0⁴⁴⁴⁷\0\0\0⁵⁷²⁷²\0\0\0\0\0¹\0\0\0\0\0\0\0\0¹²\0\0\0\0\0\0³³\0\0\0⁵⁵\0\0\0\0\0\0²⁵²\0\0\0\0\0\0\0\0\0\0\0\0\0¹¹¹\0¹\0\0\0⁵⁵\0\0\0\0\0\0\n゜\n゜\n\0\0\0²⁷³⁶⁷²\0\0⁵⁴²¹⁵\0\0\0²⁵ᵉ⁵ᵉ\0\0\0¹¹\0\0\0\0\0\0²¹¹¹²\0\0\0¹²²²¹\0\0\0⁵²⁷²⁵\0\0\0\0²⁷²\0\0\0\0\0\0\0\0¹¹\0\0\0\0⁷\0\0\0\0\0\0\0\0\0¹\0\0\0⁴⁴²¹¹\0\0\0²⁵⁵⁵²\0\0\0²³²²⁷\0\0\0³⁴²¹⁷\0\0\0³⁴²⁴³\0\0\0⁵⁵⁷⁴⁴\0\0\0⁷¹³⁴³\0\0\0⁶¹³⁵²\0\0\0⁷⁴⁴²²\0\0\0²⁵²⁵²\0\0\0²⁵⁶⁴³\0\0\0\0¹\0¹\0\0\0\0\0\0¹\0¹¹\0\0\0²¹²\0\0\0\0\0³\0³\0\0\0\0\0¹²¹\0\0\0\0³⁴²\0²\0\0\0⁶\t\r¹⁶\0\0\0\0³⁶⁵⁷\0\0\0¹³⁵⁵³\0\0\0\0⁶¹¹⁶\0\0\0⁴⁶⁵⁵⁶\0\0\0\0²⁵³⁶\0\0\0⁴²⁷²²\0\0\0\0⁶⁵⁶⁴³\0\0¹¹³⁵⁵\0\0\0¹\0¹¹¹\0\0\0²\0²²²¹\0\0¹⁵³⁵⁵\0\0\0¹¹¹¹²\0\0\0\0ᶠ‖‖‖\0\0\0\0³⁵⁵⁵\0\0\0\0²⁵⁵²\0\0\0\0³⁵⁵³¹\0\0\0⁶⁵⁵⁶⁴\0\0\0³⁵¹¹\0\0\0\0⁶³⁶³\0\0\0²⁷²²⁶\0\0\0\0\t\t\t⁶\0\0\0\0⁵⁵⁵³\0\0\0\0■■‖\n\0\0\0\0⁵²⁵⁵\0\0\0\0⁵⁵⁵⁶³\0\0\0⁷⁶³⁷\0\0\0³¹¹¹³\0\0\0¹²²²⁴\0\0\0³²²²³\0\0\0²⁵\0\0\0\0\0\0\0\0\0\0⁷\0\0\0²⁴\0\0\0\0\0\0²⁵⁷⁵⁵\0\0\0³⁵³⁵³\0\0\0⁶¹¹¹⁶\0\0\0⁷\t\t\t⁷\0\0\0⁷¹³¹⁷\0\0\0⁷¹³¹¹\0\0\0ᵉ¹\r\t⁶\0\0\0⁵⁵⁷⁵⁵\0\0\0¹¹¹¹¹\0\0\0⁴⁴⁴⁴⁵²\0\0⁵⁵³⁵⁵\0\0\0¹¹¹¹⁷\0\0\0■•‖■■\0\0\0\tᵇᶠ\r\t\0\0\0⁶\t\t\t⁶\0\0\0³⁵³¹¹\0\0\0⁶\t\t\r⁶⁸\0\0³⁵³⁵⁵\0\0\0⁶¹²⁴³\0\0\0⁷²²²²\0\0\0\t\t\t\t⁶\0\0\0\t\t\t⁵³\0\0\0■■‖•■\0\0\0⁵⁵²⁵⁵\0\0\0⁵⁵²²²\0\0\0⁷⁴²¹⁷\0\0\0⁶²¹²⁶\0\0\0¹¹\0¹¹\0\0\0³²⁴²³\0\0\0\0\0\n⁵\0\0\0\0³³\0\0\0\0\0\0○○○○○○\0\0u*u*u*\0\0a○]]>\0\0\0>ccw>\0\0\0■d■d■d\0\0²゛ᵉᶠ⁸\0\0\0ᵉ▶゜゜ᵉ\0\0\0•゜゜ᵉ⁴\0\0\0、6w6、\0\0\0ᵉᵉ゜ᵉ\n\0\0\0、>○*:\0\0\0>gcg>\0\0\0?-?!?\0\0\0、⁴⁴⁷⁷\0\0\0>ckc>\0\0\0⁴ᵉ゜ᵉ⁴\0\0\0\0\0u\0\0\0\0\0>scs>\0\0\0⁸、○>\"\0\0\0゜ᵉ⁴ᵉ゜\0\0\0>wcc>\0\0\0\0⁵r \0\0\0\0\0■*d\0\0\0\0>kwk>\0\0\0゜\0゜\0゜\0\0\0‖‖‖‖‖\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0¹\0¹¹¹\0\0\0⁴ᵉ⁵ᵉ⁴\0\0ᶜ²⁷²ᶠ\0\0\0■ᵉ\nᵉ■\0\0\0⁵⁵²⁷²\0\0\0¹¹\0¹¹\0\0\0⁶³⁵⁶³\0\0\0⁵\0\0\0\0\0\0\0⁶\t\r\t⁶\0\0\0³⁶⁵⁷\0\0\0\0\0□\t□\0\0\0\0\0\0⁷⁴\0\0\0\0\0\0\0\0\0\0\0\0³⁵³⁵\0\0\0\0⁷\0\0\0\0\0\0\0²⁵²\0\0\0\0\0²⁷²\0⁷\0\0\0³²¹³\0\0\0\0¹³²¹\0\0\0\0²¹\0\0\0\0\0\0\0\0⁵⁵³¹\0\0ᶠᵇᵇ\n\n\0\0\0\0\0¹\0\0\0\0\0\0\0\0\0²³\0\0²³²²\0\0\0\0²⁵²\0\0\0\0\0\0\t□\t\0\0\0\0■\t⁵*9 \0\0■\t。□\t「\0\0!⁙\nur@\0\0\0²\0²¹⁶\0\0²⁴³⁶⁵⁷\0\0²¹³⁶⁵⁷\0\0²⁵³⁶⁵⁷\0\0\n⁵³⁶⁵⁷\0\0⁵\0³⁶⁵⁷\0\0²\0³⁶⁵⁷\0\0\0ᵇ◀\r゜\0\0\0\0\0ᵉ¹ᵉ⁴\0\0²⁴²⁵³⁶\0\0²¹²⁵³⁶\0\0²⁵²⁵³⁶\0\0⁵\0²⁵³⁶\0\0¹²\0\0²²\0\0²¹\0\0¹¹\0\0²⁵\0\0²²\0\0⁵\0\0\0²²\0\0ᵉ□▶□ᵉ\0\0\0\n⁵\0⁷\t\t\0\0¹²\0²⁵²\0\0⁴²\0²⁵²\0\0²⁵\0²⁵²\0\0\n⁵\0⁶\t⁶\0\0⁵\0\0²⁵²\0\0\0⁵²⁵\0\0\0\0▮ᵉ‖□\r\0\0\0²⁴\0\t\t⁶\0\0⁴²\0\t\t⁶\0\0⁶\t\0\t\t⁶\0\0\t\0\0\t\t⁶\0\0⁴²\0⁵⁵⁶³\0¹⁵ᵇᵇ⁵¹\0\0⁶\t⁵\t⁵\0\0\0²⁴²⁵⁷⁵\0\0²¹²⁵⁷⁵\0\0²⁵²⁵⁷⁵\0\0\n⁵⁶\tᶠ\t\0\0⁵\0²⁵⁷⁵\0\0²\0²⁵⁷⁵\0\0゛⁵ᶠ⁵。\0\0\0ᵉ¹¹¹ᵉ⁴\0\0²⁴⁷³¹⁷\0\0²¹⁷³¹⁷\0\0²⁵⁷³¹⁷\0\0⁵\0⁷³¹⁷\0\0¹²\0²²²\0\0²¹\0¹¹¹\0\0²⁵\0²²²\0\0⁵\0\0²²²\0\0²⁵ᵉ\t\t⁶\0\0\n⁵\tᵇ\r\t\0\0²⁴⁶\t\t⁶\0\0⁴²⁶\t\t⁶\0\0²⁵⁶\t\t⁶\0\0\n⁵⁶\t\t⁶\0\0\t\0⁶\t\t⁶\0\0²\0⁷\0²\0\0\0◀\t‖□\r\0\0\0²⁴\t\t\t⁶\0\0⁴²\t\t\t⁶\0\0²⁵⁸\t\t⁶\0\0\t\0\t\t\t⁶\0\0⁴²⁵⁵²²\0\0¹⁷\t\t⁷¹\0\0⁵\0⁵⁵²²\0"
|
||||
--zep 5x6
|
||||
poke(unpack(split"0x5600,6,8,9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,7,7,7,7,7,0,0,0,0,7,7,7,0,0,0,0,0,7,5,7,0,0,0,0,0,5,2,5,0,0,0,0,0,5,0,5,0,0,0,0,0,5,5,5,0,0,0,0,4,6,7,6,4,0,0,0,1,3,7,3,1,0,0,0,7,1,1,1,0,0,0,0,0,4,4,4,7,0,0,0,5,7,2,7,2,0,0,0,0,0,2,0,0,0,0,0,0,0,0,1,2,0,0,0,0,0,0,3,3,0,0,0,5,5,0,0,0,0,0,0,2,5,2,0,0,0,0,0,0,0,0,0,0,0,0,0,14,14,14,14,0,14,0,0,10,10,0,0,0,0,0,0,0,10,31,10,31,10,0,0,4,30,5,14,20,15,0,0,0,19,11,4,26,25,0,0,6,1,10,6,9,22,0,0,4,4,0,0,0,0,0,0,12,6,6,6,6,12,0,0,6,12,12,12,12,6,0,0,0,4,21,14,21,4,0,0,0,4,4,31,4,4,0,0,0,0,0,0,4,6,0,0,0,0,0,14,0,0,0,0,0,0,0,0,0,6,0,0,12,12,6,6,3,3,0,0,31,27,27,27,27,31,0,0,15,12,12,12,12,31,0,0,31,24,31,3,3,31,0,0,31,24,30,24,24,31,0,0,27,27,31,24,24,24,0,0,31,3,31,24,24,31,0,0,31,3,31,27,27,31,0,0,31,24,12,6,6,6,0,0,31,27,31,27,27,31,0,0,31,27,31,24,24,31,0,0,0,6,0,0,6,0,0,0,0,6,0,0,6,3,0,0,0,12,6,3,6,12,0,0,0,0,14,0,14,0,0,0,0,6,12,24,12,6,0,0,15,24,24,14,0,6,0,0,14,17,29,29,1,30,0,0,0,0,30,27,27,23,0,0,3,3,15,27,27,31,0,0,0,0,30,3,3,30,0,0,24,24,30,27,27,30,0,0,0,0,14,27,7,30,0,0,28,6,6,31,6,6,0,0,0,0,30,27,27,30,24,15,3,3,15,27,27,27,0,0,6,0,6,6,6,12,0,0,0,0,12,12,12,12,12,7,3,27,11,7,11,27,0,0,6,6,6,6,6,12,0,0,0,0,10,31,27,27,0,0,0,0,15,27,27,27,0,0,0,0,30,27,27,15,0,0,0,0,15,27,27,15,3,3,0,0,30,27,27,30,24,24,0,0,14,27,3,3,0,0,0,0,30,7,28,15,0,0,6,6,15,6,6,12,0,0,0,0,27,27,27,30,0,0,0,0,27,27,10,4,0,0,0,0,27,27,31,10,0,0,0,0,27,14,27,27,0,0,0,0,27,27,27,30,24,14,0,0,31,12,6,31,0,0,14,6,6,6,6,14,0,0,6,6,12,12,24,24,0,0,14,12,12,12,12,14,0,0,4,10,0,0,0,0,0,0,0,0,0,0,0,31,0,0,2,4,0,0,0,0,0,0,14,27,27,31,27,27,0,0,15,27,15,27,27,15,0,0,14,27,3,3,27,14,0,0,15,27,27,27,27,15,0,0,30,3,15,3,3,30,0,0,30,3,15,3,3,3,0,0,30,3,3,27,27,30,0,0,27,27,31,27,27,27,0,0,15,6,6,6,6,15,0,0,31,12,12,12,12,7,0,0,27,27,7,27,27,27,0,0,3,3,3,3,3,31,0,0,27,31,31,27,27,27,0,0,15,27,27,27,27,27,0,0,14,27,27,27,27,14,0,0,15,27,27,15,3,3,0,0,14,27,27,27,15,30,0,0,15,27,27,7,27,27,0,0,30,3,14,24,24,15,0,0,31,6,6,6,6,6,0,0,27,27,27,27,27,14,0,0,27,27,27,27,14,4,0,0,27,27,27,31,31,27,0,0,27,27,4,27,27,27,0,0,27,27,31,24,24,15,0,0,31,24,12,6,3,31,0,0,12,4,6,6,4,12,0,0,6,6,6,6,6,6,0,0,12,8,24,24,8,12,0,0,0,10,5,0,0,0,0,0,0,4,31,14,10,0,0,0,127,127,127,127,127,0,0,0,85,42,85,42,85,0,0,0,65,127,93,93,62,0,0,0,62,99,99,119,62,0,0,0,17,68,17,68,17,0,0,0,4,60,28,30,16,0,0,0,28,46,62,62,28,0,0,0,54,62,62,28,8,0,0,0,28,54,119,54,28,0,0,0,28,28,62,28,20,0,0,0,28,62,127,42,58,0,0,0,62,103,99,103,62,0,0,0,127,93,127,65,127,0,0,0,56,8,8,14,14,0,0,0,62,99,107,99,62,0,0,0,8,28,62,28,8,0,0,0,0,0,85,0,0,0,0,0,62,115,99,115,62,0,0,0,8,28,127,62,34,0,0,0,62,28,8,28,62,0,0,0,62,119,99,99,62,0,0,0,0,5,82,32,0,0,0,0,0,17,42,68,0,0,0,0,62,107,119,107,62,0,0,0,127,0,127,0,127,0,0,0,85,85,85,85,85,0,0,0,14,4,30,45,38,0,0,0,17,33,33,37,2,0,0,0,12,30,32,32,28,0,0,0,8,30,8,36,26,0,0,0,78,4,62,69,38,0,0,0,34,95,18,18,10,0,0,0,30,8,60,17,6,0,0,0,16,12,2,12,16,0,0,0,34,122,34,34,18,0,0,0,30,32,0,2,60,0,0,0,8,60,16,2,12,0,0,0,2,2,2,34,28,0,0,0,8,62,8,12,8,0,0,0,18,63,18,2,28,0,0,0,60,16,126,4,56,0,0,0,2,7,50,2,50,0,0,0,15,2,14,16,28,0,0,0,62,64,64,32,24,0,0,0,62,16,8,8,16,0,0,0,8,56,4,2,60,0,0,0,50,7,18,120,24,0,0,0,122,66,2,10,114,0,0,0,9,62,75,109,102,0,0,0,26,39,34,115,50,0,0,0,60,74,73,73,70,0,0,0,18,58,18,58,26,0,0,0,35,98,34,34,28,0,0,0,12,0,8,42,77,0,0,0,0,12,18,33,64,0,0,0,125,121,17,61,93,0,0,0,62,60,8,30,46,0,0,0,6,36,126,38,16,0,0,0,36,78,4,70,60,0,0,0,10,60,90,70,48,0,0,0,30,4,30,68,56,0,0,0,20,62,36,8,8,0,0,0,58,86,82,48,8,0,0,0,4,28,4,30,6,0,0,0,8,2,62,32,28,0,0,0,34,34,38,32,24,0,0,0,62,24,36,114,48,0,0,0,4,54,44,38,100,0,0,0,62,24,36,66,48,0,0,0,26,39,34,35,18,0,0,0,14,100,28,40,120,0,0,0,4,2,6,43,25,0,0,0,0,0,14,16,8,0,0,0,0,10,31,18,4,0,0,0,0,4,15,21,13,0,0,0,0,4,12,6,14,0,0,0,62,32,20,4,2,0,0,0,48,8,14,8,8,0,0,0,8,62,34,32,24,0,0,0,62,8,8,8,62,0,0,0,16,126,24,20,18,0,0,0,4,62,36,34,50,0,0,0,8,62,8,62,8,0,0,0,60,36,34,16,8,0,0,0,4,124,18,16,8,0,0,0,62,32,32,32,62,0,0,0,36,126,36,32,16,0,0,0,6,32,38,16,12,0,0,0,62,32,16,24,38,0,0,0,4,62,36,4,56,0,0,0,34,36,32,16,12,0,0,0,62,34,45,48,12,0,0,0,28,8,62,8,4,0,0,0,42,42,32,16,12,0,0,0,28,0,62,8,4,0,0,0,4,4,28,36,4,0,0,0,8,62,8,8,4,0,0,0,0,28,0,0,62,0,0,0,62,32,40,16,44,0,0,0,8,62,48,94,8,0,0,0,32,32,32,16,14,0,0,0,16,36,36,68,66,0,0,0,2,30,2,2,28,0,0,0,62,32,32,16,12,0,0,0,12,18,33,64,0,0,0,0,8,62,8,42,42,0,0,0,62,32,20,8,16,0,0,0,60,0,62,0,30,0,0,0,8,4,36,66,126,0,0,0,64,40,16,104,6,0,0,0,30,4,30,4,60,0,0,0,4,62,36,4,4,0,0,0,28,16,16,16,62,0,0,0,30,16,30,16,30,0,0,0,62,0,62,32,24,0,0,0,36,36,36,32,16,0,0,0,20,20,20,84,50,0,0,0,2,2,34,18,14,0,0,0,62,34,34,34,62,0,0,0,62,34,32,16,12,0,0,0,62,32,60,32,24,0,0,0,6,32,32,16,14,0,0,0,0,21,16,8,6,0,0,0,0,4,30,20,4,0,0,0,0,0,12,8,30,0,0,0,0,28,24,16,28,0,0,0,8,4,99,16,8,0,0,0,8,16,99,4,8,0,0,0"))
|
||||
if not done then
|
||||
cstore(0x2800, 0x5600, 0x800)
|
||||
cstore(0x2000, 0x5600, 0x800)
|
||||
done = true
|
||||
end
|
||||
end
|
||||
@ -33,22 +36,22 @@ __gfx__
|
||||
00077000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
00700700000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
__map__
|
||||
0608090000010000000000000000000045102051550075740000000000541606020000006006260000070710705750100500010070072700000000200070740100006066600060600060000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
00000000000000000101010101000100000a0a050000000000123f12123f1200000e15050e14150e2215150a285454220609090629112e000002020100000000020101010101020001020202020201000004150a150400000004041f040400000000000000020201000000000f00000000000000000001000808040402020101
|
||||
0e11151515110e000407040404041f000e11100804021f000f10100e10100f00080c0a091f0808001f010f1010110e000e11010f11110e001f111008040202000e11110e11110e000e11111e1008060000000100000100000000000200020201000402010204000000003f003f00000000010204020100000e11100c02000400
|
||||
1e212d291d413e00000e101e11111e0001010f1111110f00000e110101011e0010101e1111111e00000e111f01011e001c02020f02020200001e1111111e100e01010d131111110002000302020207000007020202020201001109050709110000010101010106000036494949494900000c131111111100000e111111110e00
|
||||
000f1111110f0101001e1111111e1010000d030101010100000e010e10110e0001010f0101010e000011111111191600001111110a0a04000020252525251a0000110a04040a11000000090909060403000f080402010f00030101010101030001010202040408080302020202020300040a110000000000000000000000003f
|
||||
00010202000000000e1111111f1111000f11110f11110f000e11010101110e001f22222222221e001f01010f01011f001f01010f010101001e01011911111e001111111f1111110007020202020207000f0404040404030011090507090911000101010101010f002121332d2121210011131519111111000e11111111110e00
|
||||
0f11110f010101000e111111150916000f11110f091111000e11010e10110e001f040404040404001111111111110e00111111110a0a0400414149494955220011110a040a1111001111110a040404001f10080402011f00040a020101020a040101010101010101020504080804050200000026190000000000000000000000
|
||||
00007f7f7f7f7f000000552a552a55000000417f5d5d3e0000003e6363773e0000001144114411000000021e0e0f080000000e171f1f0e0000001b1f1f0e040000001c3677361c0000000e0e1f0e0a0000001c3e7f2a3a0000003e6763673e0000007f5d7f417f0000001c040407070000003e636b633e000000040e1f0e0400
|
||||
000000005500000000003e7363733e000000081c7f3e220000001f0e040e1f0000003e7763633e000000000552200000000000112a44000000003e6b776b3e0000007f007f007f000000555555555500000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
0608090000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
0707070707000000000707070000000000070507000000000005020500000000000500050000000000050505000000000406070604000000010307030100000007010101000000000004040407000000050702070200000000000200000000000000000102000000000000030300000005050000000000000205020000000000
|
||||
00000000000000000e0e0e0e000e00000a0a000000000000000a1f0a1f0a0000041e050e140f000000130b041a19000006010a060916000004040000000000000c060606060c0000060c0c0c0c0600000004150e150400000004041f0404000000000000040600000000000e0000000000000000000600000c0c060603030000
|
||||
1f1b1b1b1b1f00000f0c0c0c0c1f00001f181f03031f00001f181e18181f00001b1b1f18181800001f031f18181f00001f031f1b1b1f00001f180c06060600001f1b1f1b1b1f00001f1b1f18181f000000060000060000000006000006030000000c0603060c000000000e000e00000000060c180c0600000f18180e00060000
|
||||
0e111d1d011e000000001e1b1b17000003030f1b1b1f000000001e03031e000018181e1b1b1e000000000e1b071e00001c06061f0606000000001e1b1b1e180f03030f1b1b1b000006000606060c000000000c0c0c0c0c07031b0b070b1b000006060606060c000000000a1f1b1b000000000f1b1b1b000000001e1b1b0f0000
|
||||
00000f1b1b0f030300001e1b1b1e181800000e1b0303000000001e071c0f000006060f06060c000000001b1b1b1e000000001b1b0a04000000001b1b1f0a000000001b0e1b1b000000001b1b1b1e180e00001f0c061f00000e060606060e000006060c0c181800000e0c0c0c0c0e0000040a00000000000000000000001f0000
|
||||
02040000000000000e1b1b1f1b1b00000f1b0f1b1b0f00000e1b03031b0e00000f1b1b1b1b0f00001e030f03031e00001e030f03030300001e03031b1b1e00001b1b1f1b1b1b00000f060606060f00001f0c0c0c0c0700001b1b071b1b1b000003030303031f00001b1f1f1b1b1b00000f1b1b1b1b1b00000e1b1b1b1b0e0000
|
||||
0f1b1b0f030300000e1b1b1b0f1e00000f1b1b071b1b00001e030e18180f00001f060606060600001b1b1b1b1b0e00001b1b1b1b0e0400001b1b1b1f1f1b00001b1b041b1b1b00001b1b1f18180f00001f180c06031f00000c040606040c000006060606060600000c081818080c0000000a05000000000000041f0e0a000000
|
||||
7f7f7f7f7f000000552a552a55000000417f5d5d3e0000003e6363773e0000001144114411000000043c1c1e100000001c2e3e3e1c000000363e3e1c080000001c3677361c0000001c1c3e1c140000001c3e7f2a3a0000003e6763673e0000007f5d7f417f0000003808080e0e0000003e636b633e000000081c3e1c08000000
|
||||
00005500000000003e7363733e000000081c7f3e220000003e1c081c3e0000003e7763633e000000000552200000000000112a44000000003e6b776b3e0000007f007f007f00000055555555550000000e041e2d2600000011212125020000000c1e20201c000000081e08241a0000004e043e4526000000225f12120a000000
|
||||
1e083c1106000000100c020c10000000227a2222120000001e2000023c000000083c10020c000000020202221c000000083e080c08000000123f12021c0000003c107e043800000002073202320000000f020e101c0000003e404020180000003e10080810000000083804023c00000032071278180000007a42020a72000000
|
||||
093e4b6d660000001a272273320000003c4a494946000000123a123a1a000000236222221c0000000c00082a4d000000000c1221400000007d79113d5d0000003e3c081e2e00000006247e2610000000244e04463c0000000a3c5a46300000001e041e4438000000143e2408080000003a56523008000000041c041e06000000
|
||||
08023e201c00000022222620180000003e1824723000000004362c26640000003e182442300000001a272223120000000e641c28780000000402062b1900000000000e1008000000000a1f120400000000040f150d00000000040c060e0000003e2014040200000030080e0808000000083e2220180000003e0808083e000000
|
||||
107e181412000000043e242232000000083e083e080000003c24221008000000047c1210080000003e2020203e000000247e242010000000062026100c0000003e20101826000000043e240438000000222420100c0000003e222d300c0000001c083e08040000002a2a20100c0000001c003e080400000004041c2404000000
|
||||
083e080804000000001c00003e0000003e2028102c000000083e305e08000000202020100e0000001024244442000000021e02021c0000003e2020100c0000000c12214000000000083e082a2a0000003e201408100000003c003e001e000000080424427e00000040281068060000001e041e043c000000043e240404000000
|
||||
1c1010103e0000001e101e101e0000003e003e201800000024242420100000001414145432000000020222120e0000003e2222223e0000003e2220100c0000003e203c2018000000062020100e000000001510080600000000041e140400000000000c081e000000001c18101c00000008046310080000000810630408000000
|
||||
04050700000100000000000000607700672000617700060600000000006677070100000060072700000010200070700000000110600020111000102100000671333313111333121333103333117766007600f1758f17677f7788767086182273ff8fff01ffffedff81ff8f7f8188f800ff8fff01ffffeeff88888808818888f0
|
||||
0007070707070000000007070700000000000705070000000000050205000000000005000500000000000505050000000004060706040000000103070301000000070101010000000000040404070000000507020702000000000001000000000000000001020000000000000303000000050500000000000002050200000000
|
||||
000000000000000000010101000100000005050000000000000a1f0a1f0a0000000207030607020000050402010500000002050e050e0000000101000000000000020101010200000001020202010000000502070205000000000207020000000000000000010100000000070000000000000000000100000004040201010000
|
||||
|
333
font_snippet.p8
Normal file
333
font_snippet.p8
Normal file
@ -0,0 +1,333 @@
|
||||
pico-8 cartridge // http://www.pico-8.com
|
||||
version 41
|
||||
__lua__
|
||||
-- font snippet generator
|
||||
-- by zep
|
||||
|
||||
--[[
|
||||
|
||||
to make a font:
|
||||
|
||||
1. choose a fixed size (below)
|
||||
2. draw as many characters as
|
||||
needed in the spritesheet
|
||||
3. run this program
|
||||
4. paste the snippet into your
|
||||
cartridge to use it
|
||||
|
||||
-- output looks like this:
|
||||
-- poke(0x5600,unpack(split"8,8,10,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,63,63,63,63,63,63,63,0,0,0,63,63,63,0,0,0,0,0,63,51,63,0,0,0,0,0,51,12,51,0,0,0,0,0,51,0,51,0,0,0,0,0,51,51,51,0,0,0,0,48,60,63,60,48,0,0,0,3,15,63,15,3,0,0,62,6,6,6,6,0,0,0,0,0,48,48,48,48,62,0,99,54,28,62,8,62,8,0,0,0,0,24,0,0,0,0,0,0,0,0,0,12,24,0,0,0,0,0,0,12,12,0,0,0,10,10,0,0,0,0,0,4,10,4,0,0,0,0,0,0,0,0,0,0,0,0,12,12,12,12,12,0,12,0,0,54,54,0,0,0,0,0,0,54,127,54,54,127,54,0,8,62,11,62,104,62,8,0,0,51,24,12,6,51,0,0,14,27,27,110,59,59,110,0,12,12,0,0,0,0,0,0,24,12,6,6,6,12,24,0,12,24,48,48,48,24,12,0,0,54,28,127,28,54,0,0,0,12,12,63,12,12,0,0,0,0,0,0,0,12,12,6,0,0,0,62,0,0,0,0,0,0,0,0,0,12,12,0,32,48,24,12,6,3,1,0,62,99,115,107,103,99,62,0,24,28,24,24,24,24,60,0,63,96,96,62,3,3,127,0,63,96,96,60,96,96,63,0,51,51,51,126,48,48,48,0,127,3,3,63,96,96,63,0,62,3,3,63,99,99,62,0,127,96,48,24,12,12,12,0,62,99,99,62,99,99,62,0,62,99,99,126,96,96,62,0,0,0,12,0,0,12,0,0,0,0,12,0,0,12,6,0,48,24,12,6,12,24,48,0,0,0,30,0,30,0,0,0,6,12,24,48,24,12,6,0,30,51,48,24,12,0,12,0,0,30,51,59,59,3,30,0,0,0,62,96,126,99,126,0,3,3,63,99,99,99,63,0,0,0,62,99,3,99,62,0,96,96,126,99,99,99,126,0,0,0,62,99,127,3,62,0,124,6,6,63,6,6,6,0,0,0,126,99,99,126,96,62,3,3,63,99,99,99,99,0,0,24,0,28,24,24,60,0,48,0,56,48,48,48,51,30,3,3,51,27,15,27,51,0,12,12,12,12,12,12,56,0,0,0,99,119,127,107,99,0,0,0,63,99,99,99,99,0,0,0,62,99,99,99,62,0,0,0,63,99,99,63,3,3,0,0,126,99,99,126,96,96,0,0,62,99,3,3,3,0,0,0,62,3,62,96,62,0,12,12,62,12,12,12,56,0,0,0,99,99,99,99,126,0,0,0,99,99,34,54,28,0,0,0,99,99,107,127,54,0,0,0,99,54,28,54,99,0,0,0,99,99,99,126,96,62,0,0,127,112,28,7,127,0,62,6,6,6,6,6,62,0,1,3,6,12,24,48,32,0,62,48,48,48,48,48,62,0,12,30,18,0,0,0,0,0,0,0,0,0,0,0,30,0,12,24,0,0,0,0,0,0,28,54,99,99,127,99,99,0,63,99,99,63,99,99,63,0,62,99,3,3,3,99,62,0,31,51,99,99,99,51,31,0,127,3,3,63,3,3,127,0,127,3,3,63,3,3,3,0,62,3,3,115,99,99,126,0,99,99,99,127,99,99,99,0,63,12,12,12,12,12,63,0,127,24,24,24,24,24,15,0,99,51,27,15,27,51,99,0,3,3,3,3,3,3,127,0,99,119,127,107,99,99,99,0,99,103,111,107,123,115,99,0,62,99,99,99,99,99,62,0,63,99,99,63,3,3,3,0,62,99,99,99,99,51,110,0,63,99,99,63,27,51,99,0,62,99,3,62,96,99,62,0,63,12,12,12,12,12,12,0,99,99,99,99,99,99,62,0,99,99,99,99,54,28,8,0,99,99,99,107,127,119,99,0,99,99,54,28,54,99,99,0,99,99,99,126,96,96,63,0,127,96,48,28,6,3,127,0,56,12,12,7,12,12,56,0,8,8,8,0,8,8,8,0,14,24,24,112,24,24,14,0,0,0,110,59,0,0,0,0"))
|
||||
|
||||
-- you can then use it with:
|
||||
-- print"\14 alt font!"
|
||||
|
||||
-- or: poke(0x5f58,0x81) to
|
||||
-- always print with the alt
|
||||
-- font
|
||||
|
||||
]]
|
||||
|
||||
-- size of character (width2
|
||||
-- is user for chr >= 128)
|
||||
char_width = 8
|
||||
char_width2 = 8
|
||||
char_height = 10
|
||||
|
||||
-- draw offset
|
||||
char_offset_x = 0
|
||||
char_offset_y = 0
|
||||
|
||||
function _init()
|
||||
memset(0x5600,0,0x800)
|
||||
local s=load_from_sprites()
|
||||
printh(s,"@clip")
|
||||
end
|
||||
|
||||
|
||||
function _draw()
|
||||
cls(1)
|
||||
|
||||
poke(0x5f58,0x81)
|
||||
color(7)
|
||||
?"the quick brown"
|
||||
?"fox jumps over "
|
||||
?"the lazy dog."
|
||||
?""
|
||||
?"THE QUICK BROWN"
|
||||
?"FOX JUMPS OVER"
|
||||
?"THE LAZY DOG?"
|
||||
?""
|
||||
?"0123456789 +-*/"
|
||||
?"█▒🐱⬇️░✽●♥☉웃⌂⬅️😐"
|
||||
?"♪🅾️◆…➡️★⧗⬆️ˇ∧❎▤▥"
|
||||
poke(0x5f58,0)
|
||||
color(13)
|
||||
print(" [snippet copied to clipboard]",0,120)
|
||||
cursor()
|
||||
|
||||
end
|
||||
|
||||
function load_from_sprites()
|
||||
|
||||
--find maximum sprite index
|
||||
--(look for any set pixel)
|
||||
maxi=0
|
||||
for i=0,255 do
|
||||
local x0=(i%16)*8
|
||||
local y0=(i\16)*8
|
||||
for y=0,7 do
|
||||
for x=0,7 do
|
||||
if(sget(x0+x,y0+y)>0) maxi=i
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
-- grab bits from each sprite
|
||||
for i=0,maxi do
|
||||
|
||||
local x0=(i%16)*8
|
||||
local y0=(i\16)*8
|
||||
|
||||
for y=0,7 do
|
||||
local val=0
|
||||
for x=0,7 do
|
||||
if sget(x0+x,y0+y)>0 then
|
||||
val |= (1<<x)
|
||||
end
|
||||
end
|
||||
poke(0x5600+i*8+y,val)
|
||||
|
||||
end
|
||||
|
||||
end
|
||||
|
||||
-- font attributes are stored
|
||||
-- in character 0
|
||||
poke(0x5600,
|
||||
char_width,
|
||||
char_width2,
|
||||
char_height,
|
||||
char_offset_x,
|
||||
char_offset_y)
|
||||
|
||||
-- generate string
|
||||
local str="poke(0x5600,unpack(split\""
|
||||
|
||||
for i=0,maxi*8+7 do
|
||||
str..= peek(0x5600+i)
|
||||
if (i<maxi*8+7) str..=","
|
||||
end
|
||||
|
||||
return str.."\"))"
|
||||
end
|
||||
|
||||
__gfx__
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
77777700000000000000000000000000000000000000000000000000000000000777770000000000770007700000000000000000000000000000000000000000
|
||||
77777700000000000000000000000000000000000000000000007700770000000770000000000000077077000000000000000000000000000000000000700000
|
||||
77777700777777007777770077007700770077007700770000777700777700000770000000007700007770000000000000000000000000000707000007070000
|
||||
77777700777777007700770000770000000000007700770077777700777777000770000000007700077777000007700000000000000000000707000000700000
|
||||
77777700777777007777770077007700770077007700770000777700777700000770000000007700000700000000000000000000000000000000000000000000
|
||||
77777700000000000000000000000000000000000000000000007700770000000000000000007700077777000000000000770000007700000000000000000000
|
||||
77777700000000000000000000000000000000000000000000000000000000000000000007777700000700000000000000077000007700000000000000000000
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
00000000007700000000000000000000000700000000000007770000007700000007700000770000000000000000000000000000000000000000000000000700
|
||||
00000000007700000770770007707700077777007700770077077000007700000077000000077000077077000077000000000000000000000000000000007700
|
||||
00000000007700000770770077777770770700000007700077077000000000000770000000007700007770000077000000000000000000000000000000077000
|
||||
00000000007700000000000007707700077777000077000007770770000000000770000000007700777777707777770000000000077777000000000000770000
|
||||
00000000007700000000000007707700000707700770000077077700000000000770000000007700007770000077000000000000000000000000000007700000
|
||||
00000000000000000000000077777770077777007700770077077700000000000077000000077000077077000077000000770000000000000077000077000000
|
||||
00000000007700000000000007707700000700000000000007770770000000000007700000770000000000000000000000770000000000000077000070000000
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000007700000000000000000000000000000
|
||||
07777700000770007777770077777700770077007777777007777700777777700777770007777700000000000000000000007700000000000770000007777000
|
||||
77000770007770000000077000000770770077007700000077000000000007707700077077000770000000000000000000077000000000000077000077007700
|
||||
77007770000770000000077000000770770077007700000077000000000077007700077077000770007700000077000000770000077770000007700000007700
|
||||
77070770000770000777770000777700077777707777770077777700000770000777770007777770000000000000000007700000000000000000770000077000
|
||||
77700770000770007700000000000770000077000000077077000770007700007700077000000770000000000000000000770000077770000007700000770000
|
||||
77000770000770007700000000000770000077000000077077000770007700007700077000000770007700000077000000077000000000000077000000000000
|
||||
07777700007777007777777077777700000077007777770007777700007700000777770007777700000000000770000000007700000000000770000000770000
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
00000000000000007700000000000000000007700000000000777770000000007700000000000000000077007700000000770000000000000000000000000000
|
||||
07777000000000007700000000000000000007700000000007700000000000007700000000077000000000007700000000770000000000000000000000000000
|
||||
77007700077777007777770007777700077777700777770007700000077777707777770000000000000777007700770000770000770007707777770007777700
|
||||
77077700000007707700077077000770770007707700077077777700770007707700077000777000000077007707700000770000777077707700077077000770
|
||||
77077700077777707700077077000000770007707777777007700000770007707700077000077000000077007777000000770000777777707700077077000770
|
||||
77000000770007707700077077000770770007707700000007700000077777707700077000077000000077007707700000770000770707707700077077000770
|
||||
07777000077777707777770007777700077777700777770007700000000007707700077000777700770077007700770000077700770007707700077007777700
|
||||
00000000000000000000000000000000000000000000000000000000077777000000000000000000077770000000000000000000000000000000000000000000
|
||||
00000000000000000000000000000000007700000000000000000000000000000000000000000000000000000777770070000000077777000077000000000000
|
||||
00000000000000000000000000000000007700000000000000000000000000000000000000000000000000000770000077000000000077000777700000000000
|
||||
77777700077777700777770007777700077777007700077077000770770007707700077077000770777777700770000007700000000077000700700000000000
|
||||
77000770770007707700077077000000007700007700077077000770770007700770770077000770000077700770000000770000000077000000000000000000
|
||||
77000770770007707700000007777700007700007700077007000700770707700077700077000770007770000770000000077000000077000000000000000000
|
||||
77777700077777707700000000000770007700007700077007707700777777700770770007777770777000000770000000007700000077000000000000000000
|
||||
77000000000007707700000007777700000777000777777000777000077077007700077000000770777777700777770000000700077777000000000007777000
|
||||
77000000000007700000000000000000000000000000000000000000000000000000000007777700000000000000000000000000000000000000000000000000
|
||||
00770000007770007777770007777700777770007777777077777770077777007700077077777700777777707700077077000000770007707700077007777700
|
||||
00077000077077007700077077000770770077007700000077000000770000007700077000770000000770007700770077000000777077707770077077000770
|
||||
00000000770007707700077077000000770007707700000077000000770000007700077000770000000770007707700077000000777777707777077077000770
|
||||
00000000770007707777770077000000770007707777770077777700770077707777777000770000000770007777000077000000770707707707077077000770
|
||||
00000000777777707700077077000000770007707700000077000000770007707700077000770000000770007707700077000000770007707707777077000770
|
||||
00000000770007707700077077000770770077007700000077000000770007707700077000770000000770007700770077000000770007707700777077000770
|
||||
00000000770007707777770007777700777770007777777077000000077777707700077077777700777700007700077077777770770007707700077007777700
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
77777700077777007777770007777700777777007700077077000770770007707700077077000770777777700007770000070000077700000000000000000000
|
||||
77000770770007707700077077000770007700007700077077000770770007707700077077000770000007700077000000070000000770000000000000000000
|
||||
77000770770007707700077077000000007700007700077077000770770007700770770077000770000077000077000000070000000770000777077000000000
|
||||
77777700770007707777770007777700007700007700077077000770770707700077700007777770007770007770000000000000000077707707770000000000
|
||||
77000000770007707707700000000770007700007700077007707700777777700770770000000770077000000077000000070000000770000000000000000000
|
||||
77000000770077007700770077000770007700007700077000777000777077707700077000000770770000000077000000070000000770000000000000000000
|
||||
77000000077707707700077007777700007700000777770000070000770007707700077077777700777777700007770000070000077700000000000000000000
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
77777770707070707000007007777700700070000070000000777000070007000707070000777000000700000777770007777700000770000777770000070000
|
||||
77777770070707007700077077000770007000700077000007700700777077700077700000777000007770007770077077777770000777707700077000707000
|
||||
77777770707070707777777077000770700070000077777077777070777777700770770007777700077777007700077070777070000700007707077007070700
|
||||
77777770070707007077707077707770007000700777770077777070777777707770777070777070777777707770077070777070000700007700077070777070
|
||||
77777770707070707077707007777700700070007777700077777770077777000770770000777000077777000777770077777770000700000777770007070700
|
||||
77777770070707007770777070000070007000700007700007777700007770000077700000707000070707007000007077000770777700007000007000707000
|
||||
77777770707070700777770007777700700070000000700000777000000700000707070000707000070777000777770007777700777000000777770000070000
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
00000000077777000007000077777770077777000000000070007000077777007777777070707070000000000000000000000000000000000000000000000000
|
||||
00000000770077700077700007000700777077700707000007070700770707700000000070707070000000000000000000000000000000000000000000000000
|
||||
00000000770007707777777000707000770007700070000000700070777077707777777070707070000000000000000000000000000000000000000000000000
|
||||
70707070770077700077700000070000770007700000000000000000770707700000000070707070000000000000000000000000000000000000000000000000
|
||||
00000000077777000770770000707000077777000000707070007000077777007777777070707070000000000000000000000000000000000000000000000000
|
||||
00000000700000700700070007000700700000700000070007070700700000700000000070707070000000000000000000000000000000000000000000000000
|
||||
00000000077777000000000077777770077777000000000000700070077777007777777070707070000000000000000000000000000000000000000000000000
|
||||
__label__
|
||||
77777711771117717777777111111111177777117711177177777711177777117711177111111111777777117777771117777711771117717711177111111111
|
||||
11771111771117717711111111111111771117717711177111771111771117717711771111111111771117717711177177111771771117717771177111111111
|
||||
11771111771117717711111111111111771117717711177111771111771111117717711111111111771117717711177177111771771117717777177111111111
|
||||
11771111777777717777771111111111771117717711177111771111771111117777111111111111777777117777771177111771771717717717177111111111
|
||||
11771111771117717711111111111111771117717711177111771111771111117717711111111111771117717717711177111771777777717717777111111111
|
||||
11771111771117717711111111111111771177117711177111771111771117717711771111111111771117717711771177111771777177717711777111111111
|
||||
11771111771117717777777111111111177717711777771177777711177777117711177111111111777777117711177117777711771117717711177111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
77777771177777117711177111111111777777717711177177111771777777111777771111111111177777117711177177777771777777111111111111111111
|
||||
77111111771117717711177111111111111771117711177177717771771117717711177111111111771117717711177177111111771117711111111111111111
|
||||
77111111771117711771771111111111111771117711177177777771771117717711111111111111771117717711177177111111771117711111111111111111
|
||||
77777711771117711177711111111111111771117711177177171771777777111777771111111111771117717711177177777711777777111111111111111111
|
||||
77111111771117711771771111111111111771117711177177111771771111111111177111111111771117711771771177111111771771111111111111111111
|
||||
77111111771117717711177111111111111771117711177177111771771111117711177111111111771117711177711177111111771177111111111111111111
|
||||
77111111177777117711177111111111777711111777771177111771771111111777771111111111177777111117111177777771771117711111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
77777711771117717777777111111111771111111177711177777771771117711111111177777111177777111777771111111111111111111111111111111111
|
||||
11771111771117717711111111111111771111111771771111111771771117711111111177117711771117717711111111111111111111111111111111111111
|
||||
11771111771117717711111111111111771111117711177111117711771117711111111177111771771117717711111111111111111111111111111111111111
|
||||
11771111777777717777771111111111771111117711177111777111177777711111111177111771771117717711777111111111111111111111111111111111
|
||||
11771111771117717711111111111111771111117777777117711111111117711111111177111771771117717711177111111111111111111111111111111111
|
||||
11771111771117717711111111111111771111117711177177111111111117711111111177117711771117717711177111771111111111111111111111111111
|
||||
11771111771117717777777111111111777777717711177177777771777777111111111177777111177777111777777111771111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11771111771111111111111111111111111111111111111111111111111111117711111111111111771111111111111111111111111111111111111111111111
|
||||
11771111771111111111111111111111111111111111111111177111111111117711111111111111771111111111111111111111111111111111111111111111
|
||||
17777711777777111777771111111111177777717711177111111111177777117711771111111111777777111777771117777711771117717777771111111111
|
||||
11771111771117717711177111111111771117717711177111777111771117717717711111111111771117717711177177111771771117717711177111111111
|
||||
11771111771117717777777111111111771117717711177111177111771111117777111111111111771117717711111177111771771717717711177111111111
|
||||
11771111771117717711111111111111177777717711177111177111771117717717711111111111771117717711111177111771777777717711177111111111
|
||||
11177711771117711777771111111111111117711777777111777711177777117711771111111111777777117711111117777711177177117711177111111111
|
||||
11111111111111111111111111111111111117711111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11777771111111111111111111111111111177111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
17711111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
17711111177777117711177111111111111777117711177177111771777777111777771111111111177777117711177117777711177777111111111111111111
|
||||
77777711771117711771771111111111111177117711177177717771771117717711111111111111771117717711177177111771771117711111111111111111
|
||||
17711111771117711177711111111111111177117711177177777771771117711777771111111111771117711711171177777771771111111111111111111111
|
||||
17711111771117711771771111111111111177117711177177171771777777111111177111111111771117711771771177111111771111111111111111111111
|
||||
17711111177777117711177111111111771177111777777177111771771111111777771111111111177777111177711117777711771111111111111111111111
|
||||
11111111111111111111111111111111177771111111111111111111771111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11771111771111111111111111111111117711111111111111111111111111111111111111111771111111111111111117777111111111111111111111111111
|
||||
11771111771111111111111111111111117711111111111111111111111111111111111111111771111111111111111177117711111111111111111111111111
|
||||
17777711777777111777771111111111117711111777771177777771771117711111111117777771177777111777777111117711111111111111111111111111
|
||||
11771111771117717711177111111111117711111111177111117771771117711111111177111771771117717711177111177111111111111111111111111111
|
||||
11771111771117717777777111111111117711111777777111777111771117711111111177111771771117717711177111771111111111111111111111111111
|
||||
11771111771117717711111111111111117711117711177177711111177777711111111177111771771117711777777111111111111111111111111111111111
|
||||
11177711771117711777771111111111111777111777777177777771111117711111111117777771177777111111177111771111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111177777111111111111111111111111111777771111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
17777711111771117777771177777711771177117777777117777711777777711777771117777711111111111111111111111111111111111111171111111111
|
||||
77111771117771111111177111111771771177117711111177111111111117717711177177111771111111111177111111111111177177111111771111111111
|
||||
77117771111771111111177111111771771177117711111177111111111177117711177177111771111111111177111111111111117771111117711111111111
|
||||
77171771111771111777771111777711177777717777771177777711111771111777771117777771111111117777771117777711777777711177111111111111
|
||||
77711771111771117711111111111771111177111111177177111771117711117711177111111771111111111177111111111111117771111771111111111111
|
||||
77111771111771117711111111111771111177111111177177111771117711117711177111111771111111111177111111111111177177117711111111111111
|
||||
17777711117777117777777177777711111177117777771117777711117711111777771117777711111111111111111111111111111111117111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
77777771717171717111117117777711711171111171111111777111171117111717171111777111111711111777771117777711111111111111111111111111
|
||||
77777771171717117711177177111771117111711177111117711711777177711177711111777111117771117771177177777771111111111111111111111111
|
||||
77777771717171717777777177111771711171111177777177777171777777711771771117777711177777117711177171777171111111111111111111111111
|
||||
77777771171717117177717177717771117111711777771177777171777777717771777171777171777777717771177171777171111111111111111111111111
|
||||
77777771717171717177717117777711711171117777711177777771177777111771771111777111177777111777771177777771111111111111111111111111
|
||||
77777771171717117771777171111171117111711117711117777711117771111177711111717111171717117111117177111771111111111111111111111111
|
||||
77777771717171711777771117777711711171111111711111777111111711111717171111717111171777111777771117777711111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11177111177777111117111111111111177777111117111177777771177777111111111171117111177777117777777171717171111111111111111111111111
|
||||
11177771771117711171711111111111771177711177711117111711777177711717111117171711771717711111111171717171111111111111111111111111
|
||||
11171111771717711717171111111111771117717777777111717111771117711171111111711171777177717777777171717171111111111111111111111111
|
||||
11171111771117717177717171717171771177711177711111171111771117711111111111111111771717711111111171717171111111111111111111111111
|
||||
11171111177777111717171111111111177777111771771111717111177777111111717171117111177777117777777171717171111111111111111111111111
|
||||
77771111711111711171711111111111711111711711171117111711711111711111171117171711711111711111111171717171111111111111111111111111
|
||||
77711111177777111117111111111111177777111111111177777771177777111111111111711171177777117777777171717171111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
1111dd111dd1dd11ddd1ddd1ddd1ddd1ddd111111dd11dd1ddd1ddd1ddd1dd111111ddd11dd111111dd1d111ddd1ddd1ddd11dd1ddd1ddd1dd111dd111111111
|
||||
1111d111d111d1d11d11d1d1d1d1d1111d111111d111d1d1d1d11d11d111d1d111111d11d1d11111d111d1111d11d1d1d1d1d1d1d1d1d1d1d1d111d111111111
|
||||
1111d111ddd1d1d11d11ddd1ddd1dd111d111111d111d1d1ddd11d11dd11d1d111111d11d1d11111d111d1111d11ddd1dd11d1d1ddd1dd11d1d111d111111111
|
||||
1111d11111d1d1d11d11d111d111d1111d111111d111d1d1d1111d11d111d1d111111d11d1d11111d111d1111d11d111d1d1d1d1d1d1d1d1d1d111d111111111
|
||||
1111dd11dd11d1d1ddd1d111d111ddd11d1111111dd1dd11d111ddd1ddd1ddd111111d11dd1111111dd1ddd1ddd1d111ddd1dd11d1d1d1d1ddd11dd111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
|
||||
|
46
monogram.p8
Normal file
46
monogram.p8
Normal file
@ -0,0 +1,46 @@
|
||||
pico-8 cartridge // http://www.pico-8.com
|
||||
version 41
|
||||
__lua__
|
||||
cls()
|
||||
|
||||
-- enable custom fonts
|
||||
poke(0x5f58,0x81)
|
||||
|
||||
-- print whatever you want!
|
||||
print("\feMONOGRAM")
|
||||
print("\n\f7SLICK MONOSPACE FONT")
|
||||
print("BY vINICIUS mENEZIO")
|
||||
print("\nNOW ON \fcpico-8\f7!")
|
||||
-->8
|
||||
-- monogram - A FREE FONT
|
||||
-- BY vINICIUS mENEZIO
|
||||
--
|
||||
-- datagoblin.itch.io/monogram
|
||||
--
|
||||
-- SPECIAL THANKS TO merwok FOR
|
||||
-- THE INITIAL PORT TO pico-8!
|
||||
|
||||
|
||||
-- copy the snippet below
|
||||
-- to your own cartridges:
|
||||
poke(0x5600,unpack(split"6,6,9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,31,31,31,31,31,31,31,0,0,0,31,31,31,0,0,0,0,0,31,27,31,0,0,0,0,0,27,4,27,0,0,0,0,0,27,0,27,0,0,0,0,0,27,27,27,0,0,0,0,8,12,14,12,8,0,0,0,2,6,14,6,2,0,0,15,1,1,1,1,0,0,0,0,0,16,16,16,16,30,0,17,10,4,31,4,31,4,0,0,0,0,14,0,0,0,0,0,0,0,0,0,6,12,0,0,0,0,0,0,12,12,0,0,0,10,10,0,0,0,0,0,4,10,4,0,0,0,0,0,0,0,0,0,0,0,0,4,4,4,4,4,0,4,0,10,10,0,0,0,0,0,0,0,10,31,10,10,31,10,0,8,62,11,62,104,62,8,0,0,51,24,12,6,51,0,0,6,9,9,30,9,9,22,0,8,4,0,0,0,0,0,0,8,4,4,4,4,4,8,0,2,4,4,4,4,4,2,0,0,4,21,14,21,4,0,0,0,4,4,31,4,4,0,0,0,0,0,0,0,4,4,2,0,0,0,31,0,0,0,0,0,0,0,0,0,4,4,0,16,16,8,4,2,1,1,0,14,17,25,21,19,17,14,0,4,6,4,4,4,4,31,0,14,17,16,8,4,2,31,0,14,17,16,12,16,17,14,0,18,18,17,31,16,16,16,0,31,1,1,15,16,16,15,0,14,1,1,15,17,17,14,0,31,16,16,8,4,4,4,0,14,17,17,14,17,17,14,0,14,17,17,30,16,16,14,0,0,4,4,0,0,4,4,0,0,4,4,0,0,4,4,2,0,24,6,1,6,24,0,0,0,0,31,0,31,0,0,0,0,3,12,16,12,3,0,0,14,17,16,8,4,0,4,0,14,25,21,21,25,1,14,0,0,0,30,17,17,17,30,0,1,1,15,17,17,17,15,0,0,0,14,17,1,17,14,0,16,16,30,17,17,17,30,0,0,0,14,17,31,1,14,0,12,18,2,15,2,2,2,0,0,0,30,17,17,30,16,14,1,1,15,17,17,17,17,0,4,0,6,4,4,4,31,0,16,0,24,16,16,16,17,14,1,1,17,9,7,9,17,0,3,2,2,2,2,2,28,0,0,0,15,21,21,21,21,0,0,0,15,17,17,17,17,0,0,0,14,17,17,17,14,0,0,0,15,17,17,15,1,1,0,0,30,17,17,30,16,16,0,0,13,19,1,1,1,0,0,0,30,1,14,16,15,0,2,2,15,2,2,2,28,0,0,0,17,17,17,17,30,0,0,0,17,17,17,10,4,0,0,0,17,17,21,21,10,0,0,0,17,10,4,10,17,0,0,0,17,17,17,30,16,14,0,0,31,8,4,2,31,0,12,4,4,4,4,4,12,0,1,1,2,4,8,16,16,0,12,8,8,8,8,8,12,0,4,10,17,0,0,0,0,0,0,0,0,0,0,0,31,0,2,4,0,0,0,0,0,0,14,17,17,17,31,17,17,0,15,17,17,15,17,17,15,0,14,17,1,1,1,17,14,0,15,17,17,17,17,17,15,0,31,1,1,15,1,1,31,0,31,1,1,15,1,1,1,0,14,17,1,29,17,17,14,0,17,17,17,31,17,17,17,0,31,4,4,4,4,4,31,0,16,16,16,16,17,17,14,0,17,9,5,3,5,9,17,0,1,1,1,1,1,1,31,0,17,27,21,17,17,17,17,0,17,17,19,21,25,17,17,0,14,17,17,17,17,17,14,0,15,17,17,15,1,1,1,0,14,17,17,17,21,9,22,0,15,17,17,15,17,17,17,0,14,17,1,14,16,17,14,0,31,4,4,4,4,4,4,0,17,17,17,17,17,17,14,0,17,17,17,17,17,10,4,0,17,17,17,17,21,27,17,0,17,17,10,4,10,17,17,0,17,17,10,4,4,4,4,0,31,16,8,4,2,1,31,0,8,4,4,2,4,4,8,0,4,4,4,0,4,4,4,0,4,8,8,16,8,8,4,0,0,0,18,13,0,0,0,0,0,0,0,0,0,0,0,0,31,31,31,31,31,31,31,0,21,10,21,10,21,10,21,0,0,17,31,21,21,14,0,0,14,31,17,27,14,17,14,0,17,4,17,4,17,4,17,0,2,6,30,14,15,12,8,0,0,14,19,19,31,23,14,0,0,27,31,31,14,4,0,0,4,17,14,27,27,14,17,4,0,14,14,0,31,14,10,0,0,4,14,31,21,29,0,0,14,27,25,27,14,17,14,0,0,14,31,21,31,17,14,0,4,12,20,20,4,7,3,0,14,17,21,17,14,17,14,0,0,4,14,27,14,4,0,0,0,0,0,21,0,0,0,0,14,27,19,27,14,17,14,0,0,0,4,31,14,27,0,0,31,17,10,4,10,17,31,0,14,27,17,31,14,17,14,0,0,5,2,0,20,8,0,0,8,21,2,0,8,21,2,0,14,21,27,21,14,17,14,0,31,0,31,0,31,0,31,0,21,21,21,21,21,21,21,0"))
|
||||
cstore(0x2000, 0x5600, 0x800)
|
||||
|
||||
__gfx__
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
00700700000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
00077000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
00077000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
00700700000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
__map__
|
||||
0606090000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
1f1f1f1f1f1f1f0000001f1f1f00000000001f1b1f00000000001b041b00000000001b001b00000000001b1b1b00000000080c0e0c0800000002060e060200000f010101010000000000101010101e00110a041f041f04000000000e000000000000000000060c0000000000000c0c0000000a0a0000000000040a0400000000
|
||||
000000000000000004040404040004000a0a000000000000000a1f0a0a1f0a00083e0b3e683e08000033180c063300000609091e090916000804000000000000080404040404080002040404040402000004150e150400000004041f0404000000000000000404020000001f0000000000000000000404001010080402010100
|
||||
0e11191513110e000406040404041f000e11100804021f000e11100c10110e001212111f101010001f01010f10100f000e01010f11110e001f101008040404000e11110e11110e000e11111e10100e0000040400000404000004040000040402001806010618000000001f001f00000000030c100c0300000e11100804000400
|
||||
0e19151519010e0000001e1111111e0001010f1111110f0000000e1101110e0010101e1111111e0000000e111f010e000c12020f0202020000001e11111e100e01010f11111111000400060404041f00100018101010110e01011109070911000302020202021c0000000f151515150000000f111111110000000e1111110e00
|
||||
00000f11110f010100001e11111e101000000d130101010000001e010e100f0002020f0202021c000000111111111e0000001111110a04000000111115150a000000110a040a110000001111111e100e00001f0804021f000c04040404040c0001010204081010000c08080808080c00040a1100000000000000000000001f00
|
||||
02040000000000000e1111111f1111000f11110f11110f000e11010101110e000f11111111110f001f01010f01011f001f01010f010101000e11011d11110e001111111f111111001f04040404041f001010101011110e0011090503050911000101010101011f00111b15111111110011111315191111000e11111111110e00
|
||||
0f11110f010101000e111111150916000f11110f111111000e11010e10110e001f040404040404001111111111110e0011111111110a040011111111151b110011110a040a11110011110a04040404001f10080402011f000804040204040800040404000404040004080810080804000000120d000000000000000000000000
|
||||
1f1f1f1f1f1f1f00150a150a150a150000111f15150e00000e1f111b0e110e00110411041104110002061e0e0f0c0800000e13131f170e00001b1f1f0e04000004110e1b1b0e1104000e0e001f0e0a0000040e1f151d00000e1b191b0e110e00000e1f151f110e00040c1414040703000e1115110e110e0000040e1b0e040000
|
||||
00000015000000000e1b131b0e110e000000041f0e1b00001f110a040a111f000e1b111f0e110e00000502001408000008150200081502000e151b150e110e001f001f001f001f001515151515151500000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
647
vacation.p8
647
vacation.p8
@ -130,6 +130,10 @@ end
|
||||
|
||||
function nop() end
|
||||
|
||||
blank = {}
|
||||
function blank:update() end
|
||||
function blank:draw() end
|
||||
|
||||
-- puke emits a verbose string
|
||||
-- describing item, indented to
|
||||
-- the specified depth (0 by
|
||||
@ -244,16 +248,43 @@ function _init()
|
||||
-- complex fill API mode
|
||||
poke(0x5f34, 1)
|
||||
|
||||
font_dogica()
|
||||
mainview = newtitle()
|
||||
awakener_hold_frames = 0
|
||||
mainview = ao_splash.new()
|
||||
end
|
||||
|
||||
function _update60()
|
||||
if awakener_armed then
|
||||
if btn() & 0x30 > 0 then
|
||||
awakener_hold_frames += 1
|
||||
else
|
||||
awakener_hold_frames = 0
|
||||
end
|
||||
if awakener_hold_frames == 90 then
|
||||
exit_dither = ditherer.new{di=1}
|
||||
awakener_armed = false
|
||||
end
|
||||
end
|
||||
if exit_dither and exit_dither:update() then
|
||||
exit_dither = nil
|
||||
awakener_hold_frames=0
|
||||
mainview = fast_awakener.new()
|
||||
end
|
||||
mainview:update()
|
||||
end
|
||||
|
||||
function _draw()
|
||||
mainview:draw()
|
||||
if awakener_hold_frames >= 30 then
|
||||
local gpx=(awakener_hold_frames-30) * 2 + 7
|
||||
rectfill(0,0,gpx,9,4)
|
||||
rectfill(gpx+1,0,128,9,5)
|
||||
font_default()
|
||||
print("keep holding for awakener", 1, 1, 7)
|
||||
font_special()
|
||||
end
|
||||
if exit_dither then
|
||||
exit_dither:draw()
|
||||
end
|
||||
end
|
||||
|
||||
function font_dogica()
|
||||
@ -270,23 +301,35 @@ function font_default()
|
||||
poke(0x5f58, 0x80)
|
||||
end
|
||||
|
||||
function font_special()
|
||||
poke(0x5f58, 0x81)
|
||||
end
|
||||
|
||||
-->8
|
||||
-- text rendering
|
||||
|
||||
-- text colors for zonk mode:
|
||||
-- 8 -- standard
|
||||
-- 9 -- delayed fade
|
||||
-- 10 -- currently fading in
|
||||
txtbox = {
|
||||
x=0,
|
||||
y=0,
|
||||
text="???",
|
||||
col=8,
|
||||
f=0,
|
||||
interval=4,
|
||||
mode=0x81,
|
||||
}
|
||||
mknew(txtbox)
|
||||
mknew(txtbox, function(self)
|
||||
if (not self.cols) self.cols = {14,10,9,8}
|
||||
self.c = deli(self.cols)
|
||||
end)
|
||||
|
||||
function txtbox:update() end
|
||||
function txtbox:update()
|
||||
if #self.cols > 0 then
|
||||
self.f += 1
|
||||
if self.f >= self.interval then
|
||||
self.f = 0
|
||||
self.col = deli(self.cols)
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
function txtbox:draw()
|
||||
poke(0x5f58, self.mode)
|
||||
@ -305,6 +348,12 @@ spring = {
|
||||
}
|
||||
mknew(spring)
|
||||
|
||||
function easeoutovershoot(t)
|
||||
t-=1
|
||||
return 1+2.7*t*t*t+1.7*t*t
|
||||
end
|
||||
|
||||
|
||||
function spring:update()
|
||||
local v = self.v
|
||||
self.v:update()
|
||||
@ -313,7 +362,7 @@ function spring:update()
|
||||
return true
|
||||
end
|
||||
local t, range = self.f/self.frames, self.to - self.from
|
||||
v.y = self.to-range*(2^(-10*t)*cos(2*t))
|
||||
v.y = self.from + easeoutovershoot(t)*range
|
||||
self.f += 1
|
||||
end
|
||||
|
||||
@ -337,7 +386,7 @@ function scoot:update()
|
||||
return true
|
||||
end
|
||||
self.f += 1
|
||||
if self.f < 0 then
|
||||
if self.f <= 0 then
|
||||
v.y=self.from
|
||||
return
|
||||
end
|
||||
@ -351,7 +400,10 @@ end
|
||||
|
||||
scootbox = {}
|
||||
mknew(scootbox, function(x)
|
||||
x.v = view.new()
|
||||
x.v = view.new{
|
||||
x=x.x,
|
||||
y=x.from or scoot.from,
|
||||
}
|
||||
x.s = scoot.new{
|
||||
from=x.from or scoot.from,
|
||||
to=x.to or scoot.to,
|
||||
@ -380,6 +432,52 @@ function scootbox:draw()
|
||||
return self.v:draw()
|
||||
end
|
||||
|
||||
nrm_txt_pal = split"14,10,9,8"
|
||||
sfd_txt_pal = split"15,10,9,8"
|
||||
hlt_txt_pal = split"13,11,9,8"
|
||||
shd_txt_pal = split"12,12,1,0"
|
||||
|
||||
function cparr(t)
|
||||
local ret = {}
|
||||
for i,x in ipairs(t) do
|
||||
ret[i]=x
|
||||
end
|
||||
return ret
|
||||
end
|
||||
|
||||
function zonk_txt(s, x, y, p, md, amt, frms)
|
||||
md = md or 0x80
|
||||
frms = frms or 0
|
||||
amt = amt or 0
|
||||
local itv = (frms>>2)&0x7ff
|
||||
local t1 = txtbox.new{
|
||||
x=x+1,
|
||||
y=y+1,
|
||||
interval=itv,
|
||||
cols=cparr(shd_txt_pal),
|
||||
mode=md,
|
||||
text=s,
|
||||
}
|
||||
local v = view.of{
|
||||
t1,
|
||||
txtbox.new{
|
||||
x=x,
|
||||
y=y,
|
||||
interval=itv,
|
||||
cols=cparr(p),
|
||||
mode=md,
|
||||
text=s,
|
||||
},
|
||||
}
|
||||
itv=spring.new{
|
||||
from=amt,
|
||||
frames=frms,
|
||||
v=v,
|
||||
}
|
||||
itv.eff_w=t1:xmax()
|
||||
return itv
|
||||
end
|
||||
|
||||
-->8
|
||||
-- zonk renderer
|
||||
|
||||
@ -396,7 +494,8 @@ mknew(ditherer, function(x)
|
||||
end)
|
||||
|
||||
function ditherer:update()
|
||||
self.i += self.di
|
||||
if (self.i > 0 and self.di < 0) self.i += self.di
|
||||
if (self.i < #self.pattern + 1 and self.di > 0) self.i += self.di
|
||||
return self.i < 0 or self.i >= #self.pattern + 1
|
||||
end
|
||||
|
||||
@ -417,8 +516,8 @@ mknew(fuzzy, function(x)
|
||||
local p = (x.p or fuzzy.p) & 0xffff
|
||||
x.mass = 0
|
||||
while p ~= 0 do
|
||||
x.mass += p & 0x8000
|
||||
p = p << 1
|
||||
x.mass += p & 1
|
||||
p = (p >>> 1) & 0xffff
|
||||
end
|
||||
end)
|
||||
|
||||
@ -427,7 +526,7 @@ function fuzzy:update()
|
||||
if (self.n < self.interval) return
|
||||
self.n = 0
|
||||
for i=1,self.tries do
|
||||
local b = 1 << rnd(15)
|
||||
local b = 1 << rnd(16)
|
||||
if b & self.p == 0 then
|
||||
if i == self.tries or not self.weight or self.mass <= self.weight then
|
||||
self.mass += 1
|
||||
@ -455,7 +554,7 @@ fuzzy_stripey = {
|
||||
weight = 12,
|
||||
spacing = 7,
|
||||
gap = 32,
|
||||
colors = {5, 2, 1},
|
||||
colors = split"3,5,2,1",
|
||||
}
|
||||
mknew(fuzzy_stripey, function(f)
|
||||
f.fuzz = fuzzy.new{
|
||||
@ -482,13 +581,443 @@ function fuzzy_stripey:draw()
|
||||
end
|
||||
end
|
||||
|
||||
|
||||
--@musurca & @felice
|
||||
function cminskycirc(r,c)
|
||||
local j,k,rat=r,0,1/r
|
||||
poke(0x5f25,c) --set color
|
||||
for i=1,r*0.785 do
|
||||
k-=rat*j
|
||||
j+=rat*k
|
||||
pset(63.5+j,63.5+k)
|
||||
pset(63.5+j,63.5-k)
|
||||
pset(63.5-j,63.5+k)
|
||||
pset(63.5-j,63.5-k)
|
||||
pset(63.5+k,63.5+j)
|
||||
pset(63.5+k,63.5-j)
|
||||
pset(63.5-k,63.5+j)
|
||||
pset(63.5-k,63.5-j)
|
||||
end
|
||||
pset(63.5,63.5-r)
|
||||
pset(63.5,63.5+r)
|
||||
pset(63.5-r,63.5)
|
||||
pset(63.5+r,63.5)
|
||||
end
|
||||
|
||||
obvious_breather=split"2,3,4,3,2"
|
||||
bg_breather=split"1,2,3,2,1"
|
||||
breather = {
|
||||
colors = obvious_breather,
|
||||
sep = 8,
|
||||
speed=240,
|
||||
f=0,
|
||||
}
|
||||
mknew(breather)
|
||||
|
||||
function breather:update()
|
||||
if (self.freeze) return
|
||||
local f = self.f + 1
|
||||
if (not self.on) f = 0
|
||||
if (f >= self.speed) f = -self.speed
|
||||
if f == 0 or f == -self.speed then
|
||||
if self.nextspeed then
|
||||
self.speed = self.nextspeed
|
||||
self.nextspeed = nil
|
||||
end
|
||||
if self.off_soon then
|
||||
self.on = false
|
||||
f=0
|
||||
end
|
||||
if self.nextcolors then
|
||||
self.colors=self.nextcolors
|
||||
end
|
||||
end
|
||||
self.f = f
|
||||
end
|
||||
|
||||
function easeinout(t)
|
||||
if(t<.5) then
|
||||
return t*t*t*4
|
||||
else
|
||||
t-=1
|
||||
return 1-t*t*t*-4
|
||||
end
|
||||
end
|
||||
|
||||
function breather:draw()
|
||||
fillp(0)
|
||||
local cols, f, spd, sep = self.colors, self.f, self.speed, self.sep
|
||||
local stall = sep * (#cols - 1)
|
||||
local cap = spd-stall
|
||||
if (f >= 0) f += stall
|
||||
for i,c in ipairs(cols) do
|
||||
local ef = f - (i-1)*sep
|
||||
ef = abs(ef) - stall
|
||||
if ef <= cap and ef > 0 then
|
||||
cminskycirc(easeinout(ef/cap)<<6,c)
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
function breather:matches(x)
|
||||
if (not x or not self.on) return true
|
||||
if (x==1) return self:starting_reverse()
|
||||
if (x==2) return self:starting_forward()
|
||||
if (x==3) return self:starting_reverse() or self:starting_forward()
|
||||
return true
|
||||
end
|
||||
|
||||
function breather:starting_reverse()
|
||||
return self.f + self.speed < self.sep * #self.colors
|
||||
end
|
||||
|
||||
function breather:starting_forward()
|
||||
return self.f > 0 and self.f < self.sep * #self.colors
|
||||
end
|
||||
|
||||
def_z_pal = {
|
||||
[0]=0,129,1,2,4,5,6,7,1,5,6,140,2,13,7,7
|
||||
}
|
||||
def_14_fade = split"0,0,0,0,0,128,129,133,141,13,6,15,7"
|
||||
def_15_fade = split"0,0,128,129,133,141,13,13,6,6,15,15,7"
|
||||
def_13_fade = split"0,0,0,0,0,128,129,133,141,140,140,13,12"
|
||||
def_shd_fade = split"0,0,0,128,130,141,2"
|
||||
|
||||
-- frames per character to wait
|
||||
-- during zonk text display.
|
||||
fchr=2
|
||||
|
||||
zonk_mode = {
|
||||
files={},
|
||||
lnh = 9,
|
||||
--space width
|
||||
spc_w = 2,
|
||||
--text mode
|
||||
txmd=0x81,
|
||||
--text spring-in distance
|
||||
txd=10,
|
||||
--text spring-in frames
|
||||
txf=20,
|
||||
--exit frames
|
||||
exf=60,
|
||||
--exit magnitude
|
||||
exmg=16,
|
||||
--character wait multiplier
|
||||
cmul=1,
|
||||
p=def_z_pal,
|
||||
fd13 = def_13_fade,
|
||||
fd14 = def_14_fade,
|
||||
fd15 = def_15_fade,
|
||||
fd12 = def_shd_fade,
|
||||
|
||||
twt=60,
|
||||
expect_cfg_line=true,
|
||||
txt_frame=blank,
|
||||
playing_text=true,
|
||||
cx=0,
|
||||
cy=0,
|
||||
}
|
||||
mknew(zonk_mode, function(self)
|
||||
self.stripes=fuzzy_stripey.new{}
|
||||
self.brth=breather.new{}
|
||||
end)
|
||||
|
||||
function zonk_mode:set(_, field,value)
|
||||
pukeboard{field=field, value=value}
|
||||
self[field]=value
|
||||
end
|
||||
function zonk_mode:g(_, fn, ...)
|
||||
return _ENV[fn](...)
|
||||
end
|
||||
function zonk_mode:at(_, x, y)
|
||||
self.txt_frame=scootbox.new{
|
||||
x=x,
|
||||
from=y,
|
||||
to=y-self.exmg,
|
||||
frames=self.exf,
|
||||
}
|
||||
end
|
||||
function zonk_mode:bon()
|
||||
self.brth.on=true
|
||||
self.brth.off_soon=false
|
||||
end
|
||||
function zonk_mode:boff()
|
||||
self.brth.off_soon=true
|
||||
end
|
||||
function zonk_mode:bspd(_, spd)
|
||||
self.brth.nextspeed=spd
|
||||
end
|
||||
function zonk_mode:bpal(_, p)
|
||||
self.brth.nextcolors= p == 1 and obvious_breather or bg_breather
|
||||
end
|
||||
function zonk_mode:activate()
|
||||
clear_alt_pal_bits()
|
||||
pal()
|
||||
font_dogica()
|
||||
if (type(self.file) == "string") self.file = split(self.file, "\n")
|
||||
if (not self.file) self:next_file()
|
||||
assert(self.file)
|
||||
end
|
||||
function zonk_mode:next_file()
|
||||
if #self.files > 0 then
|
||||
self.file=split(deli(self.files,1), "\n")
|
||||
self.expect_cfg_line=true
|
||||
end
|
||||
end
|
||||
|
||||
-- return char count, item
|
||||
-- or 0, nil: end of page
|
||||
-- or nil (, nil): end of file
|
||||
function zonk_mode:next_item()
|
||||
if not self.line then
|
||||
if (not self.file or #self.file == 0) return
|
||||
if self.expect_cfg_line then
|
||||
self.expect_cfg_line = false
|
||||
local cfg_line = deli(self.file, 1)
|
||||
for i,cmd in ipairs(split(cfg_line, " ")) do
|
||||
if #cmd > 0 then
|
||||
local frags = split(cmd,":")
|
||||
assert(type(self[frags[1]])=="function", tostr(i).." - "..cfg_line)
|
||||
self[frags[1]](self, unpack(frags))
|
||||
end
|
||||
end
|
||||
return self:next_item()
|
||||
end
|
||||
local line = deli(self.file, 1)
|
||||
if line == "-----" then
|
||||
self.line = nil
|
||||
self.expect_cfg_line = true
|
||||
self.cx = 0
|
||||
self.cy = 0
|
||||
return 0, nil
|
||||
end
|
||||
self.line = split(line, " ")
|
||||
end
|
||||
if #self.line==0 then
|
||||
self.line = nil
|
||||
self.cx = 0
|
||||
self.cy += self.lnh
|
||||
return self:next_item()
|
||||
end
|
||||
-- parse token
|
||||
local token = tostr(del(self.line, 1))
|
||||
while #token == 0 and #self.line > 0 do
|
||||
-- emit extra spaces
|
||||
self.cx += 1 + self.spc_w
|
||||
token = tostr(deli(self.line, 1))
|
||||
end
|
||||
local pp,cmult=nrm_txt_pal,1
|
||||
if (token[1]=="$") token,cmult=sub(token,2),2
|
||||
if (token[1]=="^") token,cmult=sub(token,2),0.5
|
||||
if (token[1]=="!") token,pp=sub(token,2),sfd_txt_pal
|
||||
if (token[1]=="#") token,pp=sub(token,2),hlt_txt_pal
|
||||
local ret = zonk_txt(token,self.cx,self.cy,pp,self.txmd,self.txf,self.txd*cmult)
|
||||
self.cx = ret.eff_w+self.spc_w
|
||||
return #token,ret
|
||||
end
|
||||
|
||||
function zonk_mode:empty()
|
||||
if (self.file and #self.file > 0) return false
|
||||
return #self.files == 0
|
||||
end
|
||||
|
||||
function fadetbl(col, tbl, frac)
|
||||
pal(col,tbl[1+(frac*#tbl)&0x7fff],1)
|
||||
end
|
||||
|
||||
function zonk_mode:update()
|
||||
if self.playing_text then
|
||||
self.twt -= 1
|
||||
if self.twt <= 0 then
|
||||
local cn,item = self:next_item()
|
||||
if not cn then
|
||||
self:next_file()
|
||||
self.playing_text=false
|
||||
elseif cn < 0 then
|
||||
self.twt = -cn
|
||||
else
|
||||
self.twt = cn*fchr*self.cmul
|
||||
end
|
||||
if item then
|
||||
self.txt_frame:push(item)
|
||||
else
|
||||
self.playing_text=false
|
||||
end
|
||||
end
|
||||
else
|
||||
--waiting to advance or exit
|
||||
if self.wtmr then
|
||||
self.twt += self.wait_more
|
||||
self.wtmr = nil
|
||||
end
|
||||
if self.twt <= 0 then
|
||||
if (btnp(1)) self.confirmed=true
|
||||
if not self.nextpage and self.confirmed and self.brth:matches(self.bwt) then
|
||||
self.nextpage = true
|
||||
self.txt_frame.go = true
|
||||
self.fpfrm = self.exf
|
||||
end
|
||||
else
|
||||
self.twt -= 1
|
||||
end
|
||||
end
|
||||
if self.nextpage and not self.d then
|
||||
if self.fpfrm > 0 then
|
||||
self.fpfrm -= 1
|
||||
elseif self:empty() then
|
||||
self.txt_frame=blank
|
||||
self.d = ditherer.new{di=0.5}
|
||||
else
|
||||
self.nextpage = false
|
||||
self.confirmed=false
|
||||
self.txt_frame=blank
|
||||
self.playing_text=true
|
||||
self.fpfrm=nil
|
||||
end
|
||||
end
|
||||
self.stripes:update()
|
||||
self.brth:update()
|
||||
self.txt_frame:update()
|
||||
if (self.d and self.d:update()) seq:next()
|
||||
end
|
||||
|
||||
function zonk_mode:draw()
|
||||
cls(0)
|
||||
pal(self.p, 1)
|
||||
self.stripes:draw()
|
||||
self.brth:draw()
|
||||
if self.fpfrm then
|
||||
local ffrac = self.fpfrm/self.exf
|
||||
fadetbl(12, self.fd12, ffrac)
|
||||
fadetbl(13, self.fd13, ffrac)
|
||||
fadetbl(14, self.fd14, ffrac)
|
||||
fadetbl(15, self.fd15, ffrac)
|
||||
end
|
||||
self.txt_frame:draw()
|
||||
-- TODO: draw throbber
|
||||
if not self.playing_text and not self.confirmed and self.twt <= 0 then
|
||||
print("➡️",121,121,12)
|
||||
print("➡️",120,120,self:throbber_color())
|
||||
end
|
||||
if(self.d) self.d:draw()
|
||||
end
|
||||
|
||||
function zonk_mode:throbber_color()
|
||||
if (not self.bwt) return ((t()<<1)&0x1 < 1) and 7 or 6
|
||||
return self.brth:matches(self.bwt) and 7 or 6
|
||||
end
|
||||
|
||||
-->8
|
||||
-- awakener
|
||||
|
||||
fast_awakener = {}
|
||||
mknew(fast_awakener)
|
||||
|
||||
function fast_awakener:update()
|
||||
--todo: implement
|
||||
end
|
||||
|
||||
function fast_awakener:draw()
|
||||
cls()
|
||||
pal()
|
||||
clear_alt_pal_bits()
|
||||
font_default()
|
||||
print("placeholder", 45, 61, 8)
|
||||
end
|
||||
|
||||
-->8
|
||||
-- consent screens
|
||||
|
||||
ao_splash = {
|
||||
fwait = 180,
|
||||
}
|
||||
mknew(ao_splash, function(self)
|
||||
self.c = breather.new{
|
||||
colors={7,15,14,8,2},
|
||||
sep=3,
|
||||
f=15,
|
||||
on=true,
|
||||
}
|
||||
font_dogica()
|
||||
end)
|
||||
|
||||
function ao_splash:update()
|
||||
if self.c.f < self.c.speed/2.5 then
|
||||
self.c:update()
|
||||
return
|
||||
end
|
||||
self.fwait -= 1
|
||||
if (self.fwait < ao_splash.fwait-30 and (btnp() & 0xf > 0) and self.fwait > 0) self.fwait = 0
|
||||
if self.fwait == 0 then
|
||||
self.d = ditherer.new{di=1}
|
||||
end
|
||||
if (self.d) self.d:update()
|
||||
if self.fwait <= -32 then
|
||||
-- TODO: consent screen
|
||||
mainview=consent_splash.new()
|
||||
mainview:update()
|
||||
end
|
||||
end
|
||||
|
||||
function ao_splash:draw()
|
||||
cls()
|
||||
self.c:draw()
|
||||
if self.fwait < ao_splash.fwait then
|
||||
print("18+", 55, 60, 7)
|
||||
print("aDULTS ONLY", 35, 90, 15)
|
||||
end
|
||||
if (self.d) self.d:draw()
|
||||
end
|
||||
|
||||
consent_splash = {
|
||||
f = 0,
|
||||
}
|
||||
mknew(consent_splash, function(self)
|
||||
self.d = ditherer.new{
|
||||
di=-1
|
||||
}
|
||||
awakener_armed = true
|
||||
awakener_hold_frames = 0
|
||||
end)
|
||||
|
||||
function consent_splash:update()
|
||||
if (self.f < 0x7fff) self.f += 1
|
||||
if (btnp(1) and self.f > 150) self.d.di = 1
|
||||
if self.d:update() and self.d.di > 0 then
|
||||
mainview=newtitle()
|
||||
mainview:update()
|
||||
end
|
||||
end
|
||||
|
||||
function consent_splash:draw()
|
||||
cls()
|
||||
font_special()
|
||||
print("\^w\^twarning", 20, 2, 10)
|
||||
font_default()
|
||||
cursor(1, 25)
|
||||
color(6)
|
||||
print("this game will \fchypnotize\f6 you.")
|
||||
if (self.f < 45) return
|
||||
print("")
|
||||
print("hypnotic suggstions include:")
|
||||
print("relaxation, trance, obedience,")
|
||||
print("loss of volition, euphoria, joy,")
|
||||
print("amnesia, identity loss, and the")
|
||||
print("experience of \fetranformation")
|
||||
print("into a pooltoy orca.\f6")
|
||||
if (self.f < 90) return
|
||||
print("")
|
||||
print("an awakener that removes all")
|
||||
print("suggestions is available at")
|
||||
print("\faany time:\f6 hold ❎ or 🅾️.")
|
||||
print("gameplay uses only arrows.")
|
||||
if(self.f < 300) return
|
||||
print("")
|
||||
print("")
|
||||
print(" consent and begin: \f7➡️")
|
||||
self.d:draw()
|
||||
end
|
||||
|
||||
-->8
|
||||
-- title screen
|
||||
|
||||
@ -521,8 +1050,8 @@ function title_screen:draw()
|
||||
end
|
||||
|
||||
function title_screen:update()
|
||||
self.d:update()
|
||||
if (btnp(1)) start_game()
|
||||
if (btnp(1)) self.d.di = 1
|
||||
if(self.d:update() and self.d.di > 0) start_game()
|
||||
end
|
||||
-->8
|
||||
-- dolphin sprite renderer
|
||||
@ -720,7 +1249,8 @@ function toyphin:draw()
|
||||
spr(st.s[1+(((t()<<1)&0x0.FFFF*#st.s)&0x7FFF)], self.x + st.xo, y + st.yo, self.state.ws, self.state.hs)
|
||||
end
|
||||
|
||||
-->8 word target
|
||||
-->8
|
||||
-- arcade mode
|
||||
|
||||
wordtarget = {
|
||||
x = 129,
|
||||
@ -757,9 +1287,6 @@ function wordtarget:draw()
|
||||
print(self.str, self.x, self.y, 0x100a)
|
||||
end
|
||||
|
||||
-->8
|
||||
-- arcade mode
|
||||
|
||||
-- palette use:
|
||||
-- 0: shallow sea blue (1)
|
||||
-- 1: black (for sprites)
|
||||
@ -1012,23 +1539,53 @@ function sequencer:next()
|
||||
else
|
||||
mainview = rec.f()
|
||||
end
|
||||
if(mainview.activate) mainview:activate()
|
||||
mainview:update()
|
||||
end
|
||||
|
||||
function start_game()
|
||||
seq = sequencer.new{
|
||||
{
|
||||
f=zonk_mode.new,
|
||||
params={{
|
||||
file=[[at:2:55
|
||||
hI! iN A LATER VERSION
|
||||
THERE WILL BE ACTUAL
|
||||
INSTRUCTIONS HERE AND
|
||||
THE BG WON'T BE ON.]],
|
||||
txd=0,
|
||||
txf=1,
|
||||
cmul=0.25,
|
||||
}},
|
||||
},
|
||||
{
|
||||
f = arcade_level.new,
|
||||
params = {{
|
||||
max_score=2,
|
||||
max_score=5,
|
||||
}}
|
||||
},
|
||||
{
|
||||
f = function()
|
||||
pal()
|
||||
clear_alt_pal_bits()
|
||||
return view.of{bg.new{c=6}, fuzzy_stripey.new{interval=7, colors={12, 7, 14}, weight=8}}
|
||||
end,
|
||||
f = zonk_mode.new,
|
||||
params={{
|
||||
file=[[at:40:40
|
||||
ZONK TEXT TEST
|
||||
#ZONK TEXT #TEST
|
||||
$ZONK $TEXT $TEST
|
||||
!ZONK !TEXT !TEST
|
||||
^ZONK ^TEXT ^TEST
|
||||
-----
|
||||
at:30:60 bon bpal:1 set:confirmed:true set:bwt:1 set:txf:2 set:txd:0 set:exd:0 set:exf:10
|
||||
bREATHE IN...
|
||||
-----
|
||||
at:28:60 set:confirmed:true set:bwt:2 bpal:2
|
||||
bREATHE OUT...
|
||||
-----
|
||||
set:bwt:0 set:txd:16 set:txf:20 set:exf:60 at:1:55
|
||||
gREAT! iT'S LIKE YOU'VE
|
||||
BEEN DOING THIS YOUR
|
||||
ENTIRE LIFE.
|
||||
]],
|
||||
}},
|
||||
},
|
||||
}
|
||||
seq:next()
|
||||
@ -1254,22 +1811,22 @@ h000h000h000h000h000h000h000h000h000h000h000h000h000h000h000h000h000h000h000h000
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
|
||||
__map__
|
||||
0608090000010000000000000000000045102051550075740000000000541606020000006006260000070710705750100500010070072700000000200070740100006066600060600060000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
00000000000000000101010101000100000a0a050000000000123f12123f1200000e15050e14150e2215150a285454220609090629112e000002020100000000020101010101020001020202020201000004150a150400000004041f040400000000000000020201000000000f00000000000000000001000808040402020101
|
||||
0e11151515110e000407040404041f000e11100804021f000f10100e10100f00080c0a091f0808001f010f1010110e000e11010f11110e001f111008040202000e11110e11110e000e11111e1008060000000100000100000000000200020201000402010204000000003f003f00000000010204020100000e11100c02000400
|
||||
1e212d291d413e00000e101e11111e0001010f1111110f00000e110101011e0010101e1111111e00000e111f01011e001c02020f02020200001e1111111e100e01010d131111110002000302020207000007020202020201001109050709110000010101010106000036494949494900000c131111111100000e111111110e00
|
||||
000f1111110f0101001e1111111e1010000d030101010100000e010e10110e0001010f0101010e000011111111191600001111110a0a04000020252525251a0000110a04040a11000000090909060403000f080402010f00030101010101030001010202040408080302020202020300040a110000000000000000000000003f
|
||||
00010202000000000e1111111f1111000f11110f11110f000e11010101110e001f22222222221e001f01010f01011f001f01010f010101001e01011911111e001111111f1111110007020202020207000f0404040404030011090507090911000101010101010f002121332d2121210011131519111111000e11111111110e00
|
||||
0f11110f010101000e111111150916000f11110f091111000e11010e10110e001f040404040404001111111111110e00111111110a0a0400414149494955220011110a040a1111001111110a040404001f10080402011f00040a020101020a040101010101010101020504080804050200000026190000000000000000000000
|
||||
00007f7f7f7f7f000000552a552a55000000417f5d5d3e0000003e6363773e0000001144114411000000021e0e0f080000000e171f1f0e0000001b1f1f0e040000001c3677361c0000000e0e1f0e0a0000001c3e7f2a3a0000003e6763673e0000007f5d7f417f0000001c040407070000003e636b633e000000040e1f0e0400
|
||||
000000005500000000003e7363733e000000081c7f3e220000001f0e040e1f0000003e7763633e000000000552200000000000112a44000000003e6b776b3e0000007f007f007f000000555555555500000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
0606090000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
1f1f1f1f1f1f1f0000001f1f1f00000000001f1b1f00000000001b041b00000000001b001b00000000001b1b1b00000000080c0e0c0800000002060e060200000f010101010000000000101010101e00110a041f041f04000000000e000000000000000000060c0000000000000c0c0000000a0a0000000000040a0400000000
|
||||
000000000000000004040404040004000a0a000000000000000a1f0a0a1f0a00083e0b3e683e08000033180c063300000609091e090916000804000000000000080404040404080002040404040402000004150e150400000004041f0404000000000000000404020000001f0000000000000000000404001010080402010100
|
||||
0e11191513110e000406040404041f000e11100804021f000e11100c10110e001212111f101010001f01010f10100f000e01010f11110e001f101008040404000e11110e11110e000e11111e10100e0000040400000404000004040000040402001806010618000000001f001f00000000030c100c0300000e11100804000400
|
||||
0e19151519010e0000001e1111111e0001010f1111110f0000000e1101110e0010101e1111111e0000000e111f010e000c12020f0202020000001e11111e100e01010f11111111000400060404041f00100018101010110e01011109070911000302020202021c0000000f151515150000000f111111110000000e1111110e00
|
||||
00000f11110f010100001e11111e101000000d130101010000001e010e100f0002020f0202021c000000111111111e0000001111110a04000000111115150a000000110a040a110000001111111e100e00001f0804021f000c04040404040c0001010204081010000c08080808080c00040a1100000000000000000000001f00
|
||||
02040000000000000e1111111f1111000f11110f11110f000e11010101110e000f11111111110f001f01010f01011f001f01010f010101000e11011d11110e001111111f111111001f04040404041f001010101011110e0011090503050911000101010101011f00111b15111111110011111315191111000e11111111110e00
|
||||
0f11110f010101000e111111150916000f11110f111111000e11010e10110e001f040404040404001111111111110e0011111111110a040011111111151b110011110a040a11110011110a04040404001f10080402011f000804040204040800040404000404040004080810080804000000120d000000000000000000000000
|
||||
1f1f1f1f1f1f1f00150a150a150a150000111f15150e00000e1f111b0e110e00110411041104110002061e0e0f0c0800000e13131f170e00001b1f1f0e04000004110e1b1b0e1104000e0e001f0e0a0000040e1f151d00000e1b191b0e110e00000e1f151f110e00040c1414040703000e1115110e110e0000040e1b0e040000
|
||||
00000015000000000e1b131b0e110e000000041f0e1b00001f110a040a111f000e1b111f0e110e00000502001408000008150200081502000e151b150e110e001f001f001f001f001515151515151500000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
|
||||
1e083c1106000000100c020c10000000227a2222120000001e2000023c000000083c10020c000000020202221c000000083e080c08000000123f12021c0000003c107e043800000002073202320000000f020e101c0000003e404020180000003e10080810000000083804023c00000032071278180000007a42020a72000000
|
||||
093e4b6d660000001a272273320000003c4a494946000000123a123a1a000000236222221c0000000c00082a4d000000000c1221400000007d79113d5d0000003e3c081e2e00000006247e2610000000244e04463c0000000a3c5a46300000001e041e4438000000143e2408080000003a56523008000000041c041e06000000
|
||||
08023e201c00000022222620180000003e1824723000000004362c26640000003e182442300000001a272223120000000e641c28780000000402062b1900000000000e1008000000000a1f120400000000040f150d00000000040c060e0000003e2014040200000030080e0808000000083e2220180000003e0808083e000000
|
||||
107e181412000000043e242232000000083e083e080000003c24221008000000047c1210080000003e2020203e000000247e242010000000062026100c0000003e20101826000000043e240438000000222420100c0000003e222d300c0000001c083e08040000002a2a20100c0000001c003e080400000004041c2404000000
|
||||
083e080804000000001c00003e0000003e2028102c000000083e305e08000000202020100e0000001024244442000000021e02021c0000003e2020100c0000000c12214000000000083e082a2a0000003e201408100000003c003e001e000000080424427e00000040281068060000001e041e043c000000043e240404000000
|
||||
1c1010103e0000001e101e101e0000003e003e201800000024242420100000001414145432000000020222120e0000003e2222223e0000003e2220100c0000003e203c2018000000062020100e000000001510080600000000041e140400000000000c081e000000001c18101c00000008046310080000000810630408000000
|
||||
04050700000100000000000000607700672000617700060600000000006677070100000060072700000010200070700000000110600020111000102100000671333313111333121333103333117766007600f1758f17677f7788767086182273ff8fff01ffffedff81ff8f7f8188f800ff8fff01ffffeeff88888808818888f0
|
||||
0007070707070000000007070700000000000705070000000000050205000000000005000500000000000505050000000004060706040000000103070301000000070101010000000000040404070000000507020702000000000001000000000000000001020000000000000303000000050500000000000002050200000000
|
||||
000000000000000000010101000100000005050000000000000a1f0a1f0a0000000207030607020000050402010500000002050e050e0000000101000000000000020101010200000001020202010000000502070205000000000207020000000000000000010100000000070000000000000000000100000004040201010000
|
||||
|
BIN
zep5x6.png
Normal file
BIN
zep5x6.png
Normal file
Binary file not shown.
After Width: | Height: | Size: 2.4 KiB |
Reference in New Issue
Block a user