SLIC-Reference : CreateWonder
CTP2 Bureau
The Modding
Knowledgebase
Apolyton CTP2 forums
Apolyton CTP2 archives
Source Code Project SVN

SLIC-Reference : : CreateWonder  

Arguments: city, wonder Type: void

Creates a wonder of the specified type in the city.

The advantage of using the CreateWonder function rather than the event is that the function will not clear stored production, and the wonder movie will not be triggered.

tested   working  

Source:

//----------------------------------------------------------------------------
//
// Authored   : Maq
//
// Name       : Slic_CreateWonder
//
// Description: Function to create a wonder in a city.
//
// Parameters : SlicArg 0: city
//		SlicArg 1: wonderdb index
//
// Globals    : -
//
// Returns    : SFN_ERROR		: execution result
//
//----------------------------------------------------------------------------
SFN_ERROR Slic_CreateWonder::Call(SlicArgList *args)
{
	if (args->Count() != 2) {
		return SFN_ERROR_NUM_ARGS;
	}

	Unit city;
	sint32 type;
	if(!args->GetCity(0, city)) {
		return SFN_ERROR_TYPE_BUILTIN;
	}

	if(!args->GetInt(1, type))
		return SFN_ERROR_TYPE_ARGS;

	if(!g_theUnitPool->IsValid(city)) {
		return SFN_ERROR_OK;
	}

	if(type < 0 || type >= g_theWonderDB->NumRecords())
		return SFN_ERROR_OUT_OF_RANGE;

	city.CD()->AddWonder(type);
	return SFN_ERROR_OK;

}

Author: Maq

Information last updated by Maquiladora on 17.07.2009

User Comments:

Using this form you may add your own observations concerning the above item, e.g. additional hints for usage, limitations, oddities etc. Please note this is not the place for asking questions or carrying out discussions about modding - please refer to the Apolyton CTP2 Modification Forum on that purpose.

Subject / Title*:
Text:*
(A maximum of characters left)
Your name:*
Your website (URL):

*) Required fields

Error including libraries: Can't locate config.cfg in @INC (@INC contains: /etc/perl /usr/local/lib/x86_64-linux-gnu/perl/5.28.1 /usr/local/share/perl/5.28.1 /usr/lib/x86_64-linux-gnu/perl5/5.28 /usr/share/perl5 /usr/lib/x86_64-linux-gnu/perl/5.28 /usr/share/perl/5.28 /usr/local/lib/site_perl /usr/lib/x86_64-linux-gnu/perl-base) at /home/www/ctp2.info/cgi-bin/comments.cgi line 4. Make sure they exist, permissions are set properly, and paths are set correctly.
  Administration
This site is currently maintained by: BureauBert (Webmaster)  Maquiladora (Manager)  Legal Notice: Legal Notice Statistics: 82005 unique users since 02.05.2004 (» Site Statistics) Hosted by: WebhostOne
Share this page:  VK Facebook Twitter LiveJournal OK MR Google+ LinkedIn tumblr Pinterest Blogger Digg Evernote