Bob65 Utilisateur confirmé: Rang *
Messages : 186 Localisation : Québec, Canada Projet Actuel : Death Trail
| Sujet: Vrai boîte de message ( celle de windows ) GM 6.1 Dim 6 Juil 2008 - 22:38 | |
| Voici un script qui vous permet de faire des boîtes de message de Windows! Le voici ( nommez-le : "show_message_box" ) : - Code:
-
if file_exists("messagebox.vbs") = false { screen_refresh() if (argument2 = 0) {argument2 = 0} if (argument2 = 1) {argument2 = 16} if (argument2 = 2) {argument2 = 32} if (argument2 = 3) {argument2 = 48} if (argument2 = 4) {argument2 = 64} if (argument2 = 5) {argument2 = 0}
textfile = file_text_open_append("messagebox.vbs") file_text_writeln(textfile); file_text_write_string(textfile,'x=msgbox("' + argument0 + '",'+ string(argument2) + ' + 0,"' + argument1 +'")'); file_text_close(textfile);
textfile = file_text_open_append("messagebox.vbs") file_text_writeln(textfile); file_text_write_string(textfile,'strFile = "messagebox.vbs"'); file_text_close(textfile);
textfile = file_text_open_append("messagebox.vbs") file_text_writeln(textfile); file_text_write_string(textfile,'Set fs = CreateObject("Scripting.FileSystemObject")'); file_text_close(textfile);
textfile = file_text_open_append("messagebox.vbs") file_text_writeln(textfile); file_text_write_string(textfile,'fs.deletefile strFile'); file_text_close(textfile);
execute_shell("messagebox.vbs",true)
if file_exists("messagebox.vbs") = false {screen_redraw()}
}
Exécutez le comme ceci: show_message_box(Message,Titre,Style) Exemple: - Code:
-
show_message_box("Ceci est une vrai boîte de message!","Titre de la boîte",4) Il y a 5 styles possible: Style 0 Style 1 Style 2 Style 3 Style 4Voilà!
Dernière édition par Bob65 le Lun 7 Juil 2008 - 15:24, édité 1 fois |
|
nicoulas *Excellent utilisateur*
Messages : 6030 Localisation : Dordogne Projet Actuel : Croustaface Tower Defense
| Sujet: Re: Vrai boîte de message ( celle de windows ) GM 6.1 Dim 6 Juil 2008 - 22:56 | |
| nice ! t'as fait du bon boulot |
|
edi9999 Utilisateur confirmé: Rang *****
Messages : 2480 Localisation : France Projet Actuel : theatre flashy
| Sujet: Re: Vrai boîte de message ( celle de windows ) GM 6.1 Lun 7 Juil 2008 - 13:00 | |
| Ca donne un bon rendu, good work . |
|
Bob65 Utilisateur confirmé: Rang *
Messages : 186 Localisation : Québec, Canada Projet Actuel : Death Trail
| Sujet: Re: Vrai boîte de message ( celle de windows ) GM 6.1 Lun 7 Juil 2008 - 15:25 | |
| J'ai modifié un peu le script pour que quand il y a un message, le jeu se met en pause. |
|
Dan_lizhot Modérateur
Messages : 3463 Projet Actuel : Crypt Of Darkness
| Sujet: Re: Vrai boîte de message ( celle de windows ) GM 6.1 Lun 7 Juil 2008 - 15:28 | |
| |
|
972_creator Bavard
Messages : 106 Projet Actuel : Matrix Trilogy 2D
| Sujet: Re: Vrai boîte de message ( celle de windows ) GM 6.1 Lun 9 Fév 2009 - 19:01 | |
| super, nice, bieutifull... _________________ The matrix has you |
|
Contenu sponsorisé
| Sujet: Re: Vrai boîte de message ( celle de windows ) GM 6.1 | |
| |
|