Skip to content

Commit

Permalink
Update to new coding standards.
Browse files Browse the repository at this point in the history
  • Loading branch information
anachrocomputer committed May 4, 2019
1 parent 3ea3a0e commit 7f065d1
Showing 1 changed file with 51 additions and 51 deletions.
102 changes: 51 additions & 51 deletions hilb.c
Original file line number Diff line number Diff line change
Expand Up @@ -6,106 +6,106 @@

#define A3

void hilb (int level, double len);
void bert (int level, double len);
void hilb(const int level, const double len);
void bert(const int level, const double len);

int main (int argc, const char *argv[])
int main(int argc, const char *argv[])
{
int level;
#ifdef A1
double overall = 540.0; /* Overall size 540mm */
int maxlevel = 6;
const double overall = 540.0; /* Overall size 540mm */
const int maxlevel = 6;
#else
double overall = 270.0; /* Overall size 270mm */
int maxlevel = 5;
const double overall = 270.0; /* Overall size 270mm */
const int maxlevel = 5;
#endif
double size;
double height;
double width;

#ifdef A1
turtle (DEV_HPGL, SIZ_A1, ORI_LAND, FLG_BORD);
turtle(DEV_HPGL, SIZ_A1, ORI_LAND, FLG_BORD);
#else
turtle (DEV_HPGL, SIZ_A3, ORI_LAND, FLG_BORD|FLG_RELS);
turtle(DEV_HPGL, SIZ_A3, ORI_LAND, FLG_BORD|FLG_RELS);
#endif

title ("HILBERT", 3.75, BOT|LEFT, ITALIC);
// title ("2013-03-23", 3.75, BOT|RIGHT, ITALIC);
title("HILBERT", 3.75, BOT|LEFT, ITALIC);
// title("2013-03-23", 3.75, BOT|RIGHT, ITALIC);

height = page_height ();
width = page_width ();
height = page_height();
width = page_width();
size = overall / 2.0;

for (level = 1; level <= maxlevel; level++) {
bottom_left ();
set_heading (0.0);
bottom_left();
set_heading(0.0);

pen (UP);
forward ((size / 2.0) + ((width - overall) / 2.0));
turn (90.0);
forward ((size / 2.0) + ((height - overall) / 2.0));
turn (-90.0);
pen (DOWN);
pen(UP);
forward((size / 2.0) + ((width - overall) / 2.0));
turn(90.0);
forward((size / 2.0) + ((height - overall) / 2.0));
turn(-90.0);
pen(DOWN);

switch (level % 4) {
case 0:
colour (BLACK);
colour(BLACK);
break;
case 1:
colour (RED);
colour(RED);
break;
case 2:
colour (GREEN);
colour(GREEN);
break;
case 3:
colour (BLUE);
colour(BLUE);
break;
}

hilb (level, size);
hilb(level, size);

size /= 2.0;
}

show ();
show();

return (0);
}


void hilb (int level, double len)
void hilb(const int level, const double len)
{
if (level == 0)
return;

turn (90.0);
bert (level - 1, len);
forward (len);
turn (-90.0);
hilb (level - 1, len);
forward (len);
hilb (level - 1, len);
turn (-90.0);
forward (len);
bert (level - 1, len);
turn (90.0);
turn(90.0);
bert(level - 1, len);
forward(len);
turn(-90.0);
hilb(level - 1, len);
forward(len);
hilb(level - 1, len);
turn(-90.0);
forward(len);
bert(level - 1, len);
turn(90.0);
}


void bert (int level, double len)
void bert(const int level, const double len)
{
if (level == 0)
return;

turn (-90.0);
hilb (level - 1, len);
forward (len);
turn (90.0);
bert (level - 1, len);
forward (len);
bert (level - 1, len);
turn (90.0);
forward (len);
hilb (level - 1, len);
turn (-90.0);
turn(-90.0);
hilb(level - 1, len);
forward(len);
turn(90.0);
bert(level - 1, len);
forward(len);
bert(level - 1, len);
turn(90.0);
forward(len);
hilb(level - 1, len);
turn(-90.0);
}

0 comments on commit 7f065d1

Please sign in to comment.