自学教程：C++ sq_pushbool函数代码示例

_MEMBER_FUNCTION_IMPL(xml, constructor){    const char * filename;    sq_getstring(pVM, -1, &filename);    if(filename)    {        CXML * pXML = new CXML();        String strFileName(filename);        SharedUtility::RemoveIllegalCharacters(strFileName);        String strPath(SharedUtility::GetAbsolutePath("files/%s", strFileName.Get()));        pXML->load(strPath);        if(!pXML || SQ_FAILED(sq_setinstance(pVM, pXML)))        {            CLogFile::Print("Failed to load the xml.");            SAFE_DELETE(pXML);            sq_pushbool(pVM, false);            return 1;        }        _SET_RELEASE_HOOK(xml);        sq_pushbool(pVM, true);        return 1;    }    sq_pushbool(pVM, false);    return 1;}

_MEMBER_FUNCTION_IMPL(timer, isActive){	CScriptTimer * pTimer = sq_getinstance<CScriptTimer *>(pVM);	if(!pTimer)	{		CLogFile::Print("Failed to get the timer instance.");		sq_pushbool(pVM, false);		return 1;	}	if(CScriptTimerManager::GetInstance()->contains(pTimer))	{		if(pTimer->IsDead())		{			sq_setinstance(pVM, NULL);			sq_pushbool(pVM, false);			return 1;		}		sq_pushbool(pVM, true);		return 1;	}	sq_pushbool(pVM, false);	return 1;}

