AVALANCHE: Initial PtoC output.

1 files changed, 64 insertions, 0 deletions

diff --git a/engines/avalanche/travel.cpp b/engines/avalanche/travel.cpp
new file mode 100644
index 0000000000..b7597670d6
--- /dev/null
+++ b/engines/avalanche/travel.cpp
@@ -0,0 +1,64 @@
+#include "ptoc.h"
+
+
+#include "graph.h"
+/*#include "Crt.h"*/
+
+integer gd,gm;
+
+void zoomout(integer x,integer y)
+{
+ integer x1,y1,x2,y2;
+ byte fv;
+;
+ setcolor(white); setwritemode(xorput);
+ setlinestyle(dottedln,0,1);
+
+ for( fv=1; fv <= 20; fv ++)
+ {;
+  x1=x-(x / 20)*fv;
+  y1=y-((y-10) / 20)*fv;
+  x2=x+(((639-x) / 20)*fv);
+  y2=y+(((161-y) / 20)*fv);
+
+  rectangle(x1,y1,x2,y2);
+  delay(17);
+  rectangle(x1,y1,x2,y2);
+ }
+}
+
+void zoomin(integer x,integer y)
+{
+ integer x1,y1,x2,y2;
+ byte fv;
+;
+ setcolor(white); setwritemode(xorput);
+ setlinestyle(dottedln,0,1);
+
+ for( fv=20; fv >= 1; fv --)
+ {;
+  x1=x-(x / 20)*fv;
+  y1=y-((y-10) / 20)*fv;
+  x2=x+(((639-x) / 20)*fv);
+  y2=y+(((161-y) / 20)*fv);
+
+  rectangle(x1,y1,x2,y2);
+  delay(17);
+  rectangle(x1,y1,x2,y2);
+ }
+}
+
+int main(int argc, const char* argv[])
+{pio_initialize(argc, argv);
+;
+ gd=3; gm=0; initgraph(gd,gm,"c:\\bp\\bgi");
+ zoomout(177,77);
+ zoomout(7,31);
+ zoomout(577,124);
+ zoomout(320,85);
+ zoomin(177,77);
+ zoomin(7,31);
+ zoomin(577,124);
+ zoomin(320,85);
+return EXIT_SUCCESS;
+}
\ No newline at end of file