- Introdução !

* Maximo Level (3rd e classes normais)

* Maximo Zeny

* Maximo Storage da Guild

* Maximo Storage

* Maximo Amigos

* Maximo Player no Grupo

* Maximo numero de player na Guild

* Maximo Level da Guild

* Numero Maximo de Pets na DB do emulador

* Alterações do Packetver

* Numero maximo de itens no inventario

* Numero maximo de Slots em itens

* Numero maximo de itens no carrinho

* Numero maximo de Mobs

» Alterando Maximo Level (3rds e Classes Normais)

#define MAX_LEVEL 99

{ "max_lv",							 &battle_config.max_lv,						  150,	 1,	 MAX_LEVEL,  }

» Alterando Numero maximo de zenys !

#define MAX_ZENY 1000000000

» Alterando Numero maximo de itens no Storage da Guild !

#define MAX_GUILD_STORAGE 600

#define MAX_GUILD_STORAGE 600
// guild storage limit - 731
#if MAX_GUILD_STORAGE > 731
#undef MAX_GUILD_STORAGE
#define MAX_GUILD_STORAGE 600

» Alterando Numero maximo de itens no Storage !

#define MAX_STORAGE 600

#define MAX_STORAGE 600
// storage limit - 731
#if MAX_STORAGE > 731
#undef MAX_STORAGE
#define MAX_STORAGE 600

» Alterando Numero maximo de amigos !

#define MAX_FRIENDS 40

» Alterando Numero maximo de player no Grupo !

#define MAX_PARTY 12

» Alterando Numero maximo de player na Guild !

#define MAX_GUILD 16+10*6

» Alterando Maximo Level da Guild !

#define MAX_GUILDLEVEL 50

» Alterando Numero Maximo de Pets

#define MAX_PET_DB 300

» Alterando Numero Maximo de Mobs !

#define MAX_MOB_DB 4000

» Alterações do Packetver !

#ifndef PACKETVER
#define PACKETVER 20100730
//#define PACKETVER 20110111

//packet_db_ver: default
packet_db_ver: 25

packet_db_ver: default
//packet_db_ver: 25

» Alterando Numero maximo de itens no inventario !

#define MAX_INVENTORY 100

» Alterando Numero maximo de Slots em itens !

#define MAX_SLOTS 4

» Alterando Numero maximo de itens no carrinho !

#define MAX_CART 100

T'y

Quote

unsigned src4instance : 1; // To flag this map when it's used as a src map for instances

unsigned src4instance : 1; // To flag this map when it's used as a src map for instances
unsigned nostorage :1; // [SoulBlaker]
unsigned noguildstorage :1; // [SoulBlaker]

Quote

else if (!strcmpi(w3,"guildlock"))
	map[m].flag.guildlock=state;

else if (!strcmpi(w3,"guildlock"))
	map[m].flag.guildlock=state;
else if (!strcmpi(w3,"nostorage"))
	map[m].flag.nostorage=state;
else if (!strcmpi(w3,"noguildstorage"))
	map[m].flag.noguildstorage=state;

Quote

MF_BATTLEGROUND,   //51

MF_BATTLEGROUND,   //51
MF_NOSTORAGE,
MF_NOGUILDSTORAGE,

case MF_BATTLEGROUND: script_pushint(st,map[m].flag.battleground); break;

case MF_BATTLEGROUND: script_pushint(st,map[m].flag.battleground); break;
case MF_NOSTORAGE: script_pushint(st,map[m].flag.nostorage); break;
case MF_NOGUILDSTORAGE: script_pushint(st,map[m].flag.noguildstorage); break;

case MF_BATTLEGROUND: map[m].flag.battleground = (!val || atoi(val) < 0 || atoi(val) > 2) ? 1 : atoi(val); break;

case MF_BATTLEGROUND: map[m].flag.battleground = (!val || atoi(val) < 0 || atoi(val) > 2) ? 1 : atoi(val); break;
case MF_NOSTORAGE:	 map[m].flag.nostorage=1; break;
case MF_NOGUILDSTORAGE: map[m].flag.noguildstorage=1; break;

case MF_BATTLEGROUND: map[m].flag.battleground=0; break;

case MF_BATTLEGROUND: map[m].flag.battleground=0; break;
case MF_NOSTORAGE:	 map[m].flag.nostorage=0; break;
case MF_NOGUILDSTORAGE: map[m].flag.noguildstorage=0; break;

Quote

