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;
 PROGRAM AslTest;
-{$mode objfpc}
 
 
 uses Exec, Utility, Asl, msgbox, systemvartags;
 uses Exec, Utility, Asl, msgbox, systemvartags;
 
 
@@ -49,7 +48,10 @@ END.
 
 
 {
 {
   $Log$
   $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
     * update
 
 
 }
 }

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

@@ -1,6 +1,5 @@
 Program Bezier;
 Program Bezier;
 
 
-{$mode objfpc}
 
 
 {
 {
    This program draws Bezier curves using the degree elevation
    This program draws Bezier curves using the degree elevation
@@ -262,9 +261,12 @@ end.
 
 
 {
 {
   $Log$
   $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
     * update
 
 
 }
 }
 
 
-  
+  

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

@@ -1,5 +1,5 @@
 Program Bezier;
 Program Bezier;
-{$mode objfpc}
+
 
 
 {  This program draws Bezier curves in the slow, simple, recursive
 {  This program draws Bezier curves in the slow, simple, recursive
    way.  When it first runs, you enter points in the window by
    way.  When it first runs, you enter points in the window by
@@ -282,9 +282,12 @@ end.
 
 
 {
 {
   $Log$
   $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
     * initial release
 
 
 }
 }
 
 
-  
+  

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

@@ -1,5 +1,4 @@
 PROGRAM DirDemo;
 PROGRAM DirDemo;
-{$mode objfpc}
 
 
 { 
 { 
     How you can use unit linklist.
     How you can use unit linklist.
@@ -106,7 +105,10 @@ END.
 
 
 {
 {
   $Log$
   $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
     * initial release
 
 
 }
 }

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

@@ -1,5 +1,4 @@
 PROGRAM EasyGadtools;
 PROGRAM EasyGadtools;
-{$mode objfpc}
 
 
 {
 {
     This is just a test on how to make a unit EasyGadtools.
     This is just a test on how to make a unit EasyGadtools.
@@ -180,7 +179,10 @@ END.
 
 
 {
 {
   $Log$
   $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
     * initial release
 
 
 }
 }

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

@@ -1,5 +1,4 @@
 Program GadtoolsMenu;
 Program GadtoolsMenu;
-{$mode objfpc}
 
 
 {* gadtoolsmenu.p
 {* gadtoolsmenu.p
 ** Example showing the basic usage of the menu system with a window.
 ** Example showing the basic usage of the menu system with a window.
@@ -169,7 +168,10 @@ end.
 
 
 {
 {
   $Log$
   $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
     * update
 
 
 }
 }

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

@@ -1,5 +1,4 @@
 PROGRAM ImageGadget;
 PROGRAM ImageGadget;
-{$mode objfpc}
 
 
 {
 {
    An example on how to use GadTools gadgets,
    An example on how to use GadTools gadgets,
@@ -409,7 +408,10 @@ END.
 
 
 {
 {
   $Log$
   $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
     * update
 
 
 }
 }

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

@@ -1,5 +1,5 @@
 Program Moire;
 Program Moire;
-{$mode objfpc}
+
 {
 {
       Will now open a default screen (can be any size) with
       Will now open a default screen (can be any size) with
       the new look. The window get it's size depending on
       the new look. The window get it's size depending on
@@ -127,9 +127,12 @@ end.
 
 
 {
 {
   $Log$
   $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
     * update
 
 
 }
 }
 
 
-  
+  

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

@@ -1,5 +1,5 @@
 Program PenShare;
 Program PenShare;
-{$mode objfpc}
+
 
 
 { Dieses Programm demonstriert die ObtainPen Funktion der graphics.lib V39+
 { Dieses Programm demonstriert die ObtainPen Funktion der graphics.lib V39+
 
 
@@ -107,7 +107,10 @@ end.
 
 
 {
 {
   $Log$
   $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
     * initial release
 
 
 }
 }

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

@@ -1,5 +1,5 @@
 Program Snowflake;
 Program Snowflake;
-{$mode objfpc}
+
 { This program draws a fractal snowflake pattern.  I think I got it out
 { 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
 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
 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;
 uses Exec, Intuition, Graphics, Utility, GadTools, msgbox,systemvartags;
-{$mode objfpc}
 
 
 
 
 CONST
 CONST
@@ -640,7 +639,10 @@ end.
 
 
 {
 {
   $Log$
   $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
     * update
 
 
 }
 }

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

@@ -1,5 +1,5 @@
 PROGRAM Sterne;
 PROGRAM Sterne;
-{$mode objfpc}
+
 
 
 uses Exec, Graphics, Intuition, Utility, systemvartags;
 uses Exec, Graphics, Intuition, Utility, systemvartags;
 
 
@@ -151,7 +151,10 @@ END.
 
 
 {
 {
   $Log$
   $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
     * update
 
 
 }
 }

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

@@ -1,7 +1,5 @@
 PROGRAM Talk2Boopsi;
 PROGRAM Talk2Boopsi;
 
 
-{$mode objfpc}
-
 { This example creates a Boopsi prop gadget and integer string gadget, connecting them
 { This example creates a Boopsi prop gadget and integer string gadget, connecting them
 so they }
 so they }
 { update each other when the user changes their value.  The example program only
 { update each other when the user changes their value.  The example program only
@@ -148,7 +146,10 @@ END.
 
 
 {
 {
   $Log$
   $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
     * update
 
 
 }
 }