Browse Source

* removed mode objfpc

nils 22 years ago
parent
commit
5ebd3ac8b8

+ 4 - 2
packages/extra/amunits/demos/asltest.pas

@@ -1,5 +1,4 @@
 PROGRAM AslTest;
-{$mode objfpc}
 
 uses Exec, Utility, Asl, msgbox, systemvartags;
 
@@ -49,7 +48,10 @@ END.
 
 {
   $Log$
-  Revision 1.2  2002-11-28 19:40:45  nils
+  Revision 1.3  2003-01-19 14:57:12  nils
+  * removed mode objfpc
+
+  Revision 1.2  2002/11/28 19:40:45  nils
     * update
 
 }

+ 5 - 3
packages/extra/amunits/demos/bezier.pas

@@ -1,6 +1,5 @@
 Program Bezier;
 
-{$mode objfpc}
 
 {
    This program draws Bezier curves using the degree elevation
@@ -262,9 +261,12 @@ end.
 
 {
   $Log$
-  Revision 1.2  2002-11-28 19:40:45  nils
+  Revision 1.3  2003-01-19 14:57:12  nils
+  * removed mode objfpc
+
+  Revision 1.2  2002/11/28 19:40:45  nils
     * update
 
 }
 
-  
+  

+ 6 - 3
packages/extra/amunits/demos/bezier2.pas

@@ -1,5 +1,5 @@
 Program Bezier;
-{$mode objfpc}
+
 
 {  This program draws Bezier curves in the slow, simple, recursive
    way.  When it first runs, you enter points in the window by
@@ -282,9 +282,12 @@ end.
 
 {
   $Log$
-  Revision 1.1  2002-11-28 19:42:26  nils
+  Revision 1.2  2003-01-19 14:57:12  nils
+  * removed mode objfpc
+
+  Revision 1.1  2002/11/28 19:42:26  nils
     * initial release
 
 }
 
-  
+  

+ 4 - 2
packages/extra/amunits/demos/dirdemo.pas

@@ -1,5 +1,4 @@
 PROGRAM DirDemo;
-{$mode objfpc}
 
 { 
     How you can use unit linklist.
@@ -106,7 +105,10 @@ END.
 
 {
   $Log$
-  Revision 1.1  2002-11-28 19:42:26  nils
+  Revision 1.2  2003-01-19 14:57:12  nils
+  * removed mode objfpc
+
+  Revision 1.1  2002/11/28 19:42:26  nils
     * initial release
 
 }

+ 4 - 2
packages/extra/amunits/demos/easygadtools.pas

@@ -1,5 +1,4 @@
 PROGRAM EasyGadtools;
-{$mode objfpc}
 
 {
     This is just a test on how to make a unit EasyGadtools.
@@ -180,7 +179,10 @@ END.
 
 {
   $Log$
-  Revision 1.1  2002-11-28 19:42:26  nils
+  Revision 1.2  2003-01-19 14:57:12  nils
+  * removed mode objfpc
+
+  Revision 1.1  2002/11/28 19:42:26  nils
     * initial release
 
 }

+ 4 - 2
packages/extra/amunits/demos/gtmenu.pas

@@ -1,5 +1,4 @@
 Program GadtoolsMenu;
-{$mode objfpc}
 
 {* gadtoolsmenu.p
 ** Example showing the basic usage of the menu system with a window.
@@ -169,7 +168,10 @@ end.
 
 {
   $Log$
-  Revision 1.2  2002-11-28 19:40:45  nils
+  Revision 1.3  2003-01-19 14:57:12  nils
+  * removed mode objfpc
+
+  Revision 1.2  2002/11/28 19:40:45  nils
     * update
 
 }

+ 4 - 2
packages/extra/amunits/demos/imagegadget.pas

@@ -1,5 +1,4 @@
 PROGRAM ImageGadget;
-{$mode objfpc}
 
 {
    An example on how to use GadTools gadgets,
@@ -409,7 +408,10 @@ END.
 
 {
   $Log$
-  Revision 1.2  2002-11-28 19:40:45  nils
+  Revision 1.3  2003-01-19 14:57:12  nils
+  * removed mode objfpc
+
+  Revision 1.2  2002/11/28 19:40:45  nils
     * update
 
 }

+ 6 - 3
packages/extra/amunits/demos/moire.pas

@@ -1,5 +1,5 @@
 Program Moire;
-{$mode objfpc}
+
 {
       Will now open a default screen (can be any size) with
       the new look. The window get it's size depending on
@@ -127,9 +127,12 @@ end.
 
 {
   $Log$
-  Revision 1.2  2002-11-28 19:40:45  nils
+  Revision 1.3  2003-01-19 14:57:12  nils
+  * removed mode objfpc
+
+  Revision 1.2  2002/11/28 19:40:45  nils
     * update
 
 }
 
-  
+  

+ 5 - 2
packages/extra/amunits/demos/penshare.pas

@@ -1,5 +1,5 @@
 Program PenShare;
-{$mode objfpc}
+
 
 { Dieses Programm demonstriert die ObtainPen Funktion der graphics.lib V39+
 
@@ -107,7 +107,10 @@ end.
 
 {
   $Log$
-  Revision 1.1  2002-11-28 19:42:27  nils
+  Revision 1.2  2003-01-19 14:57:12  nils
+  * removed mode objfpc
+
+  Revision 1.1  2002/11/28 19:42:27  nils
     * initial release
 
 }

+ 1 - 1
packages/extra/amunits/demos/snow.pas

@@ -1,5 +1,5 @@
 Program Snowflake;
-{$mode objfpc}
+
 { This program draws a fractal snowflake pattern.  I think I got it out
 of some magazine years ago.  It was written, as I remember it, for the
 PC in BASIC, which I converted to AmigaBASIC.  I have long since

+ 4 - 2
packages/extra/amunits/demos/sortdemo.pas

@@ -39,7 +39,6 @@ PROGRAM SortDemo;
 }
 
 uses Exec, Intuition, Graphics, Utility, GadTools, msgbox,systemvartags;
-{$mode objfpc}
 
 
 CONST
@@ -640,7 +639,10 @@ end.
 
 {
   $Log$
-  Revision 1.2  2002-11-28 19:40:45  nils
+  Revision 1.3  2003-01-19 14:57:12  nils
+  * removed mode objfpc
+
+  Revision 1.2  2002/11/28 19:40:45  nils
     * update
 
 }

+ 5 - 2
packages/extra/amunits/demos/stars.pas

@@ -1,5 +1,5 @@
 PROGRAM Sterne;
-{$mode objfpc}
+
 
 uses Exec, Graphics, Intuition, Utility, systemvartags;
 
@@ -151,7 +151,10 @@ END.
 
 {
   $Log$
-  Revision 1.2  2002-11-28 19:40:45  nils
+  Revision 1.3  2003-01-19 14:57:12  nils
+  * removed mode objfpc
+
+  Revision 1.2  2002/11/28 19:40:45  nils
     * update
 
 }

+ 4 - 3
packages/extra/amunits/demos/talk2boopsi.pas

@@ -1,7 +1,5 @@
 PROGRAM Talk2Boopsi;
 
-{$mode objfpc}
-
 { This example creates a Boopsi prop gadget and integer string gadget, connecting them
 so they }
 { update each other when the user changes their value.  The example program only
@@ -148,7 +146,10 @@ END.
 
 {
   $Log$
-  Revision 1.2  2002-11-28 19:40:45  nils
+  Revision 1.3  2003-01-19 14:57:12  nils
+  * removed mode objfpc
+
+  Revision 1.2  2002/11/28 19:40:45  nils
     * update
 
 }