int storage_storageopen(struct map_session_data *sd)
{
	nullpo_retr(0, sd);

	if(sd->state.storage_flag)
		return 1; //Already open?

	if( !pc_can_give_items(pc_isGM(sd)) )
	  { //check is this GM level is allowed to put items to storage
		clif_displaymessage(sd->fd, msg_txt(246));
		return 1;
	}
	
	sd->state.storage_flag = 1;
	clif_storagelist(sd,&sd->status.storage);
	clif_updatestorageamount(sd,sd->status.storage.storage_amount);
	return 0;
}

{
	int m;
	nullpo_retr(0, sd);

	if(sd->state.storage_flag)
		return 1; //Already open?

	m = sd->bl.m;
	if (map[m].flag.nostorage) {
		clif_displaymessage(sd->fd, msg_txt(527));
		return 1;
	}

	if( !pc_can_give_items(pc_isGM(sd)) )
	  { //check is this GM level is allowed to put items to storage
		clif_displaymessage(sd->fd, msg_txt(246));
		return 1;
	}
	
	sd->state.storage_flag = 1;
	clif_storagelist(sd,&sd->status.storage);
	clif_updatestorageamount(sd,sd->status.storage.storage_amount);
	return 0;
}

int storage_guild_storageopen(struct map_session_data* sd)
{
	struct guild_storage *gstor;

	nullpo_retr(0, sd);

	if(sd->status.guild_id <= 0)
		return 2;

	if(sd->state.storage_flag)
		return 1; //Can't open both storages at a time.
	
	if( !pc_can_give_items(pc_isGM(sd)) ) { //check is this GM level can open guild storage and store items [Lupus]
		clif_displaymessage(sd->fd, msg_txt(246));
		return 1;
	}

	if((gstor = guild2storage2(sd->status.guild_id)) == NULL) {
		intif_request_guild_storage(sd->status.account_id,sd->status.guild_id);
		return 0;
	}
	if(gstor->storage_status)
		return 1;
	
	gstor->storage_status = 1;
	sd->state.storage_flag = 2;
	clif_guildstoragelist(sd,gstor);
	clif_updateguildstorageamount(sd,gstor->storage_amount);
	return 0;
}

int storage_guild_storageopen(struct map_session_data* sd)
{
	struct guild_storage *gstor;
	int m;

	nullpo_retr(0, sd);

	m = sd->bl.m;
	if (map[m].flag.noguildstorage) {
		clif_displaymessage(sd->fd, msg_txt(528));
		return 1;
	}

	if(sd->status.guild_id <= 0)
		return 2;

	if(sd->state.storage_flag)
		return 1; //Can't open both storages at a time.
	
	if( !pc_can_give_items(pc_isGM(sd)) ) { //check is this GM level can open guild storage and store items [Lupus]
		clif_displaymessage(sd->fd, msg_txt(246));
		return 1;
	}

	if((gstor = guild2storage2(sd->status.guild_id)) == NULL) {
		intif_request_guild_storage(sd->status.account_id,sd->status.guild_id);
		return 0;
	}
	if(gstor->storage_status)
		return 1;
	
	gstor->storage_status = 1;
	sd->state.storage_flag = 2;
	clif_guildstoragelist(sd,gstor);
	clif_updateguildstorageamount(sd,gstor->storage_amount);
	return 0;
}

Quote

// Sistema de Correio
//----------------------
526: Você tem novas mensagens.

// Sistema de Correio
//----------------------
526: Você tem novas mensagens.

// MapFlags NoStorage e NoGuildStorage
527: Você não tem permissão para usar o Armazém neste Mapa.
528: Você não tem permissão para usar o Armazém da Guild neste Mapa.

Quote

mf_battleground 51

mf_battleground 51
mf_nostorage 52
mf_noguildstorage 53

mapa,X,Y,Z[TAB]script[TAB]Nome Do NPC[TAB]sprite,{

mapa

X

Y

/where

prontera 150 150

[TAB]

set .@npc$,"[Cash Shop]";

mes " ";

"+#CASHPOINTS+"

mes .@npc$;

mes "Olá "+strcharinfo(0)+" você possui "+#CASHPOINTS+" Cash's O que deseja comprar?";

switch

switch(select("- Elmos:- Asas:- Auras:- Acessórios")){

case

case 1: close2; callshop "elmos",1; close;
case 2: close2; callshop "asas",1; close;
case 3: close2; callshop "auras",1; close;
case 4: close2; callshop "acessorios",1; close;

case 1: close2; callshop "elmos",1; close;
case 2: close2; callshop "asas",1; close;
case 3: close2; callshop "auras",1; close;
case 4: close2; callshop "acessorios",1; close;
}
}

