Um jogo completo em um código .

por Vikintor Dom 02 maio 2010, 17:39

Passei um dia inteiro fazendo essa engine.
Como usar:
Para usar a engine não é necessario nenhum objeto ou sprite.Basta colocar todo esse script dentro de uma room em Settings/Creation code e pronto,um mini jogo completo.
Não espere muita qualidade,pois não tem objetos,sprites,sons e apenas um código

Código:: /////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// /*Tutorials Copyrights Todos direitos reservados.Copyright 2010 by VF Victor Follador. É autorizada a distribuição desse tutorial desde que o nome do autor esteja contido no mesmo e que a obra não seja modificada sem autorização do autor. Game Maker Copyright Game Maker by Mark Overmars (http://www.gamemaker.nl). */ /////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// //Cria o sprite para colisões global.sprite_c = sprite_create_from_screen(0,0,32,32,0,0,0,0,0,0) sprite_set_bbox_mode(global.sprite_c,2) sprite_set_precise(global.sprite_c,0) //Pontuação highscore_set_strings('RANKING','Ninguem','Aperte enter para sair') //Impede de dar erro no menu principal opcao2 = 99 //Menu Prinicpal opcao = show_message_ext('Selecione uma opção','JOGAR','OPÇÕES','SAIR') if opcao = 1 { } if opcao = 2 { opcao2 = show_message_ext('Selecione uma opção','COMO JOGAR','RANKING','RANK S') if opcao2 = 1 { show_info() game_restart() } if opcao2 = 2 { highscore_show(0) game_restart() } if opcao2 = 3 { certeza = show_question('Tem certeza que deseja apagar todas pontuações feitas pelos usuarios e começar um novo com rankings oficiais de padrão para tentar superalos?') if certeza = true { // Prepara um novo ranking highscore_clear() highscore_add('péssimo',1) highscore_add('ruim',100) highscore_add('principiante',300) highscore_add('regular',500) highscore_add('bom',800) highscore_add('Amador',1000) highscore_add('Pro',1500) highscore_add('Maniaco',2000) } game_restart() } } if opcao = 3 { game_end() } if opcao = 0 then game_restart() if opcao2 = 0 then game_restart() //Cria a bolinha que você controla global.player_1 = object_add() object_set_sprite(global.player_1,global.sprite_c) http://global.sprite_c é o sprite da bolinha (somente para colisão) object_event_add(global.player_1,ev_step,0,'sprite_get_bbox_top(global.player_1= 4) sprite_get_bbox_left(global.player_1= 4) sprite_get_bbox_right(global.player_1= 28) sprite_get_bbox_bottom(global.player_1= 28)') instance_create(320,272,global.player_1) //Cria os controles da bolinha object_event_add(global.player_1,ev_step,0,'if keyboard_check(vk_up) = true then if y > 30 then y-=6') object_event_add(global.player_1,ev_step,0,'if keyboard_check(vk_down) = true then if y < 380 then y+=6') object_event_add(global.player_1,ev_step,0,'if keyboard_check(vk_left) = true then if x > 10 then x-=6') object_event_add(global.player_1,ev_step,0,'if keyboard_check(vk_right) = true then if x < 600 then x+=6') //Cria os blocos inimigos global.evento = object_add() global.posicao = choose(10,25,15,14,20,16,13,11,12,9,8)//Velocidade dos blocos inimigos object_set_sprite(global.evento,global.sprite_c) object_event_add(global.evento,ev_step,0,'sprite_get_bbox_top(global.evento= 4) sprite_get_bbox_left(global.evento= 4) sprite_get_bbox_right(global.evento= 28) sprite_get_bbox_bottom(global.evento= 26)') object_event_add(global.evento,ev_create,0,'global.posicao = choose(10,16,13,11,12,9,8,11,10) vspeed = global.posicao hspeed = 0') object_event_add(global.evento,ev_animation_end,0,'instance_create(random(640),0,global.evento) instance_destroy()') instance_create(random(640),500,global.evento) //Mostra a bolinha object_event_add(global.player_1,ev_draw,0,'draw_set_color(c_blue) draw_ellipse_color(x-16,y-16,x+16,y+16,c_blue,c_fuchsia,0) draw_set_color(c_black)') //Mostra os blocos inimigos object_event_add(global.evento,ev_draw,0,'draw_rectangle_color(x-16,y-16,x+16,y+16,c_black,c_dkgray,c_silver,c_red,0)') //Cria o objeto principal global.evento2 = object_add() object_event_add(global.evento2,ev_create,0,'depth = -10 alarm[0]= 100') object_event_add(global.evento2,ev_step,0,'score += 1') object_event_add(global.evento2,ev_alarm,0,'instance_create(random(640),500,global.evento) alarm[0] = 100') instance_create(1,400,global.evento2) font_get_bold(1) draw_set_color(c_blue) //Mostra a pontuação na tela object_event_add(global.evento2,ev_draw,0,"draw_set_color(c_dkgray) draw_rectangle(0,400,640,480,0) image_alpha = 0.6 draw_set_color(c_black) draw_rectangle(100,400,500,460,0) image_alpha = 1") object_event_add(global.evento2,ev_draw,0,"draw_set_color(c_blue)draw_text_transformed(100,400,'PONTOS',2,2,0) draw_set_color(c_white)draw_text_transformed(270,400,score,2,2,0)") //Cria um objeto para mostrar a chuva global.evento3 = object_add() object_event_add(global.evento3,ev_draw,0,"effect_create_below(ef_rain ,x,y,2,c_white)") object_event_add(global.evento3,ev_create,0,'depth = 10') instance_create(1,400,global.evento3) //colisao da bola com o quadrado object_event_add(global.player_1,ev_collision,global.evento,"highscore_show(score) game_restart()") //OUTRAS CONFIGURAÇÕES room_caption = 'Desvie dos quadrados,Engine de Victor Follador 2010' show_score = false draw_set_color(c_purple) window_set_cursor(cr_uparrow) background_color = c_maroon effect_create_below(ef_explosion ,x,y,2,c_black)

