Unit village

Description

Generates a small village of shacks and a village hall

Uses

• SysUtils
• globalutils

Overview

Classes, Interfaces, Objects and Records

Name	Description
Record coordinates

Functions and Procedures

procedure createRoom(gridNumber: smallint);

procedure leftShacks;

procedure rightShacks;

procedure generate(title: string; idNumber: smallint);

Variables

ax: integer;

ay: integer;

c: integer;

centreList: array of coordinates;

choose: integer;

dungeonArray: array[1..MAXROWS, 1..MAXCOLUMNS] of char;

i: integer;

ii: integer;

j: integer;

jj: integer;

k: integer;

listLength: integer;

q: integer;

qq: integer;

r: integer;

x: array [1..MAXCOLUMNS, 1..MAXROWS, 1..5] of char;

xx: array[1..MAXCOLUMNS, 1..MAXROWS] of integer;

y: array [1..MAXCOLUMNS, 1..MAXROWS, 1..5] of char;

Description

Functions and Procedures

procedure createRoom(gridNumber: smallint);

Create a building

procedure leftShacks;

Generate shacks on the left of the map

procedure rightShacks;

Generate shacks on the right of the map

procedure generate(title: string; idNumber: smallint);

Generate a village map

Variables

ax: integer;

ay: integer;

c: integer;

centreList: array of coordinates;

list of coordinates of centre of each building

choose: integer;

dungeonArray: array[1..MAXROWS, 1..MAXCOLUMNS] of char;

i: integer;

ii: integer;

j: integer;

jj: integer;

k: integer;

listLength: integer;

q: integer;

qq: integer;

r: integer;

x: array [1..MAXCOLUMNS, 1..MAXROWS, 1..5] of char;

xx: array[1..MAXCOLUMNS, 1..MAXROWS] of integer;

y: array [1..MAXCOLUMNS, 1..MAXROWS, 1..5] of char;

---

Generated by PasDoc 0.16.0.