Hitskin.com

Voilà un logiciel en un script par MuZzLe.

Code:: //////////////////////////////////////////////////////////////

////// WeB Fx - text filter generating program for IE 5+

////// Written by MuZzLe (http://www.muzzle4ge.net)

////// Copyright © MuZzLe

////// Exploiting this script will result in being gang

////// banged by a bunch of hippies with orange teeth

////// Instructions: to use this script make a room of

////// 300 x 400 in size.

////// Then put this script in the DRAW event of a object.

////// Finally put the text inside the " in the room creation

////// event - "global.effect= ' ';"

//////////////////////////////////////////////////////////////

//colourz

brush_color=make_color( 68, 71,200);

pen_color = make_color( 0, 0,200);

draw_rectangle(0, 0, room_width, room_height) ;

//title

font_color= c_navy;

font_size=22;

font_name = "Arial";

font_align=fa_left;

draw_text(18,8, "WeB Fx") ;

font_color=make_color(204,205,238) ;

font_size=22;

font_name = "Arial";

font_align=fa_left;

draw_text(20,10, "WeB Fx") ;

font_color=make_color(204,205,238) ;

font_size=10;

font_name = "Arial";

draw_text(160, 20, "by MuZzLe") ;

font_align=fa_center;

draw_text(150, 52, "Choose a filter!") ;

//glow text

font_size=10;

font_name = "Arial";

brush_color=make_color( 68, 71,200);

draw_button(60,80,240,100, 0);

font_align=fa_center;

draw_text(150,82, "Glowing text") ;

if (mouse_x > 60 && mouse_x <240> 80 && mouse_y </div> 60 && mouse_x <240> 120 && mouse_y </font> 60 && mouse_x <240> 160 && mouse_y </font> 60 && mouse_x <240> 200 && mouse_y </font> 60 && mouse_x <240> 240 && mouse_y </font> 60 && mouse_x <240> 280 && mouse_y < 300 && mouse_check_button(mb_left)) {

brush_color=make_color( 68, 71,200);

draw_button( 60,100,80,155, 1);

font_align=fa_center;

draw_text(150,282, "Flipped text") ;

text = get_string('Enter desired text:','Why the hell would you want to flip some text?!?!?!?');

fontsize = get_string('Enter font size:','14');

font = get_string('Enter font text:','Comic Sans MS');

textcolour = get_string('Enter the text colour (include the hash):','#ffffff');

height = get_string('Enter height of text','90');

width = get_string('Enter width of text','260');

global.effect = string ('<div><font size="7" face="'+font+'" color="'+textcolour+'">'+text+'</font></div>');

io_clear();

show_message("This file will be saved as a HTML file so you can view it.")

show_message ('The file will be saved in the same directory as WeB Fx is in. If a file of the same name exists, it will be overwrote')

fname = get_string('Enter filename for the script:','WeB fx script');

file_open_write(fname);

file_write_string('<body>');

file_writeln();

file_write_string('<center> ');

file_writeln();

file_write_string(' ' + global.effect);

file_writeln();

file_write_string('<br><br><br><br><br><br><font color="#ffffff">Here is your text! just copy and paste!</font><br><br>');

file_writeln();

file_write_string('<textarea>' + global.effect + '</textarea>');

file_writeln();

file_write_string('<br><br><marquee><font color="#ffffff">Text created with WeB Fx by MuZzLe!!!</font>');

file_writeln();

file_close();

file_rename(fname, fname +'.html');

}

//creditz

font_size=9;

font_align=fa_left;

draw_text(30, 320, "Note:") ;

font_align=fa_left;

draw_text(20, 335, "All these filters are compatable with IE 5+") ;

font_align=fa_left;

draw_text(20, 350, " but may not be compatable with other browsers.") ;

font_align=fa_center;

draw_text(150,380, "Copyright MuZzLe - http://www.muzzle4ge.net") ;

http://sites.estvideo.com/ccj/gml.html

Utilisateur confirmé: Rang ***** Messages : 1734

et il sert a quoi?

moi il marche pas donc je sais pas

à utiliser dans la version 5.3a ou 5.0

Utilisateur confirmé: Rang ***** Messages : 1734

il y a une version pour la 6?

non,
mas ça peut se faire.

