Five Gods Exiled — 128 of 191

Carolyn VanEseltine

Release 1

Part 2 - Transitional Events

Table of Past Transitional Events

event typeevent number
00
with 50 blank rows

To call a transitional event:

say "(Calling a transitional event: ";

randomize the transitional event;

verify the transitional event unique;

if the current event type is 1:

call a death-related transitional event;

otherwise if the current event type is 2:

call a blessings-related transitional event;

otherwise if the current event type is 3:

call a singing-related transitional event;

otherwise if the current event type is 4:

call a crowd-related transitional event.

To randomize the transitional event:

let L be a random number between 1 and 10;

if L < 5:

now the current event type is 1;

now the current event number is 1;

otherwise if L is 5:

now the current event type is 2;

now the current event number is a random number between 1 and 5;

otherwise if L < 8:

now the current event type is 3;

now the current event number is a random number between 1 and 8;

otherwise:

now the current event type is 4;

now the current event number is a random number between 1 and 5.

To verify the transitional event unique:

let M be 0;

repeat through the Table of Past Transitional Events:

if the current event type is the event type entry and the current event number is the event number entry:

now M is 1;

if M is 0:

say " event type [current event type] and event number [current event number]. ";

choose a blank row in the Table of Past Transitional Events;

now the event type entry is the current event type;

now the event number entry is the current event number;

otherwise:

say "...called a duplicate transitional event. Choosing a new transitional event... ";

randomize the transitional event;

verify the transitional event unique.