 |
 |
 |
| Autor |
Mensagem |
Edno Rodrigues
Usuário
Registrado: 07/09/09
Mensagens: 277
Localização: Brasil Games |
|
| Vida em Chefões !! |
|
Ola Amigos do Fórum, depois de muito estudo, e pratica, conseguir programar o Script para chefões...
você deixara seus inimigos fortes e eficientes no jogo.
OBS:::::: veja com detalhe cada função....
LABEL 1 = chefe
LABEL 2 = 1500
EDIT TEXTO = Objeto5
OBJETO1 = inimigo
< 150 = O inimigo te perseguira sempre por todo lugar, você pode aumentar o valor se quiser !!
ApplyForce('Objeto1, 1650, 0, 0); = o inimigo fica mais agressivo e menos rapido
WriteGlobalVar('chefe', 1500); = é a programação dos 2 Label
Oncreat do Mapa
WriteGlobalVar('chefe', 1500);
MainLoop da Mapa
SetLabelText('EDIT TEXTO', +ReadGlobalVar('chefe'));
Onloop do inimigo
//---Begin Script Builder: Perseguir Jogador---//
if (GetObjectDistance('Objeto1','Player') < 150) and (GetObjectDistance('Objeto1','Player') > 1) then
begin
if GetObjectAnimation('Objeto1') <> 'run' then
SetObjectAnimation('Objeto1', 'run');
PointObjectTo('Objeto1', 'Player');
ApplyForce('Objeto1, 1650, 0, 0);
end
else if GetObjectAnimation('Objeto1') <> 'ANIMAÇÃO DO ATOR' then
SetObjectAnimation('Objeto1', 'ANIMAÇÃO DO ATOR');
//---End Script Builder---//
Oncolision do Mapa ------ apos zera o Life de vida do inimigo ele explodira....
if Copy(GetCollidedObject1(), 0, 6) = 'Bullet' then
begin
if (GetCollidedObject2 = 'Objeto1') then
begin
WriteGlobalVar('chefe', ReadGlobalVar('chefe')-10);
if ReadGlobalVar('chefe') < 0 then
DestroyObject('Objeto1');
end;
end;
if Copy(GetCollidedObject2(), 0, 6) = 'Bullet' then
begin
if (GetCollidedObject1 = 'Objeto1') then
begin
WriteGlobalVar('chefe', ReadGlobalVar('chefe')-10);
if ReadGlobalVar('chefe') < 0 then
DestroyObject('Objeto1');
end;
end;
ja testado no meu projeto já citado em outro topico !!
BRASIL GAMES STUDIO
|
|
| Qua Ago 17, 2011 2:15 am |
 |
|
OrionGames
Usuário
Registrado: 14/01/11
Mensagens: 185
Localização: Jordanesia |
|
|
| Qua Ago 17, 2011 11:43 am |
|
|
joey jordison
Novato
Registrado: 04/05/11
Mensagens: 71
|
|
|
|
ae finalmente valeu edino.
_________________
"de junho a junho eu nasço
Eu morro de março a março
Presencio cenas impossíveis de traduzir para o cinema
Não perco atuações e atos
Mesmo quando abaixo pra amarrar os cadarços
Espaço, espaço, eu preciso de espaço
Pra mostrar pra esses covardes seu crepúsculo de aço
Imperial, como Carlos, eu passo
Conexão nordestina
Até Niterói, morte e vida Severina
Passando por Brasília...
Reis..." |
|
| Qui Ago 18, 2011 5:26 am |
|
|
welgomes
Usuário
Registrado: 10/07/11
Mensagens: 827
Localização: São Paulo - Capital |
|
|
|
Parabéns Edno, você é um dos que mais contribui para a comunidade 3D GB.
|
|
| Qui Ago 18, 2011 11:47 am |
|
|
kleiton157
Usuário
Registrado: 06/05/11
Mensagens: 1170
Localização: Na cáducarai |
|
|
|
ta dando error aqui, alguem pode fazer para mim com o chefe se chamando Objeto1 e o movimento dele chamando Fly
|
|
| Dom Set 11, 2011 11:54 am |
|
|
|
|
|
 |
 |
|
