∙&
ш:Г*****&Є:Г*&*№:Г* CHRSTST3.BAS&A:Г* MDJ 2023/04/06&I:Г*&a:Г* TEST PRINTS THE&z$:Г* PMODE 4 FAKETEXT&Р.:Г* CHARACTER SET&ж8:Г* USING ML LOOP&└9:Г* WITH C3216SET.BIN&▀::Г* INSTEAD OF CH3216X.BIN&чB:Г*&єL:Г*****&·V:Г'#╨:Г X = X-COORDINATE (0-31) TO &H7000'L┌:Г Y = Y-COORDINATE (0-15) TO &H7001'xф:Г C = CHARACTER CODE (0-255) TO &H7002'ю:Г'Ы╕:Г LOAD THE ML ROUTINES'н┬Х 200, &H4000'├╠╙M "C3216SET.BIN"'┘╓╙M "CHR3216T.BIN"'эъ╙M "CHDISP.BIN"'ЇЇ:Г(:Г SET UP THE PMODE 4 SCREEN(&└ 4('0╚ 4,1(/:╝ 1(9D┐ 1,0(@N:Г(]а:Г SETUP FOR ROLLOVER ON(tк:Г FIRST ITERATION(┤X │ м1(Й╛Y │ 0(Р╚:Г(┤:Г GO DISPLAY THE CHARACTER SET(┴в &H536F(╚Р:Г(▀╠:Г HOLD THE SCREEN(ы╓Бе 4310(Єр:Г(° К SET                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                p4ЎpO
╢pЎp
╜S59                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                    
┘&
ш:Г*****&Є:Г*&*№:Г* C3216FM2.BAS&A:Г* MDJ 2023/04/06&I:Г*&f:Г* THE FAKETEXT 32 X 16&А$:Г* CHARACTER SET FOR&Р.:Г* PMODE 4&Ш8:Г*&▒B:Г* EACH OF THE 255 &╬L:Г* CHARACTERS IS 8 BITS&ыV:Г* (I.E. ONE BYTE) WIDE'	`:Г* AND TWELVE BYTES HIGH'j:Г*'/t:Г* THIS IS THE FILEMAKER'?~:Г* PROGRAM'GИ:Г*'SТ:Г*****'ZЬ:Г'lХ 200, &H4000'В╙M "CHR3216X.BIN"'Цn╙M "PTFCHR.BIN"'Эx:Г'╦▄╪M "C3216SET.BIN", &H4700, &H536E, &H4700'╥ц:Г'╪ К. ONE BYTE) WIDE'	`:Г* AND TWELVE                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 G  ╟я╟л╫╫╫     ├ч├├ч██     ├╙ує├єы     ├╦╟╧├╧╫     Глляя╫╗     ╟╟╟яГя╫      ГлУГ╟╗     ╧╧▀├▀╧╫     єє√├√єы     ╗╫╗╫╟ГлГ    ГлГ╟╫╗╫╗    г├л├л├г     ЛЗлЗлЗЛ    я╫Г╟ля╫╗     ▀зєГєз▀     √х╧┴╧х√                                                                                                                                                                                        Б├чяўя▀яўя               яяяяя я     ╫╫╫         ╫╫Г╫Г╫╫     я├п╟ыЗя     ЯЫўя▀│є     ▀пп▀л╖╦     яя▀         ўя▀▀▀яў     ▀яўўўя▀      ял╟╟ля      яяГяя           ▀▀┐       Г              я      √ўя▀┐      ╟╗│лЫ╗╟     я╧яяяя╟     ╟╗√╟┐┐Г     ╟╗√ў√╗╟     ўч╫╖Гўў     Г┐З√√╗╟     ╟┐┐З╗╗╟     Г√ўя▀┐┐     ╟╗╗╟╗╗╟     ╟╗╗├√√╟       я  я        я  яя▀    ўя▀┐▀яў       Г Г       ▀яў√ўя▀     ╟╗√ўя я     ╟╗√╦││╟     я╫╗╗Г╗╗     З██╟██З     ╟╗┐┐┐╗╟     З█████З     Г┐┐П┐┐Г     Г┐┐П┐┐┐     ╟╗┐┐│╗╟     ╗╗╗Г╗╗╗     ╟яяяяя╟     √√√√√╗╟     ╗╖пЯп╖╗     ┐┐┐┐┐┐Г     ╗Улл╗╗╗     ╗╗Ыл│╗╗     ╟╗╗╗╗╗╟     З╗╗З┐┐┐     ╟╗╗╗л╖╦     З╗╗Зп╖╗     ╟╗┐╟√╗╟     Гяяяяяя     ╗╗╗╗╗╗╟     ╗╗╗╫╫яя     ╗╗╗╗лУ╗     ╗╗╫я╫╗╗     ╗╗╫яяяя     Г√ўя▀┐Г     ╟▀▀▀▀▀╟      ┐▀яў√      ╟ўўўўў╟     я╟ляяяя      я▀Г▀я      яяяял╟я      яўГўя         ряяяяяя     яяяяяяяяяяяр      яяяяя                                                    яяяяя           яяяяяя    }|}         
|
     яяяяяяяяяяяяяяяяяяяяяяяя                        яяяяяряяяяяяяяяяяяяяяяяяяяяяяяяяяяя╟       ╟яяя╟╫╫╫╫╫╫╫╟яя Б╜╜Эн╡╣╜╜Б              ББББб▒╣╜╜Б              ч█╜╣╡нЭ╜█ч              ч█╜╣▒бББ├ч               ╗╗╗╗лУ╗       █чч█         чч         ├├├├       ББББББ    л ╒ л ╒ л    З╗╗З┐┐┐    ╟ўчўўўўуыу  ╟ўчў╟ўўуыу  ╟ў╟ўўўўуыу  ╟ў╟ўчўўуыу  ╜╜█ ├├чччч  ╜╜█ ├├чччч  ╜╜█ ├├чччч  ╜╜█ ├├чччч   ў╜█  █╜я   ╜ччеччечч╜  ╜ччеччечч╜  ╜ччеччечч╜  ╜ччеччечч╜  ╜ччеччечч╜  ╜ччеччечч╜  Э╜╜н╡н╜╜╣    Б╜╜╜╜██ч     ўўўўуўў   ўўўўўўўуўў  чччччччБчч  ч█╜Бчччччч  ўўууўўўўўы  ўўууўўўўўы  ўўууўўўўўы  ўўууўўўўўы  ўўууўўўўўы  ўўууўўўўўы  ўўууўўўўўы  ўўууўўўўўы  ўўууўўўўўы  ўўууўўўўўы  ўўууўўўўўы  ўўууўўўўўы  ┴Б╣ййййй╣Г  ┴Б╣ййййй╣Г  ┴Б╣ййййй╣Г  ┴Б╣ййййй╣Г  ┴Б╣ййййй╣Г  ┴Б╣ййййй╣Г  ┴Б╣ййййй╣Г  ┴Б╣ййййй╣Г  ┴Б╣ййййй╣Г  ┴Б╣ййййй╣Г  ┴Б╣ййййй╣Г  ┴Б╣ййййй╣Г  ┴Б╣ййййй╣Г  ┴Б╣ййййй╣Г  ┴Б╣ййййй╣Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г      А       ▀яў√
√ўя▀  ЩБ├чч├БЩ├Б<<<<<<Б├ G Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г      А       ▀яў√
√ўя▀  ЩБ├чч├БЩ├Б<<<<                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                            ├ ┴┬!─┴┴%─                              CHR3216XBIN 
PTFCHR  BIN"{CHDISP  BIN#YCHR3216TBINC3216FM2BAS▄C3216SETBIN$yCHRSTST3BAS№RTCHR  BIN&{
{                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                S~ShS╖SўSўSЎSXЖ└=єS╙║
╢S╞=├GжазДжазИ жазИ@жазИ`жазЙАжазЙажазЙ└жазЙржазЙ
жазЙ
 жазЙ
@жазЙ
`9                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                    So~SuGSu4Ж ╖Sr╖StO╖Ss|St|Sr╢SrБ %O╖Sr|Ss╢SsБ%~S╣╢Sr╖p╢Ss╖p
╢St╖p╜p~SГ59                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                        oG  ╟я╟л╫╫╫     ├ч├├ч██     ├╙ує├єы     ├╦╟╧├╧╫     Глляя╫╗     ╟╟╟яГя╫      ГлУГ╟╗     ╧╧▀├▀╧╫     єє√├√єы     ╗╫╗╫╟ГлГ    ГлГ╟╫╗╫╗    г├л├л├г     ЛЗлЗлЗЛ    я╫Г╟ля╫╗     ▀зєГєз▀     √х╧┴╧х√                                                                                                                                                                                        Б├чяўя▀яўя               яяяяя я     ╫╫╫         ╫╫Г╫Г╫╫     я├п╟ыЗя     ЯЫўя▀│є     ▀пп▀л╖╦     яя▀         ўя▀▀▀яў     ▀яўўўя▀      ял╟╟ля      яяГяя           ▀▀┐       Г              я      √ўя▀┐      ╟╗│лЫ╗╟     я╧яяяя╟     ╟╗√╟┐┐Г     ╟╗√ў√╗╟     ўч╫╖Гўў     Г┐З√√╗╟     ╟┐┐З╗╗╟     Г√ўя▀┐┐     ╟╗╗╟╗╗╟     ╟╗╗├√√╟       я  я        я  яя▀    ўя▀┐▀яў       Г Г       ▀яў√ўя▀     ╟╗√ўя я     ╟╗√╦││╟     я╫╗╗Г╗╗     З██╟██З     ╟╗┐┐┐╗╟     З█████З     Г┐┐П┐┐Г     Г┐┐П┐┐┐     ╟╗┐┐│╗╟     ╗╗╗Г╗╗╗     ╟яяяяя╟     √√√√√╗╟     ╗╖пЯп╖╗     ┐┐┐┐┐┐Г     ╗Улл╗╗╗     ╗╗Ыл│╗╗     ╟╗╗╗╗╗╟     З╗╗З┐┐┐     ╟╗╗╗л╖╦     З╗╗Зп╖╗     ╟╗┐╟√╗╟     Гяяяяяя     ╗╗╗╗╗╗╟     ╗╗╗╫╫яя     ╗╗╗╗лУ╗     ╗╗╫я╫╗╗     ╗╗╫яяяя     Г√ўя▀┐Г     ╟▀▀▀▀▀╟      ┐▀яў√      ╟ўўўўў╟     я╟ляяяя      я▀Г▀я      яяяял╟я      яўГўя         ряяяяяя     яяяяяяяяяяяр      яяяяя                                                    яяяяя           яяяяяя    }|}         
|
     яяяяяяяяяяяяяяяяяяяяяяяя                        яяяяяряяяяяяяяяяяяяяяяяяяяяяяяяяяяя╟       ╟яяя╟╫╫╫╫╫╫╫╟яя Б╜╜Эн╡╣╜╜Б              ББББб▒╣╜╜Б              ч█╜╣╡нЭ╜█ч              ч█╜╣▒бББ├ч               ╗╗╗╗лУ╗       █чч█         чч         ├├├├       ББББББ    л ╒ л ╒ л    З╗╗З┐┐┐    ╟ўчўўўўуыу  ╟ўчў╟ўўуыу  ╟ў╟ўўўўуыу  ╟ў╟ўчўўуыу  ╜╜█ ├├чччч  ╜╜█ ├├чччч  ╜╜█ ├├чччч  ╜╜█ ├├чччч   ў╜█  █╜я   ╜ччеччечч╜  ╜ччеччечч╜  ╜ччеччечч╜  ╜ччеччечч╜  ╜ччеччечч╜  ╜ччеччечч╜  Э╜╜н╡н╜╜╣    Б╜╜╜╜██ч     ўўўўуўў   ўўўўўўўуўў  чччччччБчч  ч█╜Бчччччч  ўўууўўўўўы  ўўууўўўўўы  ўўууўўўўўы  ўўууўўўўўы  ўўууўўўўўы  ўўууўўўўўы  ўўууўўўўўы  ўўууўўўўўы  ўўууўўўўўы  ўўууўўўўўы  ўўууўўўўўы  ўўууўўўўўы  ┴Б╣ййййй╣Г  ┴Б╣ййййй╣Г  ┴Б╣ййййй╣Г  ┴Б╣ййййй╣Г  ┴Б╣ййййй╣Г  ┴Б╣ййййй╣Г  ┴Б╣ййййй╣Г  ┴Б╣ййййй╣Г  ┴Б╣ййййй╣Г  ┴Б╣ййййй╣Г  ┴Б╣ййййй╣Г  ┴Б╣ййййй╣Г  ┴Б╣ййййй╣Г  ┴Б╣ййййй╣Г  ┴Б╣ййййй╣Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г      А       ▀яў√
√ўя▀  ЩБ├чч├БЩ├Б<<<<<<Б├~S  ╖SўSўSЎSXЖ└=єS╙║
╢S╞=├GжазДжазИ жазИ@жазИ`жазЙАжазЙажазЙ└жазЙржазЙ
жазЙ
 жазЙ
@жазЙ
`9 G╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г   Г╗╗ллл╗╗Г      А       ▀яў√
√ўя▀  ЩБ├чч├БЩ├Б<<<<                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                S~ShS╖SўSўSЎSXЖ└=єS╙║
╢S╞=├GжазДжазИ жазИ@жазИ`жазЙАжазЙажазЙ└жазЙржазЙ
жазЙ
 жазЙ
@жазЙ
`9