Source wurde am 15.07.2007 aus der MMJ-Quellcodesammlung (Dietmar Horn) in die Babyklappe auf XProfan.Com abgelegt: ANSI-Zeichensatztabelle ausgeben Declare i%, j% WindowTitle ANSI-Zeichensatztabelle WindowStyle 24 Window 0, 0 - 425, 270 Cls Font 0 ANSI Font 1 OEM (ASCII) Clear i% WhileLoop 1, 16, 1 Clear j% WhileLoop 1, 16, 1 Locate i% + 1, (j% + 1) * 3 Print @Chr$(@Int(j% + i% * 16)) j% = j% + 1 EndWhile i% = i% + 1 EndWhile WaitKey End
Session-Cookies