_MEMBER_FUNCTION_IMPL(timer, constructor){	// Check the param count	CHECK_PARAMS_MIN("timer", 3);	//	if( sq_gettype( pVM, 2 ) != OT_NATIVECLOSURE )		CHECK_TYPE("timer", 1, 2, OT_CLOSURE);	// Check the params	CHECK_TYPE("timer", 2, 3, OT_INTEGER);	CHECK_TYPE("timer", 3, 4, OT_INTEGER);	SQInteger iInterval = 0;	SQInteger iRepeations = 0;	// Get the params	sq_getinteger( pVM, 3, &iInterval );	sq_getinteger( pVM, 4, &iRepeations );	// Invalid repeations?	if( iRepeations < -1 || iRepeations == 0 )	{		sq_pushbool( pVM, false );		return 1;	}	// Get the timer end function	SQObjectPtr pFunction = stack_get( pVM, 2 );	// Create the arguments	CSquirrelArguments * pArguments = new CSquirrelArguments( pVM, 5 );	// Get the current script instance#ifdef _CLIENT	CSquirrel * pScript = pCore->GetClientScriptingManager()->GetScriptingManager()->Get( pVM );#else	CSquirrel * pScript = pCore->GetScriptingManager()->Get( pVM );#endif	// Create the timer instance	CTimer * pTimer = new CTimer( pScript, pFunction, iInterval, iRepeations, pArguments );	// Did it fail to set the timer instance?	if( SQ_FAILED( sq_setinstance( pVM, pTimer) ) )	{		// Delete the timer		SAFE_DELETE( pTimer );		sq_pushbool( pVM, false );		return 1;	}	// Add the timer into the manager	pCore->GetTimerManager()->push_back( pTimer );	sq_pushbool( pVM, true );	return 1;}

/* * Check if the sandbox is enabled */SQInteger emoRuntimeIsSandboxEnabled(HSQUIRRELVM v) {#ifdef EMO_WITH_SANDBOX    sq_pushbool(v, true);#else    sq_pushbool(v, false);#endif        return 1;}

int app_sqlang_return_boolean(HSQUIRRELVM J, int b){	if(b==SRSQLANG_FALSE)		sq_pushbool(J, SRSQLANG_FALSE);	else		sq_pushbool(J, SRSQLANG_TRUE);	return 1;}

// writeSQInteger file_put_contents(HSQUIRRELVM v) {	// function parameters	const SQChar* filename;	const SQChar* contents;	// internal structures	apr_file_t* file;	apr_size_t nbytes;	apr_status_t status;	request_rec* r = get_request_rec(v);	// for error messages	char error[120];	char errorMessage[120];	ap_log_rerror(APLOG_MARK, APLOG_DEBUG, 0, r, "file_put_contents()");	// grab filename param	if( sq_gettype(v, 2) != OT_STRING ) {		return SQ_ERROR;	}	else if( SQ_FAILED(sq_getstring(v, 2, &filename)) ) {		return SQ_ERROR;	}	// grab contents param	if( sq_gettype(v, 3) != OT_STRING ) {		return SQ_ERROR;	}	else if( SQ_FAILED(sq_getstring(v, 3, &contents)) ) {		return SQ_ERROR;	}	nbytes = strlen(contents);	ap_log_rerror(APLOG_MARK, APLOG_DEBUG, 0, r, "    file_put_contents('%s', '%s') %d", filename, contents, (int)nbytes);	if( (status = apr_file_open(&file, filename, APR_WRITE|APR_CREATE, APR_OS_DEFAULT, r->pool)) != APR_SUCCESS ) {		apr_strerror(status, error, sizeof error);		ap_log_rerror(APLOG_MARK, APLOG_DEBUG, 0, r, "    file_put_contents() failed: %s", error);		sprintf(errorMessage, "file_put_contents() failed: %s", error);		errorfunc(v, errorMessage);		sq_pushbool(v, SQFalse);	}	else if( (status = apr_file_write(file, contents, &nbytes)) != APR_SUCCESS ) {		apr_strerror(status, error, sizeof error);		ap_log_rerror(APLOG_MARK, APLOG_DEBUG, 0, r, "    file_put_contents() failed: %s", error);		sprintf(errorMessage, "file_put_contents() failed: %s", error);		errorfunc(v, errorMessage);		sq_pushbool(v, SQFalse);	}	else {		sq_pushinteger(v, nbytes);		ap_log_rerror(APLOG_MARK, APLOG_DEBUG, 0, r, "    file_put_contents() wrote %d bytes", (int)nbytes);	}	ap_log_rerror(APLOG_MARK, APLOG_DEBUG, 0, r, "file_put_contents() returning 1");	return 1;}

// readSQInteger file_get_contents(HSQUIRRELVM v) {	// function parameters	const SQChar* filename;	char* contents;	// internal structures	apr_file_t* file;	apr_finfo_t finfo;	apr_size_t nbytes;	apr_status_t status;	request_rec* r = get_request_rec(v);	// for error messages	char error[120];	char errorMessage[120];	ap_log_rerror(APLOG_MARK, APLOG_DEBUG, 0, r, "file_get_contents()");	// grab filename param	if( sq_gettype(v, 2) != OT_STRING ) {		return SQ_ERROR;	}	else if( SQ_FAILED(sq_getstring(v, 2, &filename)) ) {		return SQ_ERROR;	}	ap_log_rerror(APLOG_MARK, APLOG_DEBUG, 0, r, "    file_get_contents('%s')", filename);	if( (status = apr_file_open(&file, filename, APR_READ, APR_OS_DEFAULT, r->pool)) != APR_SUCCESS ) {		apr_strerror(status, error, sizeof error);		ap_log_rerror(APLOG_MARK, APLOG_DEBUG, 0, r, "    file_get_contents() failed: %s", error);		sprintf(errorMessage, "file_get_contents() failed: %s", error);		errorfunc(v, errorMessage);		sq_pushbool(v, SQFalse);		return 1;	}	// figure out file size and allocate enough room to read it all in	status = apr_file_info_get(&finfo, APR_FINFO_NORM, file);	nbytes = finfo.size;	ap_log_rerror(APLOG_MARK, APLOG_DEBUG, 0, r, "file_get_contents() file is %d", (int)nbytes);	contents = apr_palloc(r->pool, finfo.size);	if( (status = apr_file_read(file, contents, &nbytes)) != APR_SUCCESS ) {		apr_strerror(status, error, sizeof error);		ap_log_rerror(APLOG_MARK, APLOG_DEBUG, 0, r, "    file_get_contents() failed: %s", error);		sprintf(errorMessage, "file_get_contents() read %d bytes, but failed: %s", (int)nbytes, error);		errorfunc(v, errorMessage);		sq_pushbool(v, SQFalse);	}	else {		contents[nbytes] = '/0';		sq_pushstring(v, contents, -1);		ap_log_rerror(APLOG_MARK, APLOG_DEBUG, 0, r, "    file_get_contents() read %d bytes", (int)nbytes);	}	ap_log_rerror(APLOG_MARK, APLOG_DEBUG, 0, r, "file_get_contents() returning 1");	return 1;}

static SQInteger container_rawexists(HSQUIRRELVM v){	if(SQ_SUCCEEDED(sq_rawget(v,-2))) {		sq_pushbool(v,SQTrue);		return 1;	}	sq_pushbool(v,SQFalse);	return 1;}

// GUIImage_MEMBER_FUNCTION_IMPL(GUIImage, constructor){	const char * filename;	sq_getstring(pVM, -1, &filename);	// check file size	/*FILE* pFile = fopen(filename, "rb");	fseek(pFile, 0L, SEEK_END);	int len = ftell(pFile);	if(len == 0) {		sq_pushbool(pVM, false);		fclose(pFile);		return 1;	}	fclose(pFile);*/	// Get our GUI	CGUI * pGUI = g_pClient->GetGUI();	String szName = pGUI->GetUniqueName();	// Try to load the image	try	{		CEGUI::ImagesetManager::getSingleton().createFromImageFile(szName.C_String(), filename, "resources");		CGUIStaticImage * pImage = pGUI->CreateGUIStaticImage(CEGUI::String(szName.C_String()));				pImage->setProperty("FrameEnabled", "false");		pImage->setProperty("BackgroundEnabled", "false");		pImage->setProperty("Image", String("set:%s image:full_image", szName.C_String()).C_String());		if(!pImage || SQ_FAILED(sq_setinstance(pVM, pImage)))		{			CLogFile::Printf("Can't create GUIImage.");			sq_pushbool(pVM, false);			return 1;		}		//_SET_RELEASE_HOOK(GUIElement);		CClientScriptManager * pClientScriptManager = g_pClient->GetClientScriptManager();		pClientScriptManager->GetGUIManager()->Add(pImage, pClientScriptManager->GetScriptingManager()->Get(pVM));		SubscribeGuiEvents(pImage);		pImage->setVisible(true);		sq_pushbool(pVM, true);		return 1;	}	catch(CEGUI::Exception e)	{		// Failed to load, might not exist		CLogFile::Printf("Can't create GUIImage (%s does not exist)", filename);		sq_pushbool(pVM, false);		return 1;	}}

static SQRESULT sq_mysql_result_eof(HSQUIRRELVM v){	SQ_FUNC_VARS_NO_TOP(v);	GET_mysql_result_INSTANCE();    sq_pushstring(v, _curr_row_key, -1);    if(sq_get(v, 1) == SQ_OK){        SQ_GET_INTEGER(v, -1, curr_row);        sq_pushbool(v, curr_row < dlmysql_num_rows(self));    }	else sq_pushbool(v, SQTrue);	return 1;}

/** * TJSオブジェクトの有
C++ sq_pushnull函数代码示例
C++ sq_pop函数代码示例