Os que mais criam tópicos | |
| | [Tutorial]Spell Linear | |
| | Autor | Mensagem |
---|
Jim Membro
Mensagens : 18 Moeda : 33 Pontos : 3 Data de inscrição : 08/01/2013
| Assunto: [Tutorial]Spell Linear Sex Jan 11, 2013 5:23 am | |
| Descrição: sistema de magia reta, como uma flecha, bem util para seu game. - Spoiler:
Client~Side Na frmSpellEditor na cmbType na Propriedade List abaixo de Summon (Create Pet) Adicione: Linearprocure - Código:
-
Public Const SPELL_TYPE_PET = 6 Abaixo adicione - Código:
-
Public Const SPELL_TYPE_LINEAR = 7
Server~SideProcure por: - Código:
-
Public Const SPELL_TYPE_PET = 6
Abaixo Adicione: - Código:
-
Public Const SPELL_TYPE_LINEAR = 7
Procure por: - Código:
-
Sub CastSpell(ByVal Index As Long, _ Abaixo de: - Código:
-
Dim Packet As String
Adicione: - Código:
-
Dim u As Long Abaixo de: - Código:
-
' Checar se o timer está normal If GetTickCount < Player(Index).AttackTimer + 1000 Then Exit Sub End If
Adicione: - Código:
-
If Spell(SpellNum).Type = SPELL_TYPE_LINEAR Then x = GetPlayerX(Index) y = GetPlayerY(Index) For i = 1 To Spell(SpellNum).Range Select Case GetPlayerDir(Index) Case DIR_UP y = y - 1 Case DIR_DOWN y = y + 1 Case DIR_LEFT x = x - 1 Case DIR_RIGHT x = x + 1 End Select Player(Index).Target = MakeLoc(x, y) Player(Index).TargetType = TARGET_TYPE_LOCATION N = MakeLoc(x, y) If x = MAX_MAPX Or y = MAX_MAPY Or GetPlayery(index) = MAX_MAPY Or GetPlayerx(index) = MAX_MAPX Then Exit For For u = 1 To MAX_MAP_NPCS Damage = Int(GetPlayerMAGI(Index) / 4) + Spell(SpellNum).Data1 - Int(Npc(MapNpc(GetPlayerMap(Index), u).num).DEF / 2) + (Rnd * 5) - 2 If MapNpc(GetPlayerMap(Index), u).num > 0 And MapNpc(GetPlayerMap(Index), u).x = x And MapNpc(GetPlayerMap(Index), u).y = y Then If Npc(MapNpc(GetPlayerMap(Index), u).num).Behavior <> NPC_BEHAVIOR_FRIENDLY And Npc(MapNpc(GetPlayerMap(Index), u).num).Behavior <> NPC_BEHAVIOR_SHOPKEEPER Then If Damage > 0 Then Call AttackNpc(Index, u, Damage) Else Call BattleMsg(Index, "A magia foi muito fraca para machucar " & Trim$(Npc(MapNpc(GetPlayerMap(Index), N).num).Name) & "!", BrightRed, 0) End If Else Call PlayerMsg(Index, "Você não pode atacar um npc Amigo!", 4) End If Exit For End If Next For u = 1 To MAX_PLAYERS Damage = GetPlayerMAGI(Index) / 4 + Spell(SpellNum).Data1 - Int(GetPlayerstr(u) / 2) * (Rnd * 5) - 2 If IsPlaying(u) = True And GetPlayerMap(Index) = GetPlayerMap(u) And GetPlayerX(u) = x And GetPlayerY(u) = y Then If GetPlayerHP(u) > 0 And GetPlayerMap(Index) = GetPlayerMap(u) And GetPlayerLevel(Index) >= 10 And GetPlayerLevel(u) >= 10 And (Map(GetPlayerMap(Index)).Moral = MAP_MORAL_NONE Or Map(GetPlayerMap(Index)).Moral = MAP_MORAL_NO_PENALTY) And GetPlayerAccess(Index) <= 0 And GetPlayerAccess(u) <= 0 Then If Damage > 0 Then Call AttackPlayer(Index, u, Damage) Else Call BattleMsg(Index, "A magia foi muita fraca e não feriu! " & GetPlayerName(u) & "!", BrightRed, 0) End If Else Call PlayerMsg(Index, "Você não pode atacar jogadores abaixo do nivel 10, maiores de accesso 2 e Quando não está numa zona da porrada.", 4) End If Exit For End If Next u Call SendDataToMap(GetPlayerMap(Index), "spellanim" & SEP_CHAR & SpellNum & SEP_CHAR & Spell(SpellNum).SpellAnim & SEP_CHAR & Spell(SpellNum).SpellTime & SEP_CHAR & Spell(SpellNum).SpellDone & SEP_CHAR & Index & SEP_CHAR & Player(Index).TargetType & SEP_CHAR & Player(Index).Target & SEP_CHAR & Player(Index).CastedSpell & END_CHAR) Next i If Spell(SpellNum).sound > 0 Then Call SendDataToMap(GetPlayerMap(Index), "sound" & SEP_CHAR & "Magic" & Spell(SpellNum).sound & END_CHAR) Call SetPlayerMP(Index, GetPlayerMP(Index) - Spell(SpellNum).MPCost) Call SendMP(Index) Exit Sub End If Creditos: M. Dutra(tópico editado a pedido do criador do sistema) | |
| | | newbie123 Admin
Mensagens : 57 Moeda : 68 Pontos : 2 Data de inscrição : 29/12/2012
| Assunto: Re: [Tutorial]Spell Linear Sex Jan 11, 2013 10:18 am | |
| não é extremamente errado postar em outro forum, o problema é não postar os créditos do devido autor do tutorial, caso não saiba qual o autor, então não a o que fazer pois ira querer dizer que o tutorial que você pegou já foi pego por outra pessoa mesmo. xD | |
| | | SSO Moderador.G
Mensagens : 83 Moeda : 117 Pontos : 6 Data de inscrição : 06/01/2013
| Assunto: Re: [Tutorial]Spell Linear Sex Jan 11, 2013 12:49 pm | |
| Eu mesmo tenho este sistema aqui, e é de muito tempo, na epoca que tais usuarios nem existiam em tais forums, pode ter sido copiado de sua postagem, se voce disponibilizou, problema é seu, creditos sao obrigatorios somente ao criador ou caso alguma modificaçao, como no caso, ninguem sabe o verdadeiro autor, o topico continuara como esta.
Tal forum fez até pior no começo, quem nao tem teto de vidro que atire a primeira pedra. | |
| | | Renanr Membro
Mensagens : 19 Moeda : 31 Pontos : 5 Data de inscrição : 17/01/2013
| Assunto: Re: [Tutorial]Spell Linear Sáb Jan 19, 2013 12:38 am | |
| O Verdadeiro autor deste sistema é o "Mr.Dutra". Ele criou esses códigos .. É um ótimo sistema.. | |
| | | M.Dutra Membro
Mensagens : 4 Moeda : 4 Pontos : 0 Data de inscrição : 28/01/2013
| Assunto: Re: [Tutorial]Spell Linear Seg Jan 28, 2013 2:30 pm | |
| Tutorial de autoria do M.Dutra(eu), prova definitiva, [Tens de ter uma conta e sessão iniciada para poderes visualizar este link] só olhar a data . | |
| | | Baleog Membro
Mensagens : 9 Moeda : 13 Pontos : 5 Data de inscrição : 18/01/2013 Idade : 31 Localização : Silicon & Synapse
| Assunto: Re: [Tutorial]Spell Linear Seg Jan 28, 2013 4:38 pm | |
| O verdadeiro autor e um antigo membro da MMODEV ,ele que inventou a Spell Linear.
isso em 2008 .
Parem de querer roubar a autoria do verdadeiro criador, podem ter feito até outro tipo de codigo mais o 1 codigo e ideia nao | |
| | | M.Dutra Membro
Mensagens : 4 Moeda : 4 Pontos : 0 Data de inscrição : 28/01/2013
| Assunto: Re: [Tutorial]Spell Linear Seg Jan 28, 2013 5:19 pm | |
| A ideia, base foi dele, não confunda as coisas. Tutorial de Autoria minha prova concreta postada, sem mais. | |
| | | Warrior Admin
Mensagens : 164 Moeda : 1726 Pontos : 3 Data de inscrição : 30/08/2012 Idade : 33
| Assunto: Re: [Tutorial]Spell Linear Seg Jan 28, 2013 5:29 pm | |
| Acho que o jim ate sabe quem e so coloca isso para ganhar creditos podem ver todos os tutos dele esta Autor desconhecido vou editar de colocar seu credito | |
| | | SSO Moderador.G
Mensagens : 83 Moeda : 117 Pontos : 6 Data de inscrição : 06/01/2013
| Assunto: Re: [Tutorial]Spell Linear Seg Jan 28, 2013 7:58 pm | |
| Conheço Jim, ele nao tem interesse em ter créditos, até porque nao servem pra nada nao é mesmo? sobraria ele ser creditado por desavisados, mas como ele botou autor desconhecido, logo cheguemos a conclusao de que não é essa a intenção. - M.Dutra, nao creio que tenha sido voce, sem ofensa, mas vi seu "crescimento" nos forums praticamente conheço-o, não acho que tenha sido o autor deste sistema. | |
| | | Over~ Moderador.G
Mensagens : 149 Moeda : 214 Pontos : 11 Data de inscrição : 04/01/2013
| Assunto: Re: [Tutorial]Spell Linear Seg Jan 28, 2013 11:39 pm | |
| bastante interessante.. Tente fazer um tutorial seu próprio. | |
| | | M.Dutra Membro
Mensagens : 4 Moeda : 4 Pontos : 0 Data de inscrição : 28/01/2013
| Assunto: Re: [Tutorial]Spell Linear Ter Jan 29, 2013 1:21 am | |
| - SSO escreveu:
- Conheço Jim, ele nao tem interesse em ter créditos, até porque nao servem pra nada nao é mesmo?
sobraria ele ser creditado por desavisados, mas como ele botou autor desconhecido, logo cheguemos a conclusao de que não é essa a intenção.
- M.Dutra, nao creio que tenha sido voce, sem ofensa, mas vi seu "crescimento" nos forums praticamente conheço-o, não acho que tenha sido o autor deste sistema. Aiai, não confunda fama com conhecimento, realmente nunca liguei pra ser famoso em fóruns, mais não quer dizer que não sei programar, acredite se você me conhece-se sabia que sou da época que a mmorpgbr.net não pensava nem em existir ainda, época do Ricardo Dalarme, hardsfree, Lucas Lopô, Kira, Thales12, todos ativos , entre outros, nem vou discutir com vocês chega da pena :/, que os Créditos permaneçam no tópico por favor para não ocorrer uma confusão, oque eu não iria querer né ?! . _________________________________________________________________________________________________ SSO, ta devendendo muito o Jim, quer passar manteiga no pal dele também não ? | |
| | | SSO Moderador.G
Mensagens : 83 Moeda : 117 Pontos : 6 Data de inscrição : 06/01/2013
| Assunto: Re: [Tutorial]Spell Linear Ter Jan 29, 2013 6:15 am | |
| Ele faz parte de minha equipe, por isso tenho a certeza de que ele nao esta nem ai pra creditos.
Rapaz me trate com respeito, se voce nao demonstrou interesse e isso ocasionou a duvida sobre sua capacidade, para certos membros (nao só eu), a culpa nao é minha
e, outra... eu desconheço o que seja "devedendo" e "pal". - Advertido: falta de respeito com membro | |
| | | M.Dutra Membro
Mensagens : 4 Moeda : 4 Pontos : 0 Data de inscrição : 28/01/2013
| Assunto: Re: [Tutorial]Spell Linear Ter Jan 29, 2013 10:51 am | |
| A Prova foi postada, [Tens de ter uma conta e sessão iniciada para poderes visualizar este link] apenas olhe a data do meu tópico na Vision Makers e confirme , Créditos no tópico por favor . 2 bjs :* | |
| | | SSO Moderador.G
Mensagens : 83 Moeda : 117 Pontos : 6 Data de inscrição : 06/01/2013
| Assunto: Re: [Tutorial]Spell Linear Ter Jan 29, 2013 1:04 pm | |
| Este sistema foi passado bem antes de voce postar, bem antes deste forum existir, bem antes da MMORPGBR existir, pois foi eu quem passei para o Jim, apenas. Entao a data de sua postagem num forum RECEM CRIADO, nao justifica nem se postar sua certidão de nascimento.
3 Beijos "mandando mortal carpado"
Tópico trancado para evitar mais tumultos.
| |
| | | Conteúdo patrocinado
| Assunto: Re: [Tutorial]Spell Linear | |
| |
| | | | [Tutorial]Spell Linear | |
|
Tópicos semelhantes | |
|
| Permissões neste sub-fórum | Não podes responder a tópicos
| |
| |
| |