TempleOSCDV4.11.ISO

Demo/Graphics/PanText.HC

@@ -0,0 +1,35 @@
+U0 PanText()
+{
+  I64 i;
+  for (i=0;i<=7;i++) {
+    gr.pan_text_x=i;
+    Sleep(30);
+  }
+  i--;
+  for (;i>=-7;i--) {
+    gr.pan_text_x=i;
+    Sleep(30);
+  }
+  i++;
+  for (;i<=0;i++) {
+    gr.pan_text_x=i;
+    Sleep(30);
+  }
+
+  for (i=0;i<=7;i++) {
+    gr.pan_text_y=i;
+    Sleep(30);
+  }
+  i--;
+  for (;i>=-7;i--) {
+    gr.pan_text_y=i;
+    Sleep(30);
+  }
+  i++;
+  for (;i<=0;i++) {
+    gr.pan_text_y=i;
+    Sleep(30);
+  }
+}
+
+PanText;