Système de messagebox

var mess,ax,ay,i,w,c;

keyboard_clear(vk_space)

ax=argument0+view_xview
ay=argument1+view_yview
mess=argument2

//Affiche le fond de la boite
draw_sprite(MessageBox_Spr,0,ax,ay)

i=0
w=0
var loop ; loop = true

// Demarre une boucle pour freezer le jeu.
while (loop) {
io_handle()
//Si on appuie sur la touche valider, la lettre suivante apparait, si on est à la fin du message, la boucle se termine
if keyboard_check(global.key_A)
{if i>=string_length(string(mess))
{loop=false}
else
{w=200}
}

//Affiche une lettre toute les 200 frames.
w+=1
if w>=200 and i<string_length(string(mess)){
sound_play(LA_Text_Letter)
// On recupère la lettre dans la variable c
c = string_char_at(string(mess), i+1)

//Si la lettre est un "\", et que la lettre d'après est un "n", on les effacent, et on descend d'une ligne.
if c=="\"{
if string_char_at(string(mess), i+2)=="n"{
c=""
ay+=10
ax=argument0+view_xview
}
//Si c'est un p on affiche la variable global.name
if string_char_at(string(mess), i+2)=="p"
{mess=string_insert(string(global.name),mess,i+1)}}
draw_text(ax+2,ay+2,c)
i+=1
ax+=8


w=0}

//Rafraichit l'écran
screen_refresh()
}
message=""
keyboard_clear(global.key_A)

var delay;
delay = argument...;

while(loop) {
    sound_play( LA_Text_Letter );

    ...

  sleep(delay);
}