From a4c804b49ec872b71bd5a0167c3ad45704a3cc30 Mon Sep 17 00:00:00 2001
From: adiblol <adiblol@1tbps.org>
Date: Thu, 8 Mar 2012 19:32:05 +0100
Subject: Initial commit, Copyright (C) 2001-2008, Daniel ROUX & EPSITEC SA,
 www.epsitec.ch

---
 src/CBot/TestCBot/TestCBot3.txt | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)
 create mode 100644 src/CBot/TestCBot/TestCBot3.txt

(limited to 'src/CBot/TestCBot/TestCBot3.txt')

diff --git a/src/CBot/TestCBot/TestCBot3.txt b/src/CBot/TestCBot/TestCBot3.txt
new file mode 100644
index 0000000..b915f96
--- /dev/null
+++ b/src/CBot/TestCBot/TestCBot3.txt
@@ -0,0 +1,24 @@
+public extern void Test ()
+{
+	for ( int x = 100000; x>0 ; x-- ) { }
+}
+
+float MaRoutine( CPoint A, CPoint B )
+{
+    A.x -= B.x ;    // distance en x
+    A.y -= B.y ;    // distance en y
+    A.x *= A.x;    // carré de la distance
+    A.y += A.y;    // carré de la distance
+    println ( A, B ) ;
+    return ( A.x + A.y ) ;
+}
+
+public extern void TestAB ( )
+{
+    CPoint    A(3, 5) ;
+    CPoint    B(4, -2);
+    println ( A, B ) ;
+    MaRoutine( A, B ) ;
+    println ( A, B ) ;
+}
+
-- 
cgit v1.2.3-1-g7c22