From 08eca96e71d96ad1f8e9b888875ab5570f208d19 Mon Sep 17 00:00:00 2001 From: Cameron Katri Date: Wed, 17 Feb 2021 14:05:02 -0500 Subject: Get all the games compiling for iOS --- phantasia/map.c | 200 +++++++++++++++++++++++++++++--------------------------- 1 file changed, 103 insertions(+), 97 deletions(-) (limited to 'phantasia/map.c') diff --git a/phantasia/map.c b/phantasia/map.c index 7ac656db..d1bbca24 100644 --- a/phantasia/map.c +++ b/phantasia/map.c @@ -3,71 +3,79 @@ #define minusminus plusplus #define minusplus plusminus +#include +#include +#include + +void plusminus(char *s, int x, int y); +void plusplus(char *s, int x, int y); + +int main() { /* Set up */ - openpl(); - space(-1400, -1000, 1200, 1200); + pl_openpl(); + pl_space(-1400, -1000, 1200, 1200); /* Big box */ - move(-1400, -1000); - cont(-1400, 1000); - cont(600, 1000); - cont(600, -1000); - cont(-1400, -1000); + pl_move(-1400, -1000); + pl_cont(-1400, 1000); + pl_cont(600, 1000); + pl_cont(600, -1000); + pl_cont(-1400, -1000); /* Grid -- horizontal lines every 200 */ - linemod("dotted"); - line(600, -800, -1400, -800); - line(-1400, -600, 600, -600); - line(600, -400, -1400, -400); - line(-1400, -200, 600, -200); - linemod("solid"); - line(600, 0, -1400, 0); - linemod("dotted"); - line(-1400, 200, 600, 200); - line(600, 400, -1400, 400); - line(-1400, 600, 600, 600); - line(600, 800, -1400, 800); + pl_linemod("dotted"); + pl_line(600, -800, -1400, -800); + pl_line(-1400, -600, 600, -600); + pl_line(600, -400, -1400, -400); + pl_line(-1400, -200, 600, -200); + pl_linemod("solid"); + pl_line(600, 0, -1400, 0); + pl_linemod("dotted"); + pl_line(-1400, 200, 600, 200); + pl_line(600, 400, -1400, 400); + pl_line(-1400, 600, 600, 600); + pl_line(600, 800, -1400, 800); /* Grid -- vertical lines every 200 */ - line(-1200, 1000, -1200, -1000); - line(-1000, 1000, -1000, -1000); - line(-800, 1000, -800, -1000); - line(-600, 1000, -600, -1000); - linemod("solid"); - line(-400, 1000, -400, -1000); - linemod("dotted"); - line(-200, 1000, -200, -1000); - line(0, 1000, 0, -1000); - line(200, 1000, 200, -1000); - line(400, 1000, 400, -1000); + pl_line(-1200, 1000, -1200, -1000); + pl_line(-1000, 1000, -1000, -1000); + pl_line(-800, 1000, -800, -1000); + pl_line(-600, 1000, -600, -1000); + pl_linemod("solid"); + pl_line(-400, 1000, -400, -1000); + pl_linemod("dotted"); + pl_line(-200, 1000, -200, -1000); + pl_line(0, 1000, 0, -1000); + pl_line(200, 1000, 200, -1000); + pl_line(400, 1000, 400, -1000); /* Circles radius +250 on "center" */ - linemod("solid"); - circle(-400, 0, 250); - circle(-400, 0, 500); - circle(-400, 0, 750); - circle(-400, 0, 1000); + pl_linemod("solid"); + pl_circle(-400, 0, 250); + pl_circle(-400, 0, 500); + pl_circle(-400, 0, 750); + pl_circle(-400, 0, 1000); /* A few labels */ - move(-670, 1075); - label("- THE PHANTASIA UNIVERSE -"); - line(-630, 1045, -115, 1045); - move(-360, 80); - label("Lorien"); - move(-385, -100); - label("Ithilien"); - move(-560, 80); - label("Rohan"); - move(-580, -100); - label("Anorien"); + pl_move(-670, 1075); + pl_label("- THE PHANTASIA UNIVERSE -"); + pl_line(-630, 1045, -115, 1045); + pl_move(-360, 80); + pl_label("Lorien"); + pl_move(-385, -100); + pl_label("Ithilien"); + pl_move(-560, 80); + pl_label("Rohan"); + pl_move(-580, -100); + pl_label("Anorien"); plusplus("Rovanion", -250, 320); plusplus("The Iron Hills", -100, 560); plusplus("Rhun", 250, 570); @@ -80,82 +88,80 @@ main() plusminus("Mordor", -180, -300); plusminus("Khand", 0, -500); plusminus("Near Harad", 40, -780); - move(340, 900); - label("The Moors"); - move(300, 840); - label("Adventurous"); - move(340, -840); - label("The Moors"); - move(300, -900); - label("Adventurous"); - move(-1340, 900); - label("The Moors"); - move(-1340, 840); - label("Adventurous"); - move(-1340, -840); - label("The Moors"); - move(-1340, -900); - label("Adventurous"); - move(700, 1000); - label("OUTER CIRCLES:"); - line(690, 970, 1000, 970); - move(700, 900); - label("> 9: The Outer Waste"); - move(700, 800); - label("> 20: The Dead Marshes"); - move(700, 700); - label("> 35: Kennaquhair"); - move(700, 600); - label("> 55: Morannon"); - move(700, 300); - label("(0,0): The Lord's Chamber"); - - move(700, -400); - label("Grid squares are 100 x 100"); - move(700, -800); - label("Created by Ted Estes"); - move(700, -860); - label("Plotted by Chris Robertson"); - move(700, -920); - label(" c 1985"); - circle(723, -923, 20); + pl_move(340, 900); + pl_label("The Moors"); + pl_move(300, 840); + pl_label("Adventurous"); + pl_move(340, -840); + pl_label("The Moors"); + pl_move(300, -900); + pl_label("Adventurous"); + pl_move(-1340, 900); + pl_label("The Moors"); + pl_move(-1340, 840); + pl_label("Adventurous"); + pl_move(-1340, -840); + pl_label("The Moors"); + pl_move(-1340, -900); + pl_label("Adventurous"); + pl_move(700, 1000); + pl_label("OUTER CIRCLES:"); + pl_line(690, 970, 1000, 970); + pl_move(700, 900); + pl_label("> 9: The Outer Waste"); + pl_move(700, 800); + pl_label("> 20: The Dead Marshes"); + pl_move(700, 700); + pl_label("> 35: Kennaquhair"); + pl_move(700, 600); + pl_label("> 55: Morannon"); + pl_move(700, 300); + pl_label("(0,0): The Lord's Chamber"); + + pl_move(700, -400); + pl_label("Grid squares are 100 x 100"); + pl_move(700, -800); + pl_label("Created by Ted Estes"); + pl_move(700, -860); + pl_label("Plotted by Chris Robertson"); + pl_move(700, -920); + pl_label(" c 1985"); + pl_circle(723, -923, 20); /* Close down */ - move(-1380, 1180); - closepl(); + pl_move(-1380, 1180); + pl_closepl(); exit(0); } -plusplus(s, x, y) /* draw strings in plus plus quadrant */ -char *s; -int x, y; +void +plusplus(char *s, int x, int y) /* draw strings in plus plus quadrant */ { char s1[2]; while (*s) { - move(x, y); + pl_move(x, y); s1[0] = *s++; s1[1] = '\0'; - label(s1); + pl_label(s1); x += 25; y -= 30; } } -plusminus(s, x, y) /* draw strings in plus minus quadrant */ -char *s; -int x, y; +void +plusminus(char *s, int x, int y) /* draw strings in plus minus quadrant */ { char s1[2]; while (*s) { - move(x, y); + pl_move(x, y); s1[0] = *s++; s1[1] = '\0'; - label(s1); + pl_label(s1); x += 25; y += 30; } -- cgit v1.2.3-56-ge451