# Room & Dimension

## version 1 by Sebastian Rahn

**Section 1.5 - Calculate coordinates**

Every thing has a number called X-Axis.

Every thing has a text called Y-Axis.

Tmp_Height is a number that varies.

To calculate coordinates:

Choose row with Sector Room of the location of Compass in Table 997;

Change Table_Location to Table Entry;

Choose row 1 in Table_Location;

Change Tmp_Width to Width Entry;

Change Tmp to Height Entry;

Change Tmp_Height to Height Entry;

repeat with X running from 1 to Tmp

begin;

If tmp_Width > 17

begin;

Choose row with Sector Room of the location of Compass in Table 997;

Change Table_Location to Table Entry;

end if;

choose row X in Table_Location;

If Compass is LE Entry

begin;

Change Y-Axis of Compass to "LE";

Change X-Axis of Compass to Number Entry;

end if;

If Tmp_Width > 2

begin;

If Compass is A1 Entry

begin;

Change Y-Axis of Compass to "A";

Change X-Axis of Compass to Number Entry;

end if;

end if;

If Tmp_Width > 3

begin;

If Compass is B2 Entry

begin;

Change Y-Axis of Compass to "B";

Change X-Axis of Compass to Number Entry;

end if;

end if;

If Tmp_Width > 4

begin;

If Compass is C3 Entry

begin;

Change Y-Axis of Compass to "C";

Change X-Axis of Compass to Number Entry;

end if;

end if;

If Tmp_Width > 5

begin;

If Compass is D4 Entry

begin;

Change Y-Axis of Compass to "D";

Change X-Axis of Compass to Number Entry;

end if;

end if;

If Tmp_Width > 6

begin;

If Compass is E5 Entry

begin;

Change Y-Axis of Compass to "E";

Change X-Axis of Compass to Number Entry;

end if;

end if;

If Tmp_Width > 7

begin;

If Compass is F6 Entry

begin;

Change Y-Axis of Compass to "F";

Change X-Axis of Compass to Number Entry;

end if;

end if;

If Tmp_Width > 8

begin;

If Compass is G7 Entry

begin;

Change Y-Axis of Compass to "G";

Change X-Axis of Compass to Number Entry;

end if;

end if;

If Tmp_Width > 9

begin;

If Compass is H8 Entry

begin;

Change Y-Axis of Compass to "H";

Change X-Axis of Compass to Number Entry;

end if;

end if;

If Tmp_Width > 10

begin;

If Compass is I9 Entry

begin;

Change Y-Axis of Compass to "I";

Change X-Axis of Compass to Number Entry;

end if;

end if;

If Tmp_Width > 11

begin;

If Compass is J10 Entry

begin;

Change Y-Axis of Compass to "J";

Change X-Axis of Compass to Number Entry;

end if;

end if;

If Tmp_Width > 12

begin;

If Compass is K11 Entry

begin;

Change Y-Axis of Compass to "K";

Change X-Axis of Compass to Number Entry;

end if;

end if;

If Tmp_Width > 13

begin;

If Compass is L12 Entry

begin;

Change Y-Axis of Compass to "L";

Change X-Axis of Compass to Number Entry;

end if;

end if;

If Tmp_Width > 14

begin;

If Compass is M13 Entry

begin;

Change Y-Axis of Compass to "M";

Change X-Axis of Compass to Number Entry;

end if;

end if;

If Tmp_Width > 15

begin;

If Compass is N14 Entry

begin;

Change Y-Axis of Compass to "N";

Change X-Axis of Compass to Number Entry;

end if;

end if;

If Tmp_Width > 16

begin;

If Compass is O15 Entry

begin;

Change Y-Axis of Compass to "O";

Change X-Axis of Compass to Number Entry;

end if;

end if;

If Tmp_Width > 17

begin;

If Compass is P16 Entry

begin;

Change Y-Axis of Compass to "P";

Change X-Axis of Compass to Number Entry;

end if;

Choose row with Sector Room of the location of Compass in Table 997;

Change Table_Location to Table 2 Entry;

Choose row X in Table_Location;

end if;

If Tmp_Width > 18

begin;

If Compass is Q17 Entry

begin;

Change Y-Axis of Compass to "Q";

Change X-Axis of Compass to Number Entry;

end if;

end if;

If Tmp_Width > 19

begin;

If Compass is R18 Entry

begin;

Change Y-Axis of Compass to "R";

Change X-Axis of Compass to Number Entry;

end if;

end if;

If Tmp_Width > 20

begin;

If Compass is S19 Entry

begin;

Change Y-Axis of Compass to "S";

Change X-Axis of Compass to Number Entry;

end if;

end if;

If Tmp_Width > 21

begin;

If Compass is T20 Entry

begin;

Change Y-Axis of Compass to "T";

Change X-Axis of Compass to Number Entry;

end if;

end if;

If Tmp_Width > 22

begin;

If Compass is U21 Entry

begin;

Change Y-Axis of Compass to "U";

Change X-Axis of Compass to Number Entry;

end if;

end if;

If Tmp_Width > 23

begin;

If Compass is V22 Entry

begin;

Change Y-Axis of Compass to "V";

Change X-Axis of Compass to Number Entry;

end if;

end if;

If Tmp_Width > 24

begin;

If Compass is W23 Entry

begin;

Change Y-Axis of Compass to "W";

Change X-Axis of Compass to Number Entry;

end if;

end if;

If Tmp_Width > 25

begin;

If Compass is X24 Entry

begin;

Change Y-Axis of Compass to "X";

Change X-Axis of Compass to Number Entry;

end if;

end if;

If Tmp_Width > 26

begin;

If Compass is Y25 Entry

begin;

Change Y-Axis of Compass to "Y";

Change X-Axis of Compass to Number Entry;

end if;

end if;

If Tmp_Width > 27

begin;

If Compass is Z26 Entry

begin;

Change Y-Axis of Compass to "Z";

Change X-Axis of Compass to Number Entry;

end if;

end if;

If Tmp_Width > 1

begin;

If Compass is RE Entry

begin;

Change Y-Axis of Compass to "RE";

Change X-Axis of Compass to Number Entry;

end if;

end if;

end repeat.