TURBO 33 MHz
LPT1: OKIDATA 320
ONLINE
MICROBLOG
Ln 1, Col 1
program MicroBlog;

uses Crt, Dos;

var
  Status : integer;
  Message : string[80];

{ ---------------------------------------- }
{ Микробложик инженера-ретроэнтузиаста }
{ Turbo Pascal 7.0 / DOS 6.22 }
{ ----DOWNLOAD AREA (RETRO STUFF) ------- }
{ [x]retro_dev_pack.zip-------------------- }
{ -retro_dev_pack.zip--------------------- }
{ ├── dosbox-0.74-3-win32-installer.exe -- }
{ ├── fpc_4_dos322full.zip --------------- }
{ ├── fpc_reference.pdf---------------- -- }
{ ├── lazarus-4.6-fpc-3.2.2-win64.exe----- }
{ ├── MS-DOS Commands Quick Reference.pdf- }
{ └── ansi_art---------------------------- }
{     └── 1990.zip------------------------ }
{ ---------------------------------------- }

begin
  ClrScr;
  TextColor(14); { Yellow }
  Writeln('>>> BLOG SYSTEM v0.1 <<<');
  Writeln;
  TextColor(10); { Light Green }
  Writeln(' Status: UNDER_CONSTRUCTION');
  Writeln(' ETA: SOON (IN DEV_TIME)');
  Writeln(' License: GNU/GPL v3');
  Writeln;
  TextColor(11); { Light Cyan }
  Writeln(' Press any key to continue...');
  ReadKey;
end.
INS
NUM
HDD
386SX
4MB RAM
C:\BLOG\SRC\
MAIN.PAS4,217
CONFIG.INC892
POSTS.DAT12,456
README.TXT1,024
D:\BACKUP\
BLOG_OLD.ZIP45,892
SOURCES.BAK8,432
..DIR
Compiling MICROBLOG.PAS...
Ready
F1Help
F2Save
F3Open
F4Clear
F5Zoom
F6Next
F7Trace
F8Step
F9Make
F10Menu
12:34:56 C:\BLOG> _ Free mem: 2,124,288 bytes