-[Space]cashshop[TAB]Loja1[TAB]item1,item2:preço

Space

cashshop

Loja1

item1

preço

prontera,147,185,z[TAB]script[TAB]Nome Do NPCs[TAB]srpite,{

set .@npc$,"[Cash Shop]";

mes .@npc$;
mes "Olá "+strcharinfo(0)+" Você possui "+#CASHPOINTS+" Cash's O que deseja comprar?";
switch(select("- Elmos:- Asas:- Auras:- Acessórios")){

case 1: close2; callshop "elmos",1; close;
case 2: close2; callshop "asas",1; close;
case 3: close2; callshop "auras",1; close;
case 4: close2; callshop "acessorios",1; close;
}
}



// Loja
-[Space]cashshop[TAB]Loja1[TAB]item1,item2:preço
-[Space]cashshop[TAB]Loja2[TAB]item1,item2:preço
-[Space]cashshop[TAB]Loja3[TAB]item1,item2:preço
-[Space]cashshop[TAB]Loja4[TAB]item1,item2:preço

prontera,150,170,5 script Arena sprite,{

prontera,150,170,5 script Arena sprite,{
mes "[ Arena ]";
mes  "Olá "+strcharinfo(0)+"^ que entrar na arena PvP?";

next;

menu " ", ," ";

menu "- Quero ir para PvP",pvp,"- Quero sair, obrigado",sair;

close;

prontera,150,170,5 script Arena sprite,{
mes "[ Arena ]";
mes  "Olá "+strcharinfo(0)+"^ que entrar na arena PvP?";
next;
menu "- Quero ir para PvP",pvp,"- Quero sair, obrigado",sair;
close;

pvp:

",pvp,"

mes " ";

next;

warp "warp",corx,cory;

/where

announce " "bc_yellow;

announce " "+strcharinfo(0)+" acabou de entrar na pvp arena",bc_yellow;

close;

}

pvp:
mes "[ Arena ]";
mes "Nos temos ["+getmapusers("WarpDaArenaAqui")+"]na aprena pvp";
next;
warp "MapaDoPvP",x,y;
announce " "+strcharinfo(0)+" acabou de entrar na pvp arena",bc_yellow;
close;
}

next;

warp "map",corx,cory;

announce " "bc_yellow;

mes "Ok, volte quando quiser.";

sair:
mes "[ Arena }";
mes "Ok, volte quando quiser.";
close;

}

MapaDoPvP mapflag nomemo
MapaDoPvP mapflag nowarp //Não poderá usar o warp
MapaDoPvP mapflag nowarpto //Não poderá usar o warp
MapaDoPvP mapflag nomemo
MapaDoPvP mapflag noreturn //Não poderá retorna apenas dando reload
MapaDoPvP mapflag nosave // Não poderá salvar dentro da sala
MapaDoPvP mapflag noteleport // Não poderá usar teleporte warp dentro da sala
MapaDoPvP mapflag nobranch
MapaDoPvP mapflag nosave SavePoint //Não poderá usar @save dentro da sala
MapaDoPvP mapflag nostorage //Não poderá abrir o @storage na arena

prontera,150,170,5 script Arena sprite,{
mes "[ Arena ]";
mes  "Olá "+strcharinfo(0)+"^ que entrar na arena PvP?";
next;
menu "- Quero ir para PvP",pvp,"- Quero sair, obrigado",sair;
close;

pvp:
mes "[ Arena ]";
mes "Nos temos ["+getmapusers("WarpDaArenaAqui")+"]na aprena pvp";
next;
warp "MapaDoPvP",x,y;
announce " "+strcharinfo(0)+" acabou de entrar na pvp arena",bc_yellow;
close;
}

sair:
mes "[ Arena ]";
mes "Ok, volte quando quiser.";
close;

}

MapaDoPvP mapflag nomemo
MapaDoPvP mapflag nowarp
MapaDoPvP mapflag nowarpto
MapaDoPvP mapflag nomemo
MapaDoPvP mapflag noreturn
MapaDoPvP mapflag nosave
MapaDoPvP mapflag noteleport
MapaDoPvP mapflag nobranch
MapaDoPvP mapflag nosave SavePoint
MapaDoPvP mapflag nostorage

