c++からanglewcriptに配列を渡す手段がないため、DxlibやSeleneでイメージや曲の再生のハンドル値をangelscript側に渡す手段を変更する。手順としては以下のようになる
1.ゲームエンジン(Dxlib,Selene)を初期化する。
2.イメージと音楽をファイルから読み込みハンドル値を保持しておく。
3.angelscriptで配列を使えるように設定しておく。
"add_on/scriptarray/scriptarray.h"のヘッダとscriptarray.cppをプロジェクトに設定しておく。
4.グローバル変数にasIScriptArrayを宣言しておく。
asIScriptArray *floatArray = 0;
asIScriptArray *stringArray = 0;
5.配列を使えるようにしておく。
iRet = g_pasengine->RegisterGlobalProperty("float[] @floatArray", &floatArray); assert( iRet >= 0 );
iRet = g_pasengine->RegisterGlobalProperty("string[] @stringArray",&stringArray); assert( iRet >= 0 );
6.angelscript側にグローバルな配列（ハンドル値を保持するために使用）を宣言しておく。
angelscript側に配列の長さを変更する関数および、配列のインデックス値にハンドル値を代入するための関数
を用意しておく。
7.c++からそれらの関数を呼び出し、ハンドルをangelscript側でも使えるようにする。
とりあえずはダミーのハンドルをangelscriptに登録する方法は下記のようになる。
<form>
angelscriptで用意する関数
<textarea rows="8" cols="75" readonly="readonly">
int[] g_a(3);
string[] g_arstr(3);
void SetGlobalArrayLength( int num )
{
g_a.resize( num );
print("g_a size");
}
void SetMusicHandle( int index, int ihandle )
{
if( g_a.length() > index )
{
g_a[index] = ihandle;
}
}
void ShowGlobalArray()
{
for( uint i = 0; i < g_a.length(); i++ )
{
print(g_a[i]);
}
}
</textarea>
</form>
<form>
c++ ダミーハンドルをangelscript側に登録する処理
<textarea rows="8" cols="75" readonly="readonly">#include <iostream> // cout
#include <assert.h> // assert()
#include <angelscript.h>
#include "../../angel_incluce_lib/angel_include/add_on/scriptstring/scriptstring.h"
#include "../../angel_incluce_lib/angel_include/add_on/contextmgr/contextmgr.h"
#include "../../angel_incluce_lib/angel_include/add_on/scriptstdstring/scriptstdstring.h"
#include "../../angel_incluce_lib/angel_include/add_on/scriptbuilder/scriptbuilder.h"
#include "../../angel_incluce_lib/angel_include/add_on/scriptany/scriptany.h"
#include "../../angel_incluce_lib/angel_include/add_on/scriptarray/scriptarray.h"
#include <crtdbg.h>
#include <conio.h> // kbhit(), getch()
#include <windows.h> // timeGetTime()
#include "AngelFuncMap.h"
#include "CAngelScriptMgr.h"
using namespace std;
#define OK 0
#define NG -1
// Some global variables that the script can access
// c++の関数だがscriptからもアクセス可能
asUINT g_ans;
//global cpp
asIScriptEngine *g_pasengine;
asIScriptModule *g_pasmod;
asIScriptContext *g_pasctx;
CContextMgr g_contextMgr;
//CAngelFuncMap g_angelmap;
//angelscript内で配列を使うため
asIScriptArray *floatArray = 0;
asIScriptArray *stringArray = 0;
//prototype
int LoadScript( char *ScriptName);
void MessageCallback(const asSMessageInfo *msg, void *param);
void print(string &msg);
void print(int num);
void print(asUINT num);
void print(float num);
void print(double num);
int RegisterProperty();
int InitializeAngelEngine();
int ExcuteAngelFunction( char *chFuncID,long &lret,int arg1 = -1,int arg2 = -1);
int BuildAngelScript();
//読み込むファイルリスト
char *AngleScriptNameList[] =
{
{"test1.as"},
{"test2.as"},
{"test3.as"},
};
//読み込むangelscriptのファイル数
#define AS_SCRIPT_NUM (sizeof(AngleScriptNameList)/sizeof(AngleScriptNameList[0]) )
//angle scritptないで使用するmethodがふえたらここに追加
//別々のanglescriptにある関数でもここにはすべて記述する。 chDescriptionにはどのファイル名で定義してあるかも記述しておく
//asIScriptContextのmethodでangelscriptから戻り値を受け取ることができるのは以下の型のみ
//chFuncIDは戻り値の型が違う場合c++側で再コンパイルが必要
//GetReturnAddress(),GetReturnByte(),GetReturnDouble()
//GetReturnDWord(),GetReturnFloat(),GetReturnObject()
//GetReturnQWord(),GetReturnWord()
struct _as_FuncList
{
int iID; //index、for,while 用途
char *chFuncID; //angle scriptのasIScriptContext->Prepare(funcId); のfuncIdに指定する文字列
char *chDescription; //angle script用の関数説明用
}as_FuncList[] =
{
{0,"float test1()","print test file:test1.as"},
//{1,"void SetHandle(float farg1 )","print test file:test1.as compile:ok"},
// {1,"void SetImgHandle(int[] &inout a,int iLen )","print test file:test1.as"},
{1,"void SetImgHandle1(int[] &inout a)","print test file:test1.as"},
//{1,"void SetImgHandle2(int[] &inout a,int Len )","print test file:test1.as"},
{2,"float TestSetArgAddressInt( int a, int b)","print test file:test1.as"},
{3,"float TestSetArgAddressFloat( float a, float b)","print test file:test1.as"},
{4,"void TestSetArgAddress(float &out outValue)","print test file:test1.as"},
{5,"float test2()"," file:test2.as"},
{6,"float TestCorutine()","corotine test file::test3.as"},
{7,"void SetGlobalArrayLength( int num )"," test file::test1.as"},
{8,"void SetMusicHandle( int index, int ihandle )"," test file::test1.as"},
{9,"void ShowGlobalArray()"," test file::test1.as"},
};
//anglesciprtで使用する関数の数
#define AS_FUNC_NUM (sizeof(as_FuncList)/sizeof(as_FuncList[0]) )
// C++ code
class CMyObject
{
public:
int property;
};
// -----------------Main class declaration array test -------------------------------
class MyClass {
public:
int variable[128];
};
// C++ class instance
MyClass mc;
// Getter proxy
int Proxy_get_variable(const MyClass * myclass, int index)
{
if ((index) > sizeof(myclass->variable) / sizeof(myclass->variable[0]))
asGetActiveContext()->SetException("Index out of bounds!");
return myclass->variable[index];
}
// Setter proxy
void Proxy_set_variable(MyClass * myclass, const int& newint, int index)
{
if ((index) > sizeof(myclass->variable) / sizeof(myclass->variable[0]))
asGetActiveContext()->SetException("Index out of bounds!");
myclass->variable[index] = newint;
}
// -----------------Main class declaration array test -------------------------------
//------------------other array------------------------------------------
// Struct definition
struct MyStruct {
int health;
char name[32];
//int handle[10];
};
// Struct instance
MyStruct mystruct;
// Getter proxy function
static string Proxy_get_name(const MyStruct * ms) {
int len = strnlen(ms->name, 32);
string name(ms->name, len);
return name;
}
// Setter proxy function
void Proxy_set_name(MyStruct * ms, const string& new_name) {
memset(ms->name, 0, 32);
int len = new_name.length();
if (len > 32) len = 32;
if (len > 0) memcpy(ms->name, new_name.c_str(), len);
}
//// Getter proxy classでint[]の型を持つhandleは登録できない。
//static int Proxy_get_handle(const MyStruct * myclass, int index)
//{
// if ((index) > sizeof(myclass->handle) / sizeof(myclass->handle[0]))
// asGetActiveContext()->SetException("Index out of bounds!");
// return myclass->handle[index];
//}
//
//// Setter proxy
//void Proxy_set_handle(MyStruct * myclass, const int& newint, int index)
//{
// if ((index) > sizeof(myclass->handle) / sizeof(myclass->handle[0]))
// asGetActiveContext()->SetException("Index out of bounds!");
// myclass->handle[index] = newint;
//}
//------------------other array------------------------------------------
//angel script用のファイルを読み込む
//使用するスクリプトはここですべてよみこんでおく
int LoadScript( char *ScriptName)
{
int iRet = OK;
FILE *f = fopen(ScriptName, "rb");
if ( f == NULL )
{
printf(" file not found\n");
return NG;
}
fseek(f, 0, SEEK_END);
//file sizeを取得する
int len = ftell(f);
fseek(f, 0, SEEK_SET);
std::string script;
script.resize(len);
size_t c = fread(&script[0], len, 1, f);
fclose(f);
//asIScriptModule *mod = engine->GetModule(0, asGM_ALWAYS_CREATE);
iRet = g_pasmod->AddScriptSection( ScriptName, &script[0], len);
return iRet;
}
void MessageCallback(const asSMessageInfo *msg, void *param)
{
const char *type = "ERR ";
if( msg->type == asMSGTYPE_WARNING )
type = "WARN";
else if( msg->type == asMSGTYPE_INFORMATION )
type = "INFO";
printf("%s (%d, %d) : %s : %s\n", msg->section, msg->row, msg->col, type, msg->message);
}
// Print the script string to the standard output stream
//scriptで使用するprint系関数のcpp側の定義
void print(string &msg)
{
//printf("%s", msg.c_str());
std::cout << msg << std::endl;
}
void print(int num)
{
std::cout << num << std::endl;
}
void print(asUINT num)
{
std::cout << num << std::endl;
}
void print(float num)
{
std::cout << num << std::endl;
}
void print(double num)
{
std::cout << num << std::endl;
}
//c++,angelscriptない両方で使える関数を登録する（c++側はグローバル変数にする)
//用途としてangelscriptでの計算結果をc++側で受け取る、必要な設定値をC++からangelscriptにわたす
//
int RegisterProperty()
{
int iRet = OK;
iRet = g_pasengine->RegisterGlobalProperty("int g_ans", &g_ans); assert( iRet >= 0 );
iRet = g_pasengine->RegisterGlobalProperty("float[] @floatArray", &floatArray); assert( iRet >= 0 );
iRet = g_pasengine->RegisterGlobalProperty("string[] @stringArray",&stringArray); assert( iRet >= 0 );
return iRet;
}
//angelscript側で使用するクラス定義をする
//classメンバの登録はクラスを登録後にRegisterObjectPropertyを呼びだす
int RegisterMyClass()
{
int iRet = OK;
//CMyObject test;
iRet = g_pasengine->RegisterObjectType("object", sizeof(CMyObject), asOBJ_VALUE | asOBJ_POD | asOBJ_APP_CLASS); assert( iRet >= 0 );
if( iRet < 0 )
{
return iRet;
}
iRet = g_pasengine->RegisterObjectProperty("object", "int property", offsetof(CMyObject, property)); assert( iRet >= 0 );
// -----------------Main class declaration array test ng-------------------------------
//iRet = g_pasengine->RegisterObjectType("MyClass", sizeof(CMyObject), asOBJ_VALUE | asOBJ_POD | asOBJ_APP_CLASS); assert( iRet >= 0 );
//iRet = g_pasengine->RegisterObjectProperty("MyClass", "int variable[128]", offsetof(MyClass,variable)); assert( iRet >= 0 );
iRet = g_pasengine->RegisterObjectType("MyClass", 0, asOBJ_REF | asOBJ_NOHANDLE); assert( iRet >= 0 );
// errorになる
//iRet = g_pasengine->RegisterObjectProperty("MyClass", "int[] variable", offsetof(MyClass,variable)); assert( iRet >= 0 );
//[variable is not a member of MyClass]となる
iRet = g_pasengine->RegisterObjectMethod("MyClass", "int get_variable(int index)", asFUNCTION(Proxy_get_variable), asCALL_CDECL_OBJFIRST); assert( iRet >= 0 );
//iRet = g_pasengine->RegisterObjectMethod("MyClass", "void set_variable(const string &in, int index)", asFUNCTION(Proxy_set_variable), asCALL_CDECL_OBJFIRST); assert( iRet >= 0 );
iRet = g_pasengine->RegisterObjectMethod("MyClass", "void set_variable(const int &in, int index)", asFUNCTION(Proxy_set_variable), asCALL_CDECL_OBJFIRST); assert( iRet >= 0 );
iRet = g_pasengine->RegisterGlobalProperty("MyClass mc", &mc); assert( iRet >= 0 );
// -----------------Main class declaration array test ng-------------------------------
//------------------other array ok------------------------------------------
//memcpy(mystruct.name, "IT WORKS!!!\x00", 12);
iRet = g_pasengine->RegisterObjectType("MyObject", 0, asOBJ_REF | asOBJ_NOHANDLE); assert( iRet >= 0 );
iRet = g_pasengine->RegisterObjectProperty("MyObject", "int health", offsetof(MyStruct, health)); assert( iRet >= 0 );
iRet = g_pasengine->RegisterObjectMethod("MyObject", "string get_name()", asFUNCTION(Proxy_get_name), asCALL_CDECL_OBJFIRST); assert( iRet >= 0 );
iRet = g_pasengine->RegisterObjectMethod("MyObject", "void set_name(const string &in)", asFUNCTION(Proxy_set_name), asCALL_CDECL_OBJFIRST); assert( iRet >= 0 );
// int handle[10]がangelscript側で使えない 何かが違う get_handle,set_handle(const string &in,int index)も
// ためしたけど無理だったなんでcharの場合だけできるか理由がわからない。
//iRet = g_pasengine->RegisterObjectProperty("MyObject", "int[] handle", offsetof(MyStruct, handle)); assert( iRet >= 0 );
//iRet = g_pasengine->RegisterObjectMethod("MyObject", "int get_handle(int index)", asFUNCTION(Proxy_get_handle), asCALL_CDECL_OBJFIRST); assert( iRet >= 0 );
//iRet = g_pasengine->RegisterObjectMethod("MyObject", "void set_handle(const int &in, int index)", asFUNCTION(Proxy_set_handle), asCALL_CDECL_OBJFIRST); assert( iRet >= 0 );
iRet = g_pasengine->RegisterGlobalProperty("MyObject Obj2", &mystruct); assert( iRet >= 0 );
//------------------other array ok------------------------------------------
return iRet;
}
//angelscriptengineの初期化
int InitializeAngelEngine()
{
int iRet = OK;
// Create the script engine
g_pasengine = asCreateScriptEngine(ANGELSCRIPT_VERSION);
// Set the message callback to receive information on errors in human readable form.
// It's recommended to do this right after the creation of the engine, because if
// some registration fails the engine may send valuable information to the message
// stream.
//shift-jisを使えるようにEnginePropertyを設定する。
g_pasengine->SetEngineProperty(asEP_SCRIPT_SCANNER ,0);
iRet = g_pasengine->SetMessageCallback(asFUNCTION(MessageCallback), 0, asCALL_CDECL); assert( iRet >= 0 );
if( iRet < 0 )
{
printf("failed Message Callback\n" );
return NG;
}
g_pasmod = g_pasengine->GetModule(0, asGM_ALWAYS_CREATE);
if( iRet < 0 )
{
printf("failed GetModule\n" );
return NG;
}
// AngelScript doesn't have a built-in string type, as there is no definite standard
// string type for C++ applications. Every developer is free to register it's own string type.
// The SDK do however provide a standard add-on for registering a string type, so it's not
// necessary to implement the registration yourself if you don't want to.
RegisterStdString(g_pasengine);
//anglescript側でprint(string,int,float,int,uint)でそれぞれの値を表示できるようにする。print系は複数
//iRet = g_pasengine->RegisterGlobalFunction("void print(const string &in)", asFUNCTION(print), asCALL_CDECL); assert( iRet >= 0 );
iRet = g_pasengine->RegisterGlobalFunction("void print(const string &in)", asFUNCTIONPR(print, (string &in), void), asCALL_CDECL); assert( iRet >= 0 );
iRet = g_pasengine->RegisterGlobalFunction("void print(int)", asFUNCTIONPR(print, (int), void), asCALL_CDECL); assert( iRet >= 0 );
iRet = g_pasengine->RegisterGlobalFunction("void print(float)", asFUNCTIONPR(print, (float), void), asCALL_CDECL); assert( iRet >= 0 );
iRet = g_pasengine->RegisterGlobalFunction("void print(uint)", asFUNCTIONPR(print, (asUINT), void), asCALL_CDECL); assert( iRet >= 0 );
iRet = g_pasengine->RegisterGlobalFunction("void print(double)", asFUNCTIONPR(print, (double), void), asCALL_CDECL); assert( iRet >= 0 );
// Add the support for co-routines ContextMgr test
//g_contextMgr.RegisterCoRoutineSupport( g_pasengine );
//g_contextMgr.RegisterThreadSupport( g_pasengine );
//RegisterScriptString( g_pasengine );
RegisterScriptAny( g_pasengine );
// Add the support for co-routines
g_contextMgr.RegisterCoRoutineSupport(g_pasengine);
return iRet;
}
//これだとLoadScriptに成功しても、どのangelscriptでエラーになったかわからない
//scriptのロード、ビルドは一緒にした方がいい
int BuildAngelScript()
{
int iRet = OK;
iRet = g_pasmod->Build();
if( iRet < 0 )
{
printf("angel script build failed\n" );
return NG;
}
return iRet;
}
//angelscript内の関数に時間がかかる場合はabortを投げて例外終了させる
void LineCallback(asIScriptContext *ctx, DWORD *timeOut)
{
// If the time out is reached we abort the script
if( *timeOut < timeGetTime() )
ctx->Abort();
// It would also be possible to only suspend the script,
// instead of aborting it. That would allow the application
// to resume the execution where it left of at a later
// time, by simply calling Execute() again.
}
int PrepareExcute( char *chFuncID )
{
int iRet = OK;
int funcId = g_pasmod->GetFunctionIdByDecl(chFuncID);
if( funcId < 0 )
{
// The function couldn't be found. Instruct the script writer
// to include the expected function in the script.
printf("The script must have the function %s. Please add it and try again.\n",chFuncID);
return NG;
}
// Create our context, prepare it, and then execute
g_pasctx = g_pasengine->CreateContext();
//anglescriptの関数を実行するための準備
iRet = g_pasctx->Prepare(funcId); assert( iRet >= 0 );
return iRet;
}
void ShowErrorMsg( int iRet )
{
//angelscript内の関数に実行した場合、エラー表示を行う
if(iRet != asEXECUTION_FINISHED )
{
// The execution didn't finish as we had planned. Determine why.
if( iRet== asEXECUTION_ABORTED )
{
cout << "The script was aborted before it could finish. Probably it timed out." << endl;
}
else if( iRet == asEXECUTION_EXCEPTION )
{
cout << "The script ended with an exception." << endl;
// Write some information about the script exception
int funcID = g_pasctx->GetExceptionFunction();
asIScriptFunction *func = g_pasengine->GetFunctionDescriptorById(funcID);
cout << "func: " << func->GetDeclaration() << endl;
cout << "modl: " << func->GetModuleName() << endl;
cout << "sect: " << func->GetScriptSectionName() << endl;
cout << "line: " << g_pasctx->GetExceptionLineNumber() << endl;
cout << "desc: " << g_pasctx->GetExceptionString() << endl;
func->Release();
}
else
{
cout << "The script ended for some unforeseen reason (" << iRet << ")." << endl;
}
}
}
int ExcuteAngelFunction( char *chFuncID,float &fretscript)
{
int iRet = OK;
int iTypeID = -1;
float fRet = -1;
int iReturn = -1;
iRet = PrepareExcute( chFuncID ); assert( iRet >= 0 );
// We don't want to allow the script to hang the application, e.g. with an
// infinite loop, so we'll use the line callback function to set a timeout
// that will abort the script after a certain time. Before executing the
// script the timeOut variable will be set to the time when the script must
// stop executing.
DWORD timeOut;
iRet = g_pasctx->SetLineCallback(asFUNCTION(LineCallback), &timeOut, asCALL_CDECL);
if( iRet < 0 )
{
cout << "Failed to set the line callback function." << endl;
return NG;
}
// Set the timeout before executing the function. Give the function 1 sec
// to return before we'll abort it.
timeOut = timeGetTime() + 1000;
//angel scriptの実行
iRet = g_pasctx->Execute();
if( iRet == asEXECUTION_FINISHED )
{
// Retrieve the return value from the context
//script側ではfloat を返す時は末尾にf(10.12f,3.14f)をつける。(double,floatかを区別させるため）
//angelscript側ではこの形でintの戻り値をかえせないので、g_ansを使って取得する。
float returnValue = g_pasctx->GetReturnFloat();
fretscript = returnValue;
cout << "The script function returned: " << returnValue << endl;
cout << "The script function calc: " << g_ans << endl;
}
else
{
ShowErrorMsg( iRet );
}
return iRet;
}
//agelscriptの関数の引数のセットテスト用関数
int ExcuteAngelFunction2( char *chFuncID,float &fretscript)
{
int iRet = OK;
int iTypeID = -1;
float fRet = -1;
int iReturn = -1;
iRet = PrepareExcute( chFuncID ); assert( iRet >= 0 );
// We don't want to allow the script to hang the application, e.g. with an
// infinite loop, so we'll use the line callback function to set a timeout
// that will abort the script after a certain time. Before executing the
// script the timeOut variable will be set to the time when the script must
// stop executing.
DWORD timeOut;
iRet = g_pasctx->SetLineCallback(asFUNCTION(LineCallback), &timeOut, asCALL_CDECL);
if( iRet < 0 )
{
cout << "Failed to set the line callback function." << endl;
return -1;
}
// Add the support for co-routines
//g_pasctx->RegisterCoRoutineSupport(g_pasengine);
//contextMgr.RegisterCoRoutineSupport(engine)
//これはできる。
//float f = 1.3f;
//iRet = g_pasctx->SetArgFloat( 0,f ); assert( iRet >= 0 );
//asDWORD len = 3;
//こちらができない
//iRet = g_pasctx->SetArgAddress(0,&artest); assert( iRet >= 0 );
//iRet = g_pasctx->SetArgAddress(1,(void*)len ); assert( iRet >= 0 ); //NG assert occure
//iRet = g_pasctx->SetArgAddress(1,(void*)len ); assert( iRet >= 0 ); //NG assert occure
//c++ からangelscriptの関数の引数に値を設定する 引数intの場合 ここから compile ok
//2,"float TestSetArgAddressInt( int a, int b)"
//angel script内で下記のように 定義 floatでキャストしないとエラーが発生する
//
// float TestSetArgAddressInt( int a, int b)
//{
// print("a");
// print("b");
// return float(a + b);
//}
//int a = 100;
//int b = 200;
//iRet = g_pasctx->SetArgDWord(0,a); assert( iRet >= 0 );
//iRet = g_pasctx->SetArgDWord(1,b); assert( iRet >= 0 );
//c++ からangelscriptの関数の引数に値を設定する 引数intの場合 ここから compile ok
//c++ からangelscriptの関数の引数に値を設定する 引数floatの場合 ここから compile ok
//3,"float TestSetArgAddressFloat( float a, float b)"
//float a = 10.5f;
//float b = 21.5f;
//iRet = g_pasctx->SetArgFloat(0,a); assert( iRet >= 0 );
//iRet = g_pasctx->SetArgFloat(1,b); assert( iRet >= 0 );
//c++ からangelscriptの関数の引数に値を設定する 引数floattの場合 ここから compile ok
//angelscriptの関数で引数が[in,out]参照のとき引数の戻り値を取得する。 ここから compile ok
//{4,"float TestSetArgAddress(float &out outValue)"
float fvalue = 0.0f;
iRet = g_pasctx->SetArgAddress(0,&fvalue); assert( iRet >= 0 );
// Set the timeout before executing the function. Give the function 1 sec
// to return before we'll abort it.
timeOut = timeGetTime() + 1000;
//angel scriptの実行
iRet = g_pasctx->Execute();
if( iRet == asEXECUTION_FINISHED )
{
// Retrieve the return value from the context
//script側ではfloat を返す時は末尾にf(10.12f,3.14f)をつける。(double,floatかを区別させるため）
//angelscript側ではこの形でintの戻り値をかえせないので、g_ansを使って取得する。
float returnValue = g_pasctx->GetReturnFloat();
fretscript = returnValue;
cout << "The script function returned: " << returnValue << endl;
cout << "The script function calc: " << g_ans << endl;
}
else
{
ShowErrorMsg( iRet );
}
return iRet;
}
//angelscriptの関数の引数に値を設定する場合この関数を使う、指定できる引数の数は1 or 2まで、また戻り値はlongの範囲に収まるようにする
int ExcuteAngelFunction( char *chFuncID,long &lret,int arg1,int arg2)
{
int iRet = OK;
int iTypeID = -1;
float fRet = -1;
int iReturn = -1;
iRet = PrepareExcute( chFuncID ); assert( iRet >= 0 );
// We don't want to allow the script to hang the application, e.g. with an
// infinite loop, so we'll use the line callback function to set a timeout
// that will abort the script after a certain time. Before executing the
// script the timeOut variable will be set to the time when the script must
// stop executing.
DWORD timeOut;
iRet = g_pasctx->SetLineCallback(asFUNCTION(LineCallback), &timeOut, asCALL_CDECL);
if( iRet < 0 )
{
cout << "Failed to set the line callback function." << endl;
return NG;
}
//引数が設定されている場合を登録(-1であればなにも設定していない。)
if( arg1 != -1 )
{
iRet = g_pasctx->SetArgDWord( 0,arg1 ); assert( iRet >= 0 );
}
if( arg2 != -1 )
{
iRet = g_pasctx->SetArgDWord( 1,arg2 ); assert( iRet >= 0 );
}
// Set the timeout before executing the function. Give the function 1 sec
// to return before we'll abort it.
timeOut = timeGetTime() + 1000;
//angel scriptの実行
iRet = g_pasctx->Execute();
if( iRet == asEXECUTION_FINISHED )
{
// Retrieve the return value from the context
//script側ではfloat を返す時は末尾にf(10.12f,3.14f)をつける。(double,floatかを区別させるため）
//angelscript側ではこの形でintの戻り値をかえせないので、g_ansを使って取得する。
//float returnValue = g_pasctx->GetReturnFloat();
lret = g_pasctx->GetReturnDWord();
//fretscript = returnValue;
cout << "The script function returned: " << lret << endl;
cout << "The script function calc: " << g_ans << endl;
}
else
{
ShowErrorMsg( iRet );
}
return iRet;
}
//angelscriptで登録できた関数のみCAngelFuncMapで管理する
//0だとすべての定義した関数は登録できた、それ以外は登録に失敗した関数数が返却される
int CreateAngelFuncMap( CAngelFuncMap &angelfuncmap)
{
int ifailregister = 0;
for( int i = 0; i < AS_FUNC_NUM;i++)
{
//int funcId = g_pasmod->GetFunctionIdByDecl(chFuncID);
int iFuncID = g_pasmod->GetFunctionIdByDecl( as_FuncList[i].chFuncID );
if( iFuncID < 0 )
{
ifailregister++;
}
angelfuncmap.SetFuncID( as_FuncList[i].chFuncID,iFuncID );
}
return ifailregister;
}
int main( int argc,char *argv[])
{
int iRet = NG;
float fret = 0.0f;
CContextMgr *pcMgr = new CContextMgr();
int iNum = AS_FUNC_NUM;
CAngelFuncMap angelmap;
g_ans = 0;
//printf("c++,angle global property g_ans:%d\n",g_ans );
//printf("as_func_num:%d\n",iNum );
//printf("script num:%d\n",AS_SCRIPT_NUM );
iRet = InitializeAngelEngine();
if( iRet < 0 )
{
printf("angel script initialize failed\n" );
return NG;
}
iRet = RegisterProperty();
if( iRet < 0 )
{
printf("angel script register property failed\n" );
return NG;
}
iRet = RegisterMyClass();
if( iRet < 0)
{
return iRet;
}
for( int i = 0; i < AS_SCRIPT_NUM;i++ )
{
iRet = LoadScript( AngleScriptNameList[i] );
if( iRet < 0 )
{
printf("load failed angel script %s\n",AngleScriptNameList[i] );
}
}
//読み込んだangelscriptをbuildする
iRet = BuildAngelScript();
if( iRet < 0 )
{
return NG;
}
ExcuteAngelFunction( as_FuncList[0].chFuncID,fret );
//ExcuteAngelFunction2( as_FuncList[1].chFuncID,fret ); //ng 配列をangelscript側に渡せない
//ExcuteAngelFunction2( as_FuncList[2].chFuncID,fret ); //ok
//ExcuteAngelFunction2( as_FuncList[3].chFuncID,fret ); //ok
ExcuteAngelFunction2( as_FuncList[4].chFuncID,fret );
//{7,"void SetGlobalArrayLength( int num )"," test file::test1.as"},
//{8,"void SetMusicHandle( int index, int ihandle )"," test file::test1.as"},
//{9,"void ShowGlobalArray()"," test file::test1.as"},
long lret = -1;
int itest[5] = {100,101,102,103,104};
ExcuteAngelFunction( as_FuncList[7].chFuncID,lret,5 );
for( int i = 0; i < 5; i++ )
{
ExcuteAngelFunction( as_FuncList[8].chFuncID,lret,i,itest[i] );
}
ExcuteAngelFunction( as_FuncList[9].chFuncID,lret );
//printf("check property g_ans:%d\n",g_ans );
////printf("check mystruct.name:%s\n",mystruct.name );
//ExcuteAngelFunction( as_FuncList[1].chFuncID,fret );
////contestmgr check
//int test = CreateAngelFuncMap(angelmap );
//int id1 = angelmap.GetFuncID( as_FuncList[0].chFuncID );
//int id2 = angelmap.GetFuncID( as_FuncList[1].chFuncID );
//int inum = angelmap.GetFuncNum();
//angelmap.DisplayAllFuncMap();
//
//
//g_contextMgr.AddContext(g_pasengine,angelmap.GetFuncID( as_FuncList[2].chFuncID ));
//for(;;)
//{
// // Check if any key was pressed
// if( kbhit() )
// {
// g_contextMgr.AbortAll();
// break;
// }
// // Allow the contextManager to determine which script to execute next
// g_contextMgr.ExecuteScripts();
// // Slow it down a little so that we can see what is happening
// Sleep(100);
//}
//angle scriptのcontext,engineの解放
//g_pasctx->Release();
//g_pasengine->Release();
CAngelScriptMgr *ptest = new CAngelScriptMgr();
int num = ptest->GetAngelFuncNum();
ptest->Excute( 0, fret );
printf("%f\n", fret );
//delete ptest;
CMoveObject *pobj = new CMoveObject();
float ret;
//第１引数関数番号(CAngelScriptMgr.ccpのAngelFuncListのインデックス)、第２引数 angelscriptの戻り値
//登録した関数は基本的にすべてコンパイルできるようにするので0～登録した関数数
ptest->Excute( 0, ret );
ptest->Excute( 0, ret );
ptest->Excute( 2, pobj );
ptest->Excute( 2, pobj );
ptest->Excute( 2, pobj );
if( pobj != NULL )
{
delete pobj;
pobj = NULL;
}
if( ptest != NULL )
{
delete ptest;
ptest = NULL;
}
return 0;
}
</textarea>
</form>
ダミーハンドルを設定いるのは下記の部分
long lret = -1;
int itest[5] = {100,101,102,103,104};
ExcuteAngelFunction( as_FuncList[7].chFuncID,lret,5 );
for( int i = 0; i < 5; i++ )
{
ExcuteAngelFunction( as_FuncList[8].chFuncID,lret,i,itest[i] );
}
ExcuteAngelFunction( as_FuncList[9].chFuncID,lret );
