anchor.diff:    end;
   var 
     Display         : ALLEGRO_DISPLAYptr;
  -  box_x, box_y, i : integer;
  +  box_x, box_y    : integer;
     PGame           : Game; 
     event_queue     : ALLEGRO_EVENT_QUEUEptr;
     ev              : ALLEGRO_EVENT;
  
positive.code:   al_init_ttf_addon();
    al_install_keyboard();
    Display := al_create_display(500, 500);
    event_queue := al_create_event_queue();
    al_register_event_source(event_queue, al_get_keyboard_event_source);
    al_register_event_source(event_queue, al_get_display_event_source(Display));
    Draw(PGame);
    Closed:=False;
    while not(Closed) do begin
      Inc(i);
      al_wait_for_event(event_queue, ev);
      if (ev._type = ALLEGRO_EVENT_KEY_DOWN) then 
        case ev.keyboard.keycode of 
  
negative.code: begin
    {Drawing the cells}
    al_clear_to_color(al_map_rgb(187, 173, 160));
    Font1 := al_load_font('Consolas.ttf', 32, 0);
    box_y := -100;
    box_x := 0;
    j:=0;
  