#ifndef PACKETVER
#define PACKETVER 20110824 "Aqui é a data do seu hexed, então você tem que editar sempre esse aqui conforme a do seu hexed"
//#define PACKETVER 20100730

#ifndef PACKETVER
#define PACKETVER 20100730
//#define PACKETVER 20100730

//packet_db_ver: 25
packet_db_ver: default

packet_db_ver: 25
//packet_db_ver: default

Bom pessoal, então é isso ai, se eu ajudei ou gostaram do tutorial reputa ai não custa nada

Nessa primeira aula, não espere aprender como fazer eventos dinâmicos, sistemas pvp's, sistemas vip's e etc. Hoje aprenderemos o básico, como iniciar com script, como desenvolver um script, como testá-lo e por que aprender a fazê-lo.

- Como iniciar no mundo de script do Ragnarök

Aos novos administradores ou membros que vêem um script, lhe parece ser um bicho de sete cabeças... mas acredite, depois que entendermos o que cada comando faz, tudo será mais fácil ! Enfim, para iniciarmos, eu recomendo você a olhar muitos scripts e ter muitas dúvidas (sim, muitas dúvidas), para que mais na frente você tire de cara todas elas e pense, 'como foi fácil !'.

- Desenvolvendo um script

Recomendo a vocês utilizar o software Notepadd++ (notepadd plus plus). É um software bem completo com suporte a varias linguagens de programação (infelizmente, não tem para script de ragnarök). Após baixá-lo, instale ele e execute, no menu superior, vá em Linguagens e escolha a linguagem C (ou C#/C++). Pronto, ficará bem mais fácil de criar nossos scripts com este software.

- Testando um script

Deixe um emulador separado apenas para teste de scripts, um emulador sem muitas frescuras, apenas o básico.

- Por que aprender a fazer script ?

Simples, não há por que dependermos dos outros para fazermos algo ... Para quem é jovem, um dia irá envelhecer e terá que sair da casa dos pais (ou não né ..) e viver sua vida. O mesmo é com script, aqui se encaixa uma frase que vi em algum lugar, era mais ou menos assim:

"Dê um peixe ao homem e o homem não passará fome por um dia. Ensine o homem a pescar e ele não passará fome pelo resto de sua vida".

Enfim, o que tinha de apresentar foi apresentado, na aula #2, iremos dar início a linguagem de script (aprendemos os comandos básicos e a estrutura de um script).

void clif_send_homdata(struct map_session_data *sd, int state, int param)
{ //[orn]
int fd = sd->fd;
WFIFOHEAD(fd, packet_len(0x230));
WFIFOW(fd,0)=0x230;
WFIFOB(fd,2)=0;
WFIFOB(fd,2)=state;
WFIFOL(fd,4)=sd->hd->bl.id;
WFIFOL(fd,8)=param;
WFIFOSET(fd,packet_len(0x230));
}

WFIFOB(fd,2)=state;

WFIFOB(fd,3)=state;

extern struct s_homunculus_db homuncumlus_db[MAX_HOMUNCULUS_CLASS];
enum { HOMUNCULUS_CLASS, HOMUNCULUS_FOOD };
enum {
SP_ACK  = 0x00,
SP_INTIMATE  = 0x100,
SP_HUNGRY   = 0x200
};

SP_ACK  = 0x00,
SP_INTIMATE  = 0x100,
SP_HUNGRY   = 0x200

SP_ACK	= 0x0,
SP_INTIMATE  = 0x1,
SP_HUNGRY   = 0x2,

//2005-04-25aSakexe
0x022d,5,hommenu,4
0x0232,9,hommoveto,6
0x0233,11,homattack,0
0x0234,6,hommovetomaster,0

//2005-04-25aSakexe
0x022d,5,hommenu,2:4
0x0232,9,hommoveto,2:6
0x0233,11,homattack,2:6:10
0x0234,6,hommovetomaster,2

//HighWizard
4010,1,9,0,0,0,0,0,0,0,0,0,0 //NV_BASIC#Habilidades Básicas #
4010,142,1,0,0,0,0,0,0,0,0,0,0 //NV_FIRSTAID#Primeiros Socorros #
4010,9,10,0,0,0,0,0,0,0,0,0,0 //MG_SRECOVERY#Aumentar Recuperação de SP #
4010,10,1,0,0,0,0,0,0,0,0,0,0 //MG_SIGHT#Chama Reveladora #
4010,11,10,0,0,0,0,0,0,0,0,0,0 //MG_NAPALMBEAT#Ataque Espiritual #
4010,12,10,11,7,13,5,0,0,0,0,0,0 //MG_SAFETYWALL#Escudo Mágico #
4010,13,10,11,4,0,0,0,0,0,0,0,0 //MG_SOULSTRIKE#Espíritos Anciões #
4010,14,10,0,0,0,0,0,0,0,0,0,0 //MG_COLDBOLT#Lanças de Gelo #
4010,15,10,14,5,0,0,0,0,0,0,0,0 //MG_FROSTDIVER#Rajada Congelante #
4010,16,10,0,0,0,0,0,0,0,0,0,0 //MG_STONECURSE#Petrificar #
4010,17,10,19,4,0,0,0,0,0,0,0,0 //MG_FIREBALL#Bolas de Fogo #
4010,18,10,17,5,10,1,0,0,0,0,0,0 //MG_FIREWALL#Barreira de Fogo #
4010,19,10,0,0,0,0,0,0,0,0,0,0 //MG_FIREBOLT#Lanças de Fogo #
4010,20,10,0,0,0,0,0,0,0,0,0,0 //MG_LIGHTNINGBOLT#Relâmpago #
4010,21,10,20,4,0,0,0,0,0,0,0,0 //MG_THUNDERSTORM#Tempestade de Raios #
4010,157,1,0,0,0,0,0,0,0,0,0,0 //MG_ENERGYCOAT#Proteção Arcana #
4010,80,10,18,1,0,0,0,0,0,0,0,0 //WZ_FIREPILLAR#Coluna de Fogo #
4010,81,10,20,1,10,1,0,0,0,0,0,0 //WZ_SIGHTRASHER#Supernova #
4010,83,10,81,2,21,1,0,0,0,0,0,0 //WZ_METEOR#Chuva de Meteoros #
4010,84,10,11,1,20,1,0,0,0,0,0,0 //WZ_JUPITEL#Trovão e Júpiter #
4010,85,10,21,1,84,5,0,0,0,0,0,0 //WZ_VERMILION#Ira de Thor #
4010,86,5,14,1,20,1,0,0,0,0,0,0 //WZ_WATERBALL#Esfera d'Água #
4010,87,10,16,1,15,1,0,0,0,0,0,0 //WZ_ICEWALL#Barreira de Gelo #
4010,88,10,87,1,0,0,0,0,0,0,0,0 //WZ_FROSTNOVA#Congelar #
4010,89,10,15,1,84,3,0,0,0,0,0,0 //WZ_STORMGUST#Nevasca #
4010,90,5,16,1,0,0,0,0,0,0,0,0 //WZ_EARTHSPIKE#Coluna de Pedra #
4010,91,5,90,3,0,0,0,0,0,0,0,0 //WZ_HEAVENDRIVE#Fúria da Terra #
4010,92,5,91,1,0,0,0,0,0,0,0,0 //WZ_QUAGMIRE#Pântano dos Mortos #
4010,93,1,0,0,0,0,0,0,0,0,0,0 //WZ_ESTIMATION#Sentido Sobrenatural #
4010,1006,1,0,0,0,0,0,0,0,0,0,0 //WZ_SIGHTBLASTER#Explosão Protetora #
4010,364,10,9,5,13,7,0,0,0,0,0,0 //HW_SOULDRAIN#Dreno de Alma #
4010,365,1,9,1,0,0,0,0,0,0,0,0 //HW_MAGICCRASHER#Esmagamento Mágico #
4010,366,10,0,0,0,0,0,0,0,0,0,0 //HW_MAGICPOWER#Amplificação Mística #
4010,400,5,11,5,0,0,0,0,0,0,0,0 //HW_NAPALMVULCAN#Vulcão Napalm #
4010,483,1,93,1,87,1,0,0,0,0,0,0 //HW_GANBANTEIN#Ganbantein #
4010,484,5,365,1,366,10,92,1,0,0,0,0 //HW_GRAVITATION#Campo Gravitacional #
4010,410,1,0,0,0,0,0,0,0,0,0,0 //WE_CALLBABY#Vem cá filhote! #
4010,681,1,0,0,0,0,0,0,0,0,0,0 //ALL_INCCARRY#Increase Weight Limit R #

25,537,10,533,1,0,0,0,0,0,0,0,0 //NJ_HYOUSENSOU#Lança Congelante #

Quote