Etape 1: le code
code
faire
x = msgbox ("N’appuyez pas sur", 0, « erreur »)
x = msgbox ("* ahem * je SAID n’appuyez pas sur", 0, « Erreur »)
x = msgbox ("... VOUS AVEZ APPUYÉ SUR ELLE À NOUVEAU. » & vbCrLf & "OK PUNK, appuyez dessus AGAIN.", 0, "Erreur")
x = msgbox ("YEAH, c’est tout." & vbCrLf & "COME ON, une fois de plus.", 0, "Erreur")
x=MsgBox("Again.",0,"Error")
x = msgbox ("DO IT", 0, « Erreur »)
x = msgbox ("OK, maintenant vous avez fait le plein. » & vbCrLf & "STOP en cliquant!", 0, "Erreur")
x = msgbox (« Vous voyez, c’est pourquoi nous ne pouvons pas être amis. », 0, « erreur »)
x = msgbox (« Vous êtes trop égoïste. », 0, « erreur »)
x = msgbox ("Grrr... maintenant vous avez demandé pour elle. » & vbCrLf & "N’appuyez pas sur le bouton OK de la!", 0, "erreur")
x = msgbox (« Vous semblez être immunisés contre mon contrôle de l’esprit. », 0, « erreur »)
x = msgbox ("temps de PLAN b". & vbCrLf & "appuyez dessus ! vous savez que vous voulez.", 0,"erreur")
x = msgbox ("Mhahahahahahaha ! Maintenant nous allons voir comment vous appuyez dessus! " & vbCrLf & "LOSER!", 3, "Erreur")
x = msgbox ("... cela déplaît me.", 0, « Erreur »)
x = msgbox ("... Je te hais.", 0,"erreur")
x = msgbox ("que" couper votre tête avec un "& +" \n "&" brosse à dents ' une sorte de façon. ", 0, « Erreur »)
x = msgbox ("rapide, ce qui est derrière toi!.", 0, « Erreur »)
x = msgbox ("quel est-il?" & vbCrLf & "Pas si intelligents maintenant, sont ya?!", 2, "erreur")
x = msgbox ("Okay, Okay. Vous pouvez appuyer sur le bouton OK." & vbCrLf & "Je n’ai pas attention.", 0, "erreur")
x = msgbox (« non, vraiment, je ne m’en soucie plus. », 0, « erreur »)
x = msgbox (« en fait, j’ai perdu intrest tout à l’heure. », 0, « erreur »)
x = msgbox (« Je fais cela juste pour vous divertir. », 0, « erreur »)
x=MsgBox("Really.",0,"Error")
x = msgbox ("Do vous aimez les dessins animés?", 0, « Erreur »)
x = msgbox ("... et de la peinture?", 0, « Erreur »)
x = msgbox (« Dessins et peinture? », 0, « erreur »)
x = msgbox ("Eh bien vous devriez.", 0, « Erreur »)
x = msgbox (« Me permettent d’utiliser votre internet. », 0, « erreur »)
x = msgbox (« Vous avez un virus. », 0, « erreur »)
x = msgbox ("voir, vous ne pouvez pas juste confiance en moi." & vbCrLf & "Ou vous pouvez?", 0, "erreur")
x = msgbox (« Vous savez, je suis heureux que nous recevons » & vbCrLf & "à passer autant de temps ensemble.", 0, « Erreur »)
x = msgbox ("N’est pas il vous donner envie d’arrêter" & vbCrLf & "En cliquant OK boutons.", 0, "Erreur")
x = msgbox ("non sérieusement.", 0, « Erreur »)
x = msgbox (« Look profondément à l’intérieur de vous. », 0, « Erreur »)
x=MsgBox("Deeper.",0,"Error")
x=MsgBox("Deeper!!!.",0,"Error")
x = msgbox ("que se passe-t-il si je vous disais que la prochaine" & + "\n" & « vous appuyez sur le bouton OK, le monde de time » & + "\n" & « va exploser? », 0, « erreur »)
x = msgbox (« See.You aurait pu être » & vbCrLf & "mort juste là.", 0, "Erreur")
x = msgbox ("et là.", 0, « Erreur »)
x = msgbox (« Vous savez, finalement » & vbCrLf & « Je vais arrêter la location vous vous contenter de cela. », 0, « erreur »)
x = msgbox (« Le monde va exploser » & vbCrLf & « et tout vous intéresse est en appuyant sur les boutons OK. », 0, « erreur »)
x = msgbox (« Bon, cette fois-ci le monde sera » & vbCrLf & "faire exploser. Je garantie. ", 0,"Erreur")
x = msgbox ("BOOM!" & vbCrLf & "Vous êtes mort.", 0, "Erreur")
x = msgbox (« ce n’était pas très intelligent maintenant, était-ce? », 0, « erreur »)
x = msgbox ("tous les morts. même si vous", 0,"Erreur")
x = msgbox ("je ne suis pas. Je suis juste texte.", 0,"erreur")
x = msgbox (« Mais tu es mort. », 0, « erreur »)
x = msgbox ("Ha ! Morts-visage!", 0,"Erreur")
x = msgbox ("Stop cliquant.", 0, « Erreur »)
x = msgbox (« Jamais je vous ai dit combien je te hais? », 0, « erreur »)
x = msgbox (« Eh bien, je fais », 0, « erreur »)
x = msgbox (« Je vais commencer à parler en arrière » & vbCrLf & "si vous cliquez sur moi une fois de plus.", 0, « erreur »)
x = msgbox ("? nac uoy, gagné em daer t'naC ! AH", 0,"ERREUR")
x = msgbox ("Quoi, vous ne voulez lire moi de toute façon?", 0, « erreur »)
x = msgbox (« Puis je vous montrerai. », 0, « erreur »)
x = msgbox ("", 0, « Erreur »)
x = msgbox ("", 0, « Erreur »)
x = msgbox (« Vous êtes vraiment têtu. », 0, « erreur »)
x = msgbox ("cliquant Stop ! S’il vous plaît... ", 0,"ERREUR")
x = msgbox (« Regardez, vous avez réduit me » & vbCrLf & "à la mendicité. alors s’il vous plaît arrêter.", 0,"erreur")
x=MsgBox("Please!!!",0,"Error")
x = msgbox (« Je vais vous donner un nickel. », 0, « erreur »)
x = msgbox ("Dime?", 0, « Erreur »)
x = msgbox ("Quarter?", 0, « Erreur »)
x = msgbox ("aww allez ! Juste arrêter!", 0,"Erreur")
x = msgbox (« All right... », 0, « erreur »)
x = msgbox ("Let's get funky!", 48, « erreur »)
x = msgbox (« Je parie que vous commencez à vous demander » + "\n" & « pourquoi vous avez fait cela » & vbCrLf & "depuis si longtemps!", 0, « erreur »)
x = msgbox (« Jeeze, tout ce que vous avez fait est » & vbCrLf & « en cliquant sur un bouton OK. », 0, « Erreur »)
x = msgbox (« comment boiteux est qui? », 0, « erreur »)
x = msgbox ("mais il y a un bonus à tous cette", 0, « Erreur »)
x = msgbox ("mais c’est un secret. » & vbCrLf & "Donc je ne peux pas vous dire.", 0, "Erreur")
x = msgbox (« I got you va, je ne? », 0, « erreur »)
x = msgbox (« Vous devriez avez vu le look » & vbCrLf & "sur votre visage ! HAHA!", 0,"ERREUR")
x = msgbox ("mais sérieusement, il y a un secret. » & vbCrLf & "On un le temps entier.", 0, "erreur")
x = msgbox (« Vous avez été occupé en cliquant sur suite à » & vbCrLf & « ce message d’erreur... », 0, « erreur »)
x = msgbox ("... lorsque le tout un peu invisible" & vbCrLf & « message a regardé tous vos déménagement. », 0, « erreur »)
x=MsgBox("Bugagagahahaha!",0,"Error")
x=MsgBox("hahaha!",0,"Error")
x=MsgBox("Bugagagahahaha!",0,"Error")
x=MsgBox("Bugaga!",0,"Error")
x=MsgBox("haha!",0,"Error")
x=MsgBox("hehe!",0,"Error")
x=MsgBox("lol",0,"Error")
x=MsgBox("rofl",0,"Error")
x=MsgBox("roflmao",0,"Error")
x=MsgBox("roflmaoqwerty",0,"Error")
x = msgbox (« et ainsi de suite et ainsi de suite », 0, « erreur »)
x=MsgBox("...",0,"Error")
x=MsgBox("*Whistles*",0,"Error")
x = msgbox (« Avez vous trouvé? », 0, « erreur »)
x = msgbox ("Look plus difficile!" & vbCrLf & "C’est juste sous votre nez.", 0, "erreur")
x = msgbox ("je sais où il est. » & vbCrLf & "Mais je ne dirai jamais.", 0, "erreur")
x = msgbox (« Ou peut-être que je vais... », 0, « erreur »)
x = msgbox ("mais vous je dois arrêter en cliquant sur le" & vbCrLf & « OK bouton tout d’abord! », 0, « erreur »)
x=MsgBox("Stop.",0,"Error")
x=MsgBox("Now.",0,"Error")
x = msgbox (« Très bien, je ne vous dirai pas » & vbCrLf & "le secret.", 0, "Erreur")
x = msgbox ("aller de l’avant. Essayer de la trouver vous-même"& vbCrLf &"Vous ne trouverez jamais it.", 0,"erreur")
x = msgbox (« Bien vous pourriez... mais les cotes » & vbCrLf & « sont contre vous. », 0, « erreur »)
x=MsgBox("~",0,"Error")
x = msgbox (« Quel est votre lettre préférée? », 0, « erreur »)
x = msgbox (« Le mien est le gribouillis », 0, « erreur »)
x=MsgBox("~",0,"Error")
x = msgbox (« N’ont pas encore trouvé? », 0, « Erreur »)
x=MsgBox("no?",0,"Error")
x = msgbox (« arrêtez puis en cliquant sur et je vais vous dire. », 0, « erreur »)
x = msgbox (« Vous savez quoi? », 0, « erreur »)
x = msgbox ("POOF ! C’EST PARTI!", 3,"ERREUR")
x = msgbox (« A n’importe qui jamais giflé vous? », 0, « erreur »)
x = msgbox ("Cuz je volonté.", 0, « Erreur »)
x = msgbox ("vraiment, je volonté.", 0, « Erreur »)
x = msgbox (« Il ne blessera pas bien. », 0, « erreur »)
x = msgbox ("parce que vous êtes mort.", 0, « Erreur »)
x=MsgBox("D-E-A-D",0,"Error")
x = msgbox (« N’oubliez pas de vous êtes allé et fait exploser » & vbCrLf & "la planète entière!", 0, "Erreur")
x = msgbox (« Pensé que je n’oublierait pas là-dessus » & vbCrLf & « n’avez-vous pas? », 0, « Erreur »)
x = msgbox (« Mais un éléphant n’oublie jamais! », 0, « erreur »)
x = msgbox ("... ou quelque chose le long de ces lignes.", 0, « Erreur »)
x = msgbox ("Vous avez tué tout le monde.", 0, « erreur »)
x=MsgBox("Sikko",0,"Error")
x = msgbox (« Ce que dirais ta mère », 0, « erreur »)
x = msgbox ("c’est vrai... sentir mauvais.", 0, « Erreur »)
x = msgbox (« le monde est null, et vous êtes à blâmer. », 0, « erreur »)
x = msgbox (« Je recommanderais suicide » & vbCrLf & « mais vous êtes déjà mort. », 0, « erreur »)
x = msgbox ("donc il n’y a qu’une seule chose à gauche" & vbCrLf & « tu peux faire... », 0, « erreur »)
x = msgbox (« Stop en cliquant sur le bouton. », 0, « erreur »)
x = msgbox ("Dude, Your dead." & vbCrLf & "ce qui sont vous gagner de cette?.", 0, "Erreur")
x = msgbox ("bon, chaque fois que vous cliquez, vous" & vbCrLf & « soient envoyés à une couche inférieure de l’enfer. », 0, « erreur »)
x = msgbox (« Welcome to layer 2. », 0, « erreur »)
x=MsgBox("3",0,"Error")
x=MsgBox("4",0,"Error")
x=MsgBox("5",0,"Error")
x=MsgBox("6",0,"Error")
x=MsgBox("7",0,"Error")
x=MsgBox("8",0,"Error")
x=MsgBox("9",0,"Error")
x = msgbox ("BOOM!" & vbCrLf & "Vous avez explosé l’enfer.", 0, "erreur")
x = msgbox (« J’espère que vous êtes heureux. », 0, « erreur »)
x = msgbox ("ciel est parti trop. » & vbCrLf & "Voilà comment bon vous sont.", 0, "erreur")
x = msgbox ("maintenant vos morts et il n’y a" & vbCrLf & « aucun ciel ou l’enfer. », 0, « erreur »)
x = msgbox ("How does it feel?" & vbCrLf & "Vous avez condamné le monde à limbes.", 0, "erreur")
x = msgbox (« J’ai tourné une fois un homme d’être dans les limbes. », 0, « erreur »)
x = msgbox ("... ou faisait-il le limbo?", 0, « Erreur »)
x = msgbox ("Meh, tomate Tomahto", 0, « Erreur »)
x = msgbox (« Cela devient ennuyeux n’est ce pas? », 0, « erreur »)
x = msgbox ("mais vous ne pouvez pas arrêter!" & vbCrLf & "Vous tentent simplement de fermer ce message d’erreur.", 0, "erreur")
x = msgbox ("vous souhaitez mettre fin à cela. » & vbCrLf & "You want to leave...", 0, "erreur")
x = msgbox (« Mais vous ne pouvez pas! », 0, « erreur »)
x = msgbox (« Vous devez voir s’il y a un pot d’or » & vbCrLf & "à la fin de l’arc-en-ciel!", 0, « erreur »)
x = msgbox ("mais je l’ai déjà dit comment à" & vbCrLf & « trouver le pot d’or », 0, « Erreur »)
x = msgbox ("suivre le lapin blanc.", 0, « Erreur »)
x = msgbox ("... euh, OK bouton.", 0, « Erreur »)
x = msgbox ("n’oubliez pas le bouton caché?", 0, « Erreur »)
x = msgbox ("ou êtes-vous donc égocentrique vous" & vbCrLf & "oublié que trop?", 0, "erreur")
x = msgbox (« Je pourrais juste vous tenir ici toute la journée » & vbCrLf & "si je voulais.", 0, « Erreur »)
x = msgbox (« Vous êtes dans mon monde dès maintenant. », 0, « erreur »)
x = msgbox ("peu importe combien vous" & vbCrLf & "déteste ça, vous devez appuyer sur le bouton OK.", 0, "Erreur")
x=MsgBox("Again...",0,"Error")
x = msgbox ("et encore une fois...", 0, « Erreur »)
x = msgbox (« et encore une fois. », 0, « erreur »)
x = msgbox (« Vous gardez juste espérer quelque chose » & vbCrLf & "bonne volonté sortir de cela.", 0, "erreur")
x = msgbox (« Sure je pourrais vous dire que si je voulais » & vbCrLf & ", mais je ne veux pas.", 0, « Erreur »)
x = msgbox ("vous avez décidé de garder en cliquant sur. » & vbCrLf & "Donc je vais me régaler it.", 0, "Erreur")
x = msgbox (« Je veux dire, il n’y a rien d’autre à en profiter. », 0, « erreur »)
x = msgbox ("vous avez fait exploser il tout souvenir?", 0, « Erreur »)
x = msgbox ("vous vous demandez probablement qui i am...", 0, « Erreur »)
x = msgbox ("Eh bien, laissez-moi vous raconter une histoire sur mon auto.", 0, « erreur »)
x = msgbox (« un jour je me promenais Accueil de » & vbCrLf & « travail et j’ai vu une petite petite maison. », 0, « erreur »)
x = msgbox ("J’ai frappé à la porte de curiosety. » & vbCrLf & "pour voir si l’un était maison.", 0, "Erreur")
x = msgbox ("la porte ouverte!", 0, « Erreur »)
x = msgbox (« Mais personne n’était là. », 0, « erreur »)
x = msgbox (« Je suis allé à l’intérieur du pour vérifier » & vbCrLf & « et rien trouvé... », 0, « erreur »)
x = msgbox ("rien qu’un ordinateur vide cas.", 0, « Erreur »)
x = msgbox (« Alors j’ai ouvert it. », 0, « erreur »)
x = msgbox (« Inside le cas était une couche de » & vbCrLf & « mousse protégeant son contenu. », 0, « erreur »)
x = msgbox (« j’ai enlevé la mousse et il était là... », 0, « erreur »)
x=MsgBox("...",0,"Error")
x = msgbox ("......", 0, « Erreur »)
x=MsgBox("ZZZZZzzzzz",0,"Error")
x=MsgBox("zzzzzZZZZZzzzzz",0,"Error")
x=MsgBox("ZZzZZzzZzzZZzZZ",0,"Error")
x=MsgBox("huh?",0,"Error")
x = msgbox ("Oh ! Droit ! L’histoire", 0,"Erreur")
x = msgbox (« donc là je, tenais » & vbCrLf & « ce boîtier de l’ordinateur dans mes mains. », 0, « erreur »)
x = msgbox (« le sommet s’est ouverte et assis » & vbCrLf & « à l’intérieur c’était... », 0, « erreur »)
x = msgbox (« Message d’erreur et le bouton OK. », 0, « erreur »)
x = msgbox (« Et savez-vous ce qu’il dit? », 0, « erreur »)
x = msgbox ("Oh, je vais vous dire ce qu’il dit." & vbCrLf & "Le Message d’erreur dit...", 0, "Erreur")
boucle