while (true)
{
   processInput();
   update();
   render();
}

  for i:=0 to 100 do
  for j:=0 to 100 do
   begin
    Блок[i,j].КартинкаХ:=1;
    Блок[i,j].КартинкаУ:=3;
    Блок[i,j].Проходимость:=1;
    Блок[i,j].Название:='Трава';
    Блок[i,j].ИдОбъекта:=0;
    Блок[i,j].Простматриваемый:=true;
   end;

'Kirill Engine. Движок для кириллов.
dir = Program.Directory
GraphicsWindow.KeyUp = KeyUpd
GraphicsWindow.KeyDown = KeyUpd
GraphicsWindow.MouseDown = MouseUpd
GraphicsWindow.MouseUp = MouseUpd
LastKey = GraphicsWindow.LastKey

false = "false"
true = "true"

GraphicsWindow.Show()
GraphicsWindow.Title = "Kirill Engine. SBGC 2 fork, lol."
exit = false
    
'Загрузка
Sub Load
EndSub

'Обновление
Sub Update
EndSub

'Отрисовка. Если честно, то можно все это делать и в Update, но я для ясности оставлю.
Sub Draw
EndSub

'Инициализация компонентов и цикл
Load()
While (exit = false)
   Program.Delay(1000/60)
   Update()
   Draw()
EndWhile

Sub KeyUpd
EndSub

Sub MouseUpd
EndSub