Utilisateur confirmé: Rang ***** Messages : 1734

ok

tu l'as testé ce script?

bien sûr.

Utilisateur confirmé: Rang ***** Messages : 1734

et il fait quoi?

c'est un logiciel pour faire des effets de texte dans une page web.

Invité

C'est normal qu'il marche pour lui et pas pour vous!
Il la mit en citation, donc il a composé un smylie! Mais le en CODE

Code:: comme sa!

:oui:

Administrateur Messages : 20021 Localisation : Alsace

J'ai corrigé ce petit oubli. clinoeuil

Sujet: Re: Script par MuZzLe Ven 24 Nov 2006 - 19:34

Dans l'ancien forum,j'ai vu aussi un code GML comme sa sauf que c'était un jeu! :fier:
Attendait je met le code et le lien.

Code:: ///////////////////////////////////////////////////////////////
//name:
// Hangman's escape
//
//scrpt type:
// one scrpt game
//
//autor:
// Ben Strasser alias Dr.Voodoo
//
//remarque:
// Put this scrpt in the room creation code, creation event,
// begin/end step event, step event, game start event, room
// start event or the draw event (only in one)
//
//remarque2:
// Use standard GM settings
//
//copyright:
// Ben Strasser
//
///////////////////////////////////////////////////////////////
game_end();
full_screen=1;
screen_width=monitor_width;
screen_height=monitor_height;
scale_full=100;
show_score=false;
show_cursor=false;
tun=2;
end_loop=1;
pre_seconde=current_second;
fps_counter=0;
fps_loop=1;
pre_time=current_time;
state='Main';
cursor_type='normal';
//
while(end_loop)
{
if keyboard_check(vk_escape)
{
state='Gameend';
io_clear();
io_handle()
};
if keyboard_check(vk_shift)
{
end_loop=0
};
fps_counter+=1;
if pre_seconde!=current_second
{
fps_loop=fps_counter;
fps_counter=0;
};
pre_seconde=current_second;
pre_time=current_time;
//***Main***
if state=='Main'
{
brush_color=c_black;
pen_color=c_black;
draw_rectangle(0,0,screen_width,screen_height);
font_size = screen_width/1024*80;
font_color = c_white;
font_align = fa_center;
font_style = fs_bold;
font_name = 'Comic Sans MS';
Y=5;
draw_text(screen_width/2,Y,"Hangman's escape");
Y+=string_height('M');
font_size = screen_width/1024*20;
draw_text(screen_width/2,Y,'by Ben Strasser alias Dr.Voodoo');
Y+=string_height('M');
font_size = screen_width/1024*50;
draw_text(screen_width/2,Y,'Start Game');
Y+=string_height('M');
draw_text(screen_width/2,Y,'Help');
Y+=string_height('M');
draw_text(screen_width/2,Y,'Web');
Y+=string_height('M');
draw_text(screen_width/2,Y,'Exit');
font_size=screen_width/1024*80;
Y=5+string_height('M');
font_size=screen_width/1024*20;
Y+=string_height('M');
font_size=screen_width/1024*50;
if mouse_y>Y&&mouse_y<Y+string_height('M')
{
font_color=c_red;
draw_text(screen_width/2,Y,'Start Game');
if mouse_check_button(mb_left)
{
mouse_clear(mb_left);
state='Gameini'
};
};
Y+=string_height('M');
if mouse_y>Y&&mouse_y<Y+string_height('M')
{
font_color=c_red;
draw_text(screen_width/2,Y,'Help');
if mouse_check_button(mb_left)
{
state='Help';
mouse_clear(mb_left)
};
}
Y+=string_height('M');
if mouse_y>Y&&mouse_y<Y+string_height('M')
{
font_color=c_red;
draw_text(screen_width/2,Y,'Web');
if mouse_check_button(mb_left)
{
file_open_write(temp_directory+'\URL.url');
file_write_string('[InternetShortcut]');file_writeln();
file_write_string('URL=http://de.geocities.com/ben0032003/');file_close();
execute_shell(temp_directory+'\URL.url','');
end_loop=0
};
};
Y+=string_height('M');
if mouse_y>Y&&mouse_y<Y+string_height('M')
{
font_color=c_red;
draw_text(screen_width/2,Y,'Exit');
if mouse_check_button(mb_left)
end_loop=0;
}
if mouse_check_button(mb_left)
mouse_clear(mb_left)
};
//***Gameend***
if state=='Gameend'
{
cursor_type='normal';
//scale_full=100;
screen_width=monitor_width;
screen_height=monitor_height;
state='Main';
};
//***Help***
if state=='Help'
{
brush_color=c_black;
pen_color=c_black;
draw_rectangle(0,0,screen_width,screen_height);
font_size = screen_width/1024*25;
font_color = c_white;
font_align = fa_left;
font_style = fs_bold;
font_name = 'Comic Sans MS';
draw_text_ext(20,5,"Hangman doesn't want to get hanged so he's running away. Use the left and right arrow keys to run, the up arrow key to jump, space to show or hide the fps and ESC to end the game. After some levels his escape will be discovered and people will start looking for him. You can only try to avoid them.#Hangman's escape is designed to run at a speed of 32fps#Hangman's escape Ben Strasser 2003.#This program was written by Ben Strasser.#Gamemaker Mark Overmars 1999-2002.#www.gamemaker.nl",string_height('M'),screen_width-40)
if mouse_check_button(mb_left)
{
state='Main'
mouse_clear(mb_left)
}
};
//***Gameini***
if state=='Gameini'
{
screen_width=640;
screen_height=480;
cursor_type='none';
show_fps=1;
clouds=0;
cols=0;
x=0;
y=1000;
hspeed=0;
vspeed=0;
faster=2;
max_speed=10;
friction=1;
gravity=0.5;
wall[0,0]=0;
door_X=0;
door_Y=0;
monsters=0;
level=1;
X=0;
Y=0;
door_X=0;
door_Y=0;
state='Game'
};
//***Game***
if state=='Game'
{
//levels data begin
if (X==door_X&&Y==door_Y)||y>480
{
X=0;
Y=0;
repeat(20*15)
{
wall[X,Y]=0;
X+=1;
if X==20
{
X=0;
Y+=1
}
};
if y<=480 level+=1;
if level==6
level=1;
if level==1
{
//---level1---
monsters=0;
x=32*4+8;
y=32*11+32-24;
hspeed=0;
vspeed=0;
faster=2;
max_speed=10;
friction=1;
gravity=0.5;
wall[0,0]=0;
wall[1,12]=1;
wall[2,12]=1;
wall[3,12]=1;
wall[4,12]=1;
wall[5,12]=1;
wall[6,12]=1;
wall[7,12]=1;
wall[8,12]=1;
wall[9,12]=1;
wall[10,12]=1;
wall[11,12]=1;
wall[12,12]=1;
wall[13,12]=1;
wall[14,12]=1;
wall[15,12]=1;
wall[16,12]=1;
wall[17,12]=1;
wall[18,12]=1;
wall[4,2]=1;
wall[5,2]=1;
wall[6,2]=1;
wall[9,4]=1;
wall[10,4]=1;
wall[11,4]=1;
wall[16,5]=1;
wall[17,5]=1;
wall[18,5]=1;
wall[10,7]=1;
wall[11,7]=1;
wall[12,7]=1;
wall[3,8]=1;
wall[4,8]=1;
wall[5,8]=1;
wall[7,10]=1;
wall[8,10]=1;
wall[9,10]=1;
door_X=5;
door_Y=1;
//---Level1---
};
if level==2
{
//---level2---
monsters=0;
x=32*18+8;
y=32*11+32-24;
hspeed=0;
vspeed=0;
faster=2;
max_speed=10;
friction=1;
gravity=0.5;
wall[1,12]=1;
wall[2,12]=1;
wall[3,12]=1;
wall[4,12]=1;
wall[5,12]=1;
wall[6,12]=1;
wall[7,12]=1;
wall[8,12]=1;
wall[9,12]=1;
wall[10,12]=1;
wall[11,12]=1;
wall[12,12]=1;
wall[13,12]=1;
wall[14,12]=1;
wall[15,12]=1;
wall[16,12]=1;
wall[17,12]=1;
wall[18,12]=1;
wall[1,9]=1;
wall[2,9]=1;
wall[3,9]=1;
wall[11,7]=1;
wall[12,7]=1;
wall[13,7]=1;
wall[16,4]=1;
wall[17,4]=1;
wall[18,4]=1;
door_X=17;
door_Y=3;
//---Level2---
};
if level==3
{
//---level3---
monsters=0;
x=32*17+8;
y=32*1+32-24;
hspeed=0;
vspeed=0;
faster=2;
max_speed=10;
friction=1;
gravity=0.5;
wall[1,2]=1;
wall[2,2]=1;
wall[3,2]=1;
wall[6,2]=1;
wall[7,2]=1;
wall[8,2]=1;
wall[11,2]=1;
wall[12,2]=1;
wall[13,2]=1;
wall[16,2]=1;
wall[17,2]=1;
wall[18,2]=1;
wall[3,5]=1;
wall[4,5]=1;
wall[5,5]=1;
wall[6,5]=1;
wall[8,5]=1;
wall[9,5]=1;
wall[10,5]=1;
wall[11,5]=1;
wall[13,5]=1;
wall[14,5]=1;
wall[15,5]=1;
wall[16,5]=1;
wall[4,11]=1;
wall[5,11]=1;
wall[6,11]=1;
wall[3,13]=1;
wall[4,13]=1;
wall[5,13]=1;
wall[6,13]=1;
wall[7,13]=1;
door_X=5;
door_Y=12;
//---Level3---
};
if level==4
{
//---level4---
monsters=5;
monster_x[1]=32*8+8;
monster_y[1]=32*11+32-24;
monster_hspeed[1]=3;
monster_actif[1]=1;
monster_x[2]=32*8+8;
monster_y[2]=32*11+32-24;
monster_hspeed[2]=-3;
monster_actif[2]=1;
monster_x[3]=32*7+8;
monster_y[3]=32*9+32-24;
monster_hspeed[3]=3;
monster_actif[3]=1;
monster_x[4]=32*11+8;
monster_y[4]=32*6+32-24;
monster_hspeed[4]=3;
monster_actif[4]=1;
monster_x[5]=32*10+8;
monster_y[5]=32*3+32-24;
monster_hspeed[5]=3;
monster_actif[5]=1;
x=32*4+8;
y=32*11+32-24;
hspeed=0;
vspeed=0;
faster=2;
max_speed=10;
friction=1;
gravity=0.5;
wall[0,0]=0;
wall[1,12]=1;
wall[2,12]=1;
wall[3,12]=1;
wall[4,12]=1;
wall[5,12]=1;
wall[6,12]=1;
wall[7,12]=1;
wall[8,12]=1;
wall[9,12]=1;
wall[10,12]=1;
wall[11,12]=1;
wall[12,12]=1;
wall[13,12]=1;
wall[14,12]=1;
wall[15,12]=1;
wall[16,12]=1;
wall[17,12]=1;
wall[18,12]=1;
wall[4,2]=1;
wall[5,2]=1;
wall[6,2]=1;
wall[9,4]=1;
wall[10,4]=1;
wall[11,4]=1;
wall[16,5]=1;
wall[17,5]=1;
wall[18,5]=1;
wall[10,7]=1;
wall[11,7]=1;
wall[12,7]=1;
wall[3,8]=1;
wall[4,8]=1;
wall[5,8]=1;
wall[7,10]=1;
wall[8,10]=1;
wall[9,10]=1;
door_X=5;
door_Y=1;
//---Level4---
};
if level==5
{
//---level5---
monsters=7;
monster_x[1]=32*5+8;
monster_y[1]=32*10+32-24;
monster_hspeed[1]=3;
monster_actif[1]=1;
monster_x[2]=32*7+8;
monster_y[2]=32*8+32-24;
monster_hspeed[2]=3;
monster_actif[2]=1;
monster_x[3]=32*9+8;
monster_y[3]=32*6+32-24;
monster_hspeed[3]=-3;
monster_actif[3]=1;
monster_x[4]=32*11+8;
monster_y[4]=32*4+32-24;
monster_hspeed[4]=3;
monster_actif[4]=1;
monster_x[5]=32*13+8;
monster_y[5]=32*2+32-24;
monster_hspeed[5]=3;
monster_actif[5]=1;
monster_x[6]=32*16+8;
monster_y[6]=32*4+32-24;
monster_hspeed[6]=3;
monster_actif[6]=1;
monster_x[7]=32*17+8;
monster_y[7]=32*6+32-24;
monster_hspeed[7]=3;
monster_actif[7]=1;
x=32*3+8;
y=32*12+32-24;
hspeed=0;
vspeed=0;
faster=2;
max_speed=10;
friction=1;
gravity=0.5;
wall[2,13]=1;
wall[3,13]=1;
wall[4,13]=1;
wall[4,11]=1;
wall[5,11]=1;
wall[6,11]=1;
wall[6,9]=1;
wall[7,9]=1;
wall[8,9]=1;
wall[8,7]=1;
wall[9,7]=1;
wall[10,7]=1;
wall[10,5]=1;
wall[11,5]=1;
wall[12,5]=1;
wall[12,3]=1;
wall[13,3]=1;
wall[14,3]=1;
wall[15,5]=1;
wall[16,5]=1;
wall[17,5]=1;
wall[16,7]=1;
wall[17,7]=1;
wall[18,7]=1;
wall[14,9]=1;
wall[15,9]=1;
wall[16,9]=1;
door_X=15;
door_Y=8;
//---Level5---
}
};
//levels data end
while(pre_time==current_time)
{
pre_time=current_time;
sleep(1);
};
brush_color=make_color(0,0,124);
pen_color=brush_color;
draw_rectangle(0,0,screen_width,screen_height);
temp=1;
repeat(clouds)
{
pen_color=c_black;
brush_color=c_white;
draw_ellipse(cloud_x[temp],cloud_y[temp],cloud_x[temp]+cloud_size[temp],cloud_y[temp]+cloud_size[temp]/2);
cloud_x[temp]+=cloud_speed[temp];
if cloud_x[temp]>screen_width
{
temp2=temp;
repeat(clouds-temp)
{
cloud_x[temp2]=cloud_x[temp2+1];
cloud_y[temp2]=cloud_y[temp2+1]
cloud_speed[temp2]=cloud_speed[temp2+1];
cloud_size[temp2]=cloud_size[temp2+1];
temp2+=1
};
clouds-=1
}
else
temp+=1
};
temp=1;
repeat(cols)
{
pen_color=c_black;
brush_color=c_green;
draw_triangle(col_x[temp],col_y[temp],col_x[temp]-(screen_height-col_y[temp]),screen_height+1,col_x[temp]+(screen_height-col_y[temp]),screen_height+1);
col_x[temp]+=col_speed[temp];
if col_x[temp]-(screen_height-col_y[temp])>screen_width
{
temp2=temp;
repeat(cols-temp)
{
col_x[temp2]=col_x[temp2+1];
col_y[temp2]=col_y[temp2+1]
col_speed[temp2]=col_speed[temp2+1];
temp2+=1
};
cols-=1
}
else
temp+=1
};
if floor(random(24*tun))==0
{
clouds+=1;
cloud_size[clouds]=floor(random(40))+10;
cloud_y[clouds]=floor(random(screen_height-cloud_size[clouds]/2))
cloud_x[clouds]=-cloud_size[clouds];
cloud_speed[clouds]=cloud_size[clouds]/8
};
if floor(random(35*tun))==0
{
cols+=1;
col_y[cols]=floor(random(screen_height/2))+screen_height/2;
col_x[cols]=-col_y[cols];
col_speed[cols]=6;
};
//blocks
X=0;
Y=0;
repeat(20*15)
{
if wall[X,Y]
{
brush_color=make_color(70,69,60);
pen_color=brush_color;
draw_rectangle(X*32,Y*32,(X+1)*32,(Y+1)*32);
if X!=0
if wall[X,Y-1]==0
{
brush_color=make_color(0,124*1.5,0);
pen_color=brush_color;
draw_rectangle(X*32,Y*32,(X+1)*32,Y*32+10);
}
};
X+=1
if X==20
{
X=0;
Y+=1
}
};
//door
brush_color=c_black;
pen_color=c_black;
X=door_X*32;
Y=door_Y*32;
draw_ellipse(X,Y,X+32,Y+32);
draw_rectangle(X,Y+16,X+32,Y+32);
//monsters
temp=1;
repeat(monsters)
{
if monster_actif[temp]==1
{
X=floor((monster_x[temp]+8)/32);
if X<0
X=0;
if X>19
X=19;
Y=floor((monster_y[temp])/32);
if Y<0
Y=0;
if Y>14
Y=14;
if wall[X,Y+1]==false
monster_hspeed[temp]=-monster_hspeed[temp];
pen_color=c_black;
draw_line(monster_x[temp],monster_y[temp]+24,monster_x[temp]+8,monster_y[temp]+16)
draw_line(monster_x[temp]+8,monster_y[temp]+16,monster_x[temp]+16,monster_y[temp]+24)
draw_line(monster_x[temp]+8,monster_y[temp]+16,monster_x[temp]+8,monster_y[temp]+8)
draw_line(monster_x[temp],monster_y[temp]+16,monster_x[temp]+8,monster_y[temp]+8)
draw_line(monster_x[temp]+8,monster_y[temp]+8,monster_x[temp]+16,monster_y[temp]+16)
brush_color=make_color(255,0,0)
draw_rectangle(monster_x[temp]+4,monster_y[temp]+8,monster_x[temp]+12,monster_y[temp]);
monster_x[temp]+=monster_hspeed[temp];
if x+8>monster_x[temp]-4&&x+8<monster_x[temp]+20&&y+8>monster_y[temp]+7&&y+8<monster_y[temp]+16
y=1000
};
temp+=1;
};
//player
pen_color=c_black;
draw_line(x,y+24,x+8,y+16)
draw_line(x+8,y+16,x+16,y+24)
draw_line(x+8,y+16,x+8,y+8)
draw_line(x,y+16,x+8,y+8)
draw_line(x+8,y+8,x+16,y+16)
brush_color=make_color(255,128,0)
draw_rectangle(x+4,y+8,x+12,y);
x+=hspeed;
y+=vspeed;
X=floor((x+8)/32);
if X<0
X=0;
if X>19
X=19;
Y=floor((y)/32);
if Y<0
Y=0;
if Y>13
Y=13;
if wall[X,Y+1]
{
if abs(hspeed)>friction
{
hspeed-=friction*sign(hspeed)
}
else
hspeed=0;
if keyboard_lastkey==vk_left
{
hspeed-=faster;
if hspeed<-max_speed
hspeed=-max_speed
};
if keyboard_lastkey==vk_right
{
hspeed+=faster
if hspeed>max_speed
hspeed=max_speed
};
vspeed=0;
y=Y*32+32-24
if keyboard_lastkey==vk_up
vspeed=-9
}
else
vspeed+=gravity;
if keyboard_key==vk_nokey
keyboard_lastkey=vk_nokey;
if keyboard_check(vk_space)
{
show_fps=!show_fps;
keyboard_clear(vk_space);
io_handle()
};
if show_fps
{
brush_color=c_white;
pen_color=c_black;
font_name='Arial';
font_size=10;
font_color=c_black;
font_align=fa_left;
draw_rectangle(0,0,string_width('fps='+string(fps_loop)+' Level='+string(level)+' Hit ESC to exit.')+10,string_height('M')+10)
draw_text(5,5,'fps='+string(fps_loop)+' Level='+string(level)+' Hit ESC to exit.')
}
};
if cursor_type=='normal'
{
brush_color=make_color(100,100,100)
pen_color=c_black;
draw_triangle(mouse_x,mouse_y,mouse_x+20,mouse_y+20,mouse_x+20,mouse_y+40)
brush_color=make_color(200,200,200);
draw_triangle(mouse_x,mouse_y,mouse_x+20,mouse_y+20,mouse_x+40,mouse_y+20)
brush_color=make_color(150,150,150);
draw_triangle(mouse_x+20,mouse_y+40,mouse_x+20,mouse_y+20,mouse_x+40,mouse_y+20);
};
screen_refresh();
};

http://forum.aceboard.net/43643-182-5643-0-Scriptgame.htm

Sujet: Re: Script par MuZzLe Lun 27 Nov 2006 - 18:11

C'est pas mal tu fouilles dans l'ancien forum. happy1

» [script]draw_sprite_outlined
» [script]draw_circle_soft
» [script] draw_sprite_unicolor
» [script] draw_sprite_part_rot
» IA Deplacement avion

Hitskin.com

Script par MuZzLe