Comentem.

por **fonetico** Dom 02 maio 2010, 18:18

Cara tem umas funções nessa engine que não estão presentes no GM8, dá um jeito aí, porque dá um erro e a tela fica cinza, como se não tivesse nada.

por **Cainã** Dom 02 maio 2010, 18:26

Fiz algumas alterações e funcionou no GM8:

Código:: /////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// /*Tutorials Copyrights Todos direitos reservados.Copyright 2010 by VF Victor Follador. É autorizada a distribuição desse tutorial desde que o nome do autor esteja contido no mesmo e que a obra não seja modificada sem autorização do autor. Game Maker Copyright Game Maker by Mark Overmars (http://www.gamemaker.nl). */ /////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// //Cria o sprite para colisões global.sprite_c = sprite_create_from_screen(0,0,32,32,0,0,0,0) //Pontuação highscore_set_strings('RANKING','Ninguem','Aperte enter para sair') //Impede de dar erro no menu principal opcao2 = 99 //Menu Prinicpal opcao = show_message_ext('Selecione uma opção','JOGAR','OPÇÕES','SAIR') if opcao = 1 { } if opcao = 2 { opcao2 = show_message_ext('Selecione uma opção','COMO JOGAR','RANKING','RANK S') if opcao2 = 1 { show_info() game_restart() } if opcao2 = 2 { highscore_show(0) game_restart() } if opcao2 = 3 { certeza = show_question('Tem certeza que deseja apagar todas pontuações feitas pelos usuarios e começar um novo com rankings oficiais de padrão para tentar superalos?') if certeza = true { // Prepara um novo ranking highscore_clear() highscore_add('péssimo',1) highscore_add('ruim',100) highscore_add('principiante',300) highscore_add('regular',500) highscore_add('bom',800) highscore_add('Amador',1000) highscore_add('Pro',1500) highscore_add('Maniaco',2000) } game_restart() } } if opcao = 3 { game_end() } if opcao = 0 then game_restart() if opcao2 = 0 then game_restart() //Cria a bolinha que você controla global.player_1 = object_add() object_set_sprite(global.player_1,global.sprite_c) http://global.sprite_c é o sprite da bolinha (somente para colisão) object_event_add(global.player_1,ev_step,0,'sprite_get_bbox_top(global.player_1= 4) sprite_get_bbox_left(global.player_1= 4) sprite_get_bbox_right(global.player_1= 28) sprite_get_bbox_bottom(global.player_1= 28)') instance_create(320,272,global.player_1) //Cria os controles da bolinha object_event_add(global.player_1,ev_step,0,'if keyboard_check(vk_up) = true then if y > 30 then y-=6') object_event_add(global.player_1,ev_step,0,'if keyboard_check(vk_down) = true then if y < 380 then y+=6') object_event_add(global.player_1,ev_step,0,'if keyboard_check(vk_left) = true then if x > 10 then x-=6') object_event_add(global.player_1,ev_step,0,'if keyboard_check(vk_right) = true then if x < 600 then x+=6') //Cria os blocos inimigos global.evento = object_add() global.posicao = choose(10,25,15,14,20,16,13,11,12,9,8)//Velocidade dos blocos inimigos object_set_sprite(global.evento,global.sprite_c) object_event_add(global.evento,ev_step,0,'sprite_get_bbox_top(global.evento= 4) sprite_get_bbox_left(global.evento= 4) sprite_get_bbox_right(global.evento= 28) sprite_get_bbox_bottom(global.evento= 26)') object_event_add(global.evento,ev_create,0,'global.posicao = choose(10,16,13,11,12,9,8,11,10) vspeed = global.posicao hspeed = 0') object_event_add(global.evento,ev_animation_end,0,'instance_create(random(640),0,global.evento) instance_destroy()') instance_create(random(640),500,global.evento) //Mostra a bolinha object_event_add(global.player_1,ev_draw,0,'draw_set_color(c_blue) draw_ellipse_color(x-16,y-16,x+16,y+16,c_blue,c_fuchsia,0) draw_set_color(c_black)') //Mostra os blocos inimigos object_event_add(global.evento,ev_draw,0,'draw_rectangle_color(x-16,y-16,x+16,y+16,c_black,c_dkgray,c_silver,c_red,0)') //Cria o objeto principal global.evento2 = object_add() object_event_add(global.evento2,ev_create,0,'depth = -10 alarm[0]= 100') object_event_add(global.evento2,ev_step,0,'score += 1') object_event_add(global.evento2,ev_alarm,0,'instance_create(random(640),500,global.evento) alarm[0] = 100') instance_create(1,400,global.evento2) font_get_bold(1) draw_set_color(c_blue) //Mostra a pontuação na tela object_event_add(global.evento2,ev_draw,0,"draw_set_color(c_dkgray) draw_rectangle(0,400,640,480,0) image_alpha = 0.6 draw_set_color(c_black) draw_rectangle(100,400,500,460,0) image_alpha = 1") object_event_add(global.evento2,ev_draw,0,"draw_set_color(c_blue)draw_text_transformed(100,400,'PONTOS',2,2,0) draw_set_color(c_white)draw_text_transformed(270,400,score,2,2,0)") //Cria um objeto para mostrar a chuva global.evento3 = object_add() object_event_add(global.evento3,ev_draw,0,"effect_create_below(ef_rain ,x,y,2,c_white)") object_event_add(global.evento3,ev_create,0,'depth = 10') instance_create(1,400,global.evento3) //colisao da bola com o quadrado object_event_add(global.player_1,ev_collision,global.evento,"highscore_show(score) game_restart()") //OUTRAS CONFIGURAÇÕES room_caption = 'Desvie dos quadrados,Engine de Victor Follador 2010' show_score = false draw_set_color(c_purple) window_set_cursor(cr_uparrow) background_color = c_maroon effect_create_below(ef_explosion ,x,y,2,c_black)

