lineage2/l2-unlegits
2
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Initial MSVC 2008 projects workspace

Browse Source
This commit is contained in:
alexey.min
2012-02-01 05:25:08 +00:00
commit 03de3bdc95
1446 changed files with 476853 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

138
l2ooghelper/SE_funcs_chat.cpp Normal file
View File

@@ -0,0 +1,138 @@
#include "stdafx.h"
#include "Logger.h"
#include "SE_funcs.h"
int l2c_say( lua_State *L )
{
int nArgs = lua_gettop( L );
if( nArgs == 0 ) return 0;
IL2Client *cl = L2C_func_getClient( L );
if( !cl ) return 0;
size_t len = 0;
double dchannel = lua_tonumber( L, 1 );
unsigned int ichannel = (unsigned int)dchannel;
const char *mes = luaL_checklstring( L, 2, &len );
//log_error_np( LOG_OK, "SE: l2c_say: %u len, [%s], channel %d\n", len, mes, ichannel );
wchar_t *text = (wchar_t *)malloc( len*2 + 2 );
if( text )
{
memset( text, 0, len*2+2 );
MultiByteToWideChar( CP_ACP, 0, mes, -1, text, len );
cl->game_Say( ichannel, text );
free( text );
}
return 0;
}
int l2c_sayPm( lua_State *L )
{
int nArgs = lua_gettop( L );
if( nArgs < 2 ) return 0;
IL2Client *cl = L2C_func_getClient( L );
if( !cl ) return 0;
size_t lenmes = 0;
size_t lento = 0;
const char *mes = luaL_checklstring( L, 1, &lenmes );
const char *to = luaL_checklstring( L, 2, &lento );
//log_error_np( LOG_OK, "SE: l2c_say_pm: [%s] [%s]\n", mes, to );
wchar_t *text = (wchar_t *)malloc( lenmes*2 + 2 );
if( text )
{
wchar_t tto[64] = {0};
memset( text, 0, lenmes*2+2 );
memset( tto, 0, sizeof(tto) );
MultiByteToWideChar( CP_ACP, 0, mes, -1, text, lenmes );
MultiByteToWideChar( CP_ACP, 0, to, -1, tto, 63 );
tto[63] = 0;
cl->game_SayPm( text, tto );
free( text );
}
return 0;
}
// l2c_npcDlg( string bypassActionName )
int l2c_npcDlg( lua_State *L )
{
int nArgs = lua_gettop( L );
if( nArgs < 1 ) return 0;
IL2Client *cl = L2C_func_getClient( L );
if( !cl ) return 0;
const char *abypass = lua_tolstring( L, 1, NULL );
if( !abypass ) return 0;
wchar_t bypass[256] = {0};
MultiByteToWideChar( CP_ACP, 0, abypass, -1, bypass, 255 );
if( bypass[0] == 0 ) return 0;
//
unsigned int last_npc_html_oid = 0;
wchar_t *last_html = NULL;
last_html = cl->get_last_NPC_HTML( &last_npc_html_oid );
if( !last_html || (last_npc_html_oid == 0) ) return 0;
// check current target - must match last NPC HTML oid
UserInfo *pusr = cl->get_UserInfo();
if( pusr->targetObjectID != last_npc_html_oid )
{
log_error( LOG_ERROR, "SE: NPCDLG: Tried to talk to NPC that is not on target! NPC must be targeted.\n" );
return 0;
}
//
wchar_t strtofind[512] = {0};
swprintf( strtofind, 511, L">%s</a>", bypass );
//log_error_np( LOG_OK, "NPCDLG: to find: [%S]\n", strtofind );
wchar_t *ps = wcsstr( last_html, strtofind );
if( !ps )
{
char areq[256] = {0};
WideCharToMultiByte( CP_ACP, 0, bypass, -1, areq, 255, NULL, NULL );
log_error( LOG_ERROR, "SE: not found requested NPCDLG [%s]\n", areq );
return 0;
}
while( (ps > last_html) && ((*ps) != L'<') ) ps--;
if( ps == last_html )
{
log_error( LOG_ERROR, "SE: not found bypass link to requested NPCDLG\n" );
return 0;
}
//log_error_np( LOG_OK, "NPCDLG: found: [%S]\n", ps );
wchar_t bypassStr[256];
wchar_t *pbypassStr = bypassStr;
(*pbypassStr) = 0;
// now find first occurence of "
while( (*ps) != L'\"' ) ps++;
ps++;
// now copy till second "
while( (*ps) != L'\"' )
{
(*pbypassStr) = (*ps);
ps++;
pbypassStr++;
(*pbypassStr) = 0;
}
log_error_np( LOG_OK, "NPCDLG: got bypassStr [%S]\n", bypassStr );
cl->game_SendBypass( bypassStr );
//
return 0;
}
// l2c_npcDlgClear()
int l2c_npcDlgClear( lua_State *L )
{
IL2Client *cl = L2C_func_getClient( L );
if( !cl ) return 0;
cl->clear_last_NPC_HTML();
return 0;
}
// bool l2c_npcDlgExists()
int l2c_npcDlgExists( lua_State *L )
{
IL2Client *cl = L2C_func_getClient( L );
if( !cl )
{
lua_pushboolean( L, 0 );
return 0;
}
wchar_t *html = cl->get_last_NPC_HTML( NULL );
lua_pushboolean( L, html ? 1 : 0 );
return 1;
}