From 84d1f79fdf02e0010e4b2d118458e8cd8ce0dd71 Mon Sep 17 00:00:00 2001 From: Krzysztof H Date: Fri, 9 Mar 2012 17:08:05 +0100 Subject: Added license info using a small program SrcHead. --- src/CBot/old TstCBot/TstCBot.cpp | 71 ++++++++++++++++++++++++---------------- 1 file changed, 42 insertions(+), 29 deletions(-) (limited to 'src/CBot/old TstCBot/TstCBot.cpp') diff --git a/src/CBot/old TstCBot/TstCBot.cpp b/src/CBot/old TstCBot/TstCBot.cpp index 8ac4557..5b831e3 100644 --- a/src/CBot/old TstCBot/TstCBot.cpp +++ b/src/CBot/old TstCBot/TstCBot.cpp @@ -1,5 +1,18 @@ -// TstCBot.cpp : Defines the class behaviors for the application. -// +// * This file is part of the COLOBOT source code +// * Copyright (C) 2001-2008, Daniel ROUX & EPSITEC SA, www.epsitec.ch +// * +// * This program is free software: you can redistribute it and/or modify +// * it under the terms of the GNU General Public License as published by +// * the Free Software Foundation, either version 3 of the License, or +// * (at your option) any later version. +// * +// * This program is distributed in the hope that it will be useful, +// * but WITHOUT ANY WARRANTY; without even the implied warranty of +// * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +// * GNU General Public License for more details. +// * +// * You should have received a copy of the GNU General Public License +// * along with this program. If not, see . #include "stdafx.h" #include "TstCBot.h" @@ -19,9 +32,9 @@ static char THIS_FILE[] = __FILE__; //////////////////////////////////////////////////////////////////// // routine show() -// utilisable depuis le programme écrit en CBot +// utilisable depuis le programme �crit en CBot -// exécution +// ex�cution BOOL rShow( CBotVar* pVar, CBotVar* pResult, int& Exception ) { CString s; @@ -56,7 +69,7 @@ BOOL rShow( CBotVar* pVar, CBotVar* pResult, int& Exception ) int cShow( CBotVar* &pVar, CBotString& RetClass) { if ( pVar == NULL ) return 22; - return CBotTypInt; // tous paramètres acceptés, un entier en retour + return CBotTypInt; // tous param�tres accept�s, un entier en retour } int cErr( CBotVar* &pVar, CBotString& RetClass) @@ -67,9 +80,9 @@ int cErr( CBotVar* &pVar, CBotString& RetClass) //////////////////////////////////////////////////////////////////// // routine print() -// utilisable depuis le programme écrit en CBot +// utilisable depuis le programme �crit en CBot -// exécution +// ex�cution BOOL rPrintLn( CBotVar* pVar, CBotVar* pResult, int& Exception ) { CString s; @@ -118,19 +131,19 @@ BOOL rPrint( CBotVar* pVar, CBotVar* pResult, int& Exception ) int cPrint( CBotVar* &pVar, CBotString& RetClass) { - return 0; // tous paramètres acceptés, un entier en retour + return 0; // tous param�tres accept�s, un entier en retour } ////////////////////////////////////////////////////////////////// // class CPoint pour essayer -// exécution +// ex�cution BOOL rCPoint( CBotVar* pThis, CBotVar* pVar, CBotVar* pResult, int& Exception ) { CString s; - if ( pVar == NULL )return TRUE; // constructeur sans paramètres est ok + if ( pVar == NULL )return TRUE; // constructeur sans param�tres est ok if ( pVar->RetType() > CBotTypDouble ) { @@ -175,41 +188,41 @@ BOOL rCPoint( CBotVar* pThis, CBotVar* pVar, CBotVar* pResult, int& Exception ) int cCPoint( CBotVar* pThis, CBotVar* &pVar, CBotString& RetClass) { - // l'objet doit être de la classe CPoint + // l'objet doit �tre de la classe CPoint if ( !pThis->IsElemOfClass("CPoint") ) return 6021; - // ok si aucun paramètres ! + // ok si aucun param�tres ! if ( pVar == NULL ) return 0; - // paramètre de type numérique svp + // param�tre de type num�rique svp if ( pVar->RetType() > CBotTypDouble ) return 6023; pVar = pVar->RetNext(); - // il doit y avoir un second paramètre + // il doit y avoir un second param�tre if ( pVar == NULL ) return 6022; - // également de type numérique + // �galement de type num�rique if ( pVar->RetType() > CBotTypDouble )return 6023; pVar = pVar->RetNext(); - // et pas plus de 2 paramètres svp + // et pas plus de 2 param�tres svp if ( pVar != NULL ) return 6025; return 0; // cette fonction retourne void } -// méthode déterminant l'opposé +// m�thode d�terminant l'oppos� BOOL rOppose( CBotVar* pThis, CBotVar* pVar, CBotVar* pResult, int& Exception ) { CString s; - if ( pVar != NULL ) // pas de paramètre + if ( pVar != NULL ) // pas de param�tre { Exception = 6025; return FALSE; } - CBotVar* pvar = pThis->RetItemList(); // demande la chaîne des items + CBotVar* pvar = pThis->RetItemList(); // demande la cha�ne des items - // tous les paramètres sont des nombres + // tous les param�tres sont des nombres while (pvar != NULL) { pvar->SetValFloat( -pvar->RetValFloat() ); @@ -222,15 +235,15 @@ BOOL rOppose( CBotVar* pThis, CBotVar* pVar, CBotVar* pResult, int& Exception ) int cOppose( CBotVar* pThis, CBotVar* &pVar, CBotString& RetClass) { - // l'objet doit être de la classe CPoint + // l'objet doit �tre de la classe CPoint if ( !pThis->IsElemOfClass("CPoint") ) return 6021; RetClass = "CPoint"; // l'objet rendu est de cette class - // ok si aucun paramètres ! - if ( pVar == NULL ) return CBotTypClass; // le paramètre retourné est une instance de la classe + // ok si aucun param�tres ! + if ( pVar == NULL ) return CBotTypClass; // le param�tre retourn� est une instance de la classe - return TX_OVERPARAM; // ça va pas + return TX_OVERPARAM; // �a va pas } @@ -313,7 +326,7 @@ BOOL CTstCBotApp::InitInstance() /////////////////////////////////// -// défini la fonction "show()" +// d�fini la fonction "show()" // -------------------------------- CBotProgram::AddFunction("show", rShow, cShow); @@ -323,7 +336,7 @@ BOOL CTstCBotApp::InitInstance() /////////////////////////////////// -// définie la classe globale CPoint +// d�finie la classe globale CPoint // -------------------------------- CBotClass* m_pClassPoint; @@ -336,8 +349,8 @@ BOOL CTstCBotApp::InitInstance() // ajoute le constructeur pour cette classe m_pClassPoint->AddFunction("CPoint", rCPoint, cCPoint); - // ajoute la méthode Opposé - m_pClassPoint->AddFunction("Opposé", rOppose, cOppose); + // ajoute la m�thode Oppos� + m_pClassPoint->AddFunction("Oppos�", rOppose, cOppose); ////////////////////////////////////////////////////////////////// @@ -348,7 +361,7 @@ BOOL CTstCBotApp::InitInstance() CBotStringArray Liste; p->Compile(" public void MonProgram( ) { show (\"mon programme\") ;}", Liste ); - // l'objet n'est pas détruit et plus référencé + // l'objet n'est pas d�truit et plus r�f�renc� // je sais c'est pas bien -- cgit v1.2.3-1-g7c22