mirror of https://github.com/minexew/Shrine.git
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
27 lines
592 B
27 lines
592 B
/*See $LK,"TextBase Layer",A="HI:TextBase Layer"$ for the format |
|
of the U32 you pass to TextChar() |
|
|
|
See $LK,"::/Doc/CharOverview.DD"$, $LK,"::/Demo/ExtChars.HC"$, |
|
and $LK,"::/Demo/Graphics/FontEd.HC"$. |
|
|
|
Hold <ALT> and press a 3 digit decimal number |
|
or press <CTRL-ALT-a> to enter extended characters. |
|
*/ |
|
|
|
U0 DrawIt(CTask *task,CDC *) |
|
{ |
|
I64 i; |
|
for (i=0;i<256;i++) |
|
TextChar(task,,(i&15)*2,(i/16)*2,i+BLACK<<12+WHITE<<8); |
|
} |
|
|
|
U0 ScrnCodes() |
|
{ |
|
SettingsPush; //See $LK,"SettingsPush",A="MN:SettingsPush"$ |
|
DocClear; |
|
Fs->draw_it=&DrawIt; |
|
GetChar(,FALSE); |
|
SettingsPop; |
|
} |
|
|
|
ScrnCodes;
|
|
|