[ALL] Criando um char com equipamentos iniciais!

por Karlos Ter 20 Abr 2010, 14:58

Aew pessoal a pedido do binho67, do lukasfkt, od ronaldo, do zina, do silvio santos [/taperei [ALL] Criando um char com equipamentos iniciais! 965439

], A pedido do binho67, do lukasfkt, e de outros que não me lembro [ALL] Criando um char com equipamentos iniciais! 535201

eu cacei esse tutorial na net feito loko, mais num achei nem na mmorpgmaker, aí pensei onde foi que eu tinha visto isso mesmo? aí resolvi voltar num forum bem antigo mesmo, poucos devem lembrar dele, mais era o antigo forum do vicardosof, la eu achei uma base de como fazer esse sistema, pra falar a verdade ele estava prontim era só dar CTRL + C e depois CTRL + V, mais só que tava muito desatualizado aquele tinha sido feito para eclipse 2.6 então eu fui la na mmorpgmaker e achei um tutorial da hora, um tutorial pra facilitar o trabalho do inventario com os scripts [ALL] Criando um char com equipamentos iniciais! 256397

[ALL] Criando um char com equipamentos iniciais! 256397

[Tuto] Uniformizando a interação do main.txt com o inventario! Então vocês ja sabem que para dar inicio a esse sistema, primeiro devem seguir o tutorial postado anterior. [ALL] Criando um char com equipamentos iniciais! 535201

Bom, se você ja fez isso vamos dar inicio a esse então [ALL] Criando um char com equipamentos iniciais! 535201

Va nos seguinte diretório da pasta server ou servidor scripts/main.txt, tendo o main.txt aberto. Adcione o seguinte código no inicio da Sub JoinGame(index)

Código:: If GetVar("var.ini", GetPlayerName(index), "startup") = "" Then weapon = Int(GetVar("classes\class" & GetPlayerClass(index) & ".ini", "StartUp", "Weapon")) armour = Int(GetVar("classes\class" & GetPlayerClass(index) & ".ini", "StartUp", "armour")) shield = Int(GetVar("classes\class" & GetPlayerClass(index) & ".ini", "StartUp", "Shield")) helmet = Int(GetVar("classes\class" & GetPlayerClass(index) & ".ini", "StartUp", "Helmet")) wepdur = Int(GetVar("classes\class" & GetPlayerClass(index) & ".ini", "StartUp", "Wepdur")) armdur = Int(GetVar("classes\class" & GetPlayerClass(index) & ".ini", "StartUp", "Armdur")) shldur = Int(GetVar("classes\class" & GetPlayerClass(index) & ".ini", "StartUp", "Shldur")) hlmdur = Int(GetVar("classes\class" & GetPlayerClass(index) & ".ini", "StartUp", "Hlmdur")) If weapon <> 0 Then Call GiveItem(index, weapon, wepdur) End If If armour <> 0 Then Call GiveItem(index, armour, armdur) End If If shield <> 0 Then Call GiveItem(index, shield, shldur) End If If helmet <> 0 Then Call GiveItem(index, helmet, hlmdur) End If Call PutVar("var.ini", GetPlayerName(index), "startup", "yes") End If

Agora abra a pasta class ou classes que se encontra na pasta server ou servidor abra os arquivos que guardam os dados das classes, eles devem ter o nome class0.ini, class1.ini, class2.ini e assim por diante até a quantidade de classes que você pos para o seu jogo. Adicione dentro, só que no final de cada classe o seguinte código...

Código:: [StartUp] Weapon=0 armour=0 Shield=0 Helmet=0 Wepdur=0 Armdur=0 Shldur=0 Hlmdur=0

Weapon=0
armour=0
Shield=0
Helmet=0
São Itens, saiba que os valores dados como 0 podem e devem ser alterados certamente pelo numero do objeto correspondendte ao espaço, do contrario haverá erro até que conserte o defeito.

Wepdur=0
Armdur=0
Shldur=0
Hlmdur=0
São a durabilidade dos itens, para coloca-lo destrutivel altere o numero 0 para qualquer outro, para torna-lo indestrutivel, deixe com a veriavel que ja esta prenchida. 0