Ficou até legal o jogo por ter sido feito inteiramente em código.

por **fonetico** Dom 02 maio 2010, 18:30

Cainã hoje você salvou a pátria:

Foi como ele disse, o jogo está bem legal por ter sido feito só em GML, é o poder da programação. oO

por Vikintor Qua 05 maio 2010, 10:36

Muito obrigado por ter feito uma adaptação para Gm8 Cainã.
Essa engine cria os objetos e adiciona os comandos só por código.
Quando puder eu posto mais tutoriais.
Happy

por lucas mendes Qui 06 maio 2010, 21:50

NUOOSAa Kra!
os dois estão de parabens!
Conceguiram Criar varios objetos em apenas um codigo!
Nota: 10

por F. Nizzio Qui 06 maio 2010, 23:08

Caramba! Belo trabalho!

Provado que o GM é a melhor ferramenta de edição amadora(por vezes profissional) de jogos!

por kalegos Sáb 31 Jul 2010, 11:31

n consequi joga buuuuuuuuuuueeeeeeeee Fight!

por GuiEdu Sáb 31 Jul 2010, 11:56

Cara, eu mal sei fazer jogos da maneira tradicional aí vem um e faz um todo em código affraid

Que espetáculo cara, vc tem talento, achei incrivel ;)
flw Very Happy

por Vikintor Sáb 31 Jul 2010, 12:02

GuiEdu escreveu:Cara, eu mal sei fazer jogos da maneira tradicional aí vem um e faz um todo em código
Que espetáculo cara, vc tem talento, achei incrivel ;)
flw

Obrigado

.Mas ainda tenho muito a aprender,não fiz nenhum grande projeto ainda,mas pretendo fazer algum dia.
Quem quiser adaptar o código ou usar ele em algum projeto não precisa dar créditos,fiquem a vontade para usar.

kalegos escreveu:n consequi joga buuuuuuuuuuueeeeeeeee

Basta colocar o código no 'creation code' da room e apertar F5.
mas primeiro cheque a versão do game maker.Se for a 7 é a primeira,se for 8 é a segunda adaptada por cainã.

por alexs2195 Sex 24 Set 2010, 17:27

Muito bom, nem se quer precisou-se criar um obj apenas colocar o codigo no mapa muito bom! Very Happy

Espero que continue melhorando!

por Vikintor Seg 07 Fev 2011, 19:47

Não irei abrir um tópico novo para discutir algo que pode ser discutido aqui,envolvendo o tópico.

Que tipo de script nesse estilo vocês acham que facilitariam o processo de criação de jogos de vocês ?
Menu automático, Sistema de rpg etc... ?

por KaxoteGM Qui 03 Mar 2011, 19:54

|o||o||o|
Cara ta muito loco (muito massa) e vc ainda fala que tem muito a aprender???
Se vc melhorar o tanto que acha que tem a melhorar, vc vai fazer um "God Of War" ou um "GTA" pelo GM..
Parabens de verdade man.
flw