Bavka Torrents
Would you like to react to this message? Create an account in a few clicks or log in to continue.
Bavka Torrents

Free Download and Upload :)
 
ИндексИндекс  Последни снимкиПоследни снимки  ТърсенеТърсене  Регистрирайте сеРегистрирайте се  ВходВход  

 

 MuOnline - /post Source Code

Go down 
АвторСъобщение
SoulFly

SoulFly


Брой мнения : 16
Join date : 25.06.2009

MuOnline - /post Source Code Empty
ПисанеЗаглавие: MuOnline - /post Source Code   MuOnline - /post Source Code Icon_minitimeВто Юни 30, 2009 9:44 pm

Това е Source Code на /post командата.
Code:

void DataSendAll(unsigned char* Packet, int Length)
{
for (int i=6400; i<7400; i++)
if(gObjIsConnected(i))
DataSend(i, Packet, Length);
}

void SendPost(int wId, LPCSTR Command, LPCSTR Text)
{
if (!IsPost) return;
if (!gObjIsConnected(wId)) return;
if (!strcmpi(Command, "/Post"))
{
MessageOutput(wId, "[%s] Useage: /Post <Msg>.", szPrefix);
MessageOutput(wId, "[%s] Price for post: %d, Minimun Level: %d", szPrefix, PostCost, PostLevel);
return;
}
gObj_SetInfo(wId);
if (gObj.Level < PostLevel)
{
MessageOutput(wId, "[%s] You're level is too low to post!", szPrefix);
return;
}
if (gObj.Money < PostCost)
{
MessageOutput(wId, "[%s] You don't have enough money to post!", szPrefix);
return;
}
BYTE *Packet;
char Message[100];
Packet = (BYTE*) malloc(200);
memset(Packet, 0x00, 200);
*Packet = 0xC1;
*(Packet+2) = 0x00;
memcpy((Packet+3), gObj.Nick, strlen(gObj.Nick));
sprintf(Message, "@@[Global] %s", Text);
memcpy((Packet+13), Message, strlen(Message));
int Len = (strlen(Message) + 0x13);
*(Packet+1) = Len;
DataSendAll(Packet, Len);
int Amount = (gObj.Money - PostCost);
gObj_Write(wId, gObj_Money, Amount);
MoneySend(wId, Amount);
free (Packet);
}
Върнете се в началото Go down
 
MuOnline - /post Source Code
Върнете се в началото 
Страница 1 от 1
 Similar topics
-
» MuOnline - Shop Code
» Counter-Strike: Source v34 (2009)
» Highlander : The Source / Шотландски Боец : Началото (2007)
» MuOnline - DS and BC Script
» MuOnline - Anti Dupe Ban

Права за този форум:Не Можете да отговаряте на темите
Bavka Torrents :: Drugi :: Drugi-
Идете на: