Create a new version of paste: f7c3b77c4

Got an iPhone or iPad? We have a brand new Pastebin App for both devices, and it's totally free! Click here to download the new Pastebin App for iOS.

Public Pastes

Untitled0 sec ago
18x Uploading acc....23 sec ago
Untitled5 sec ago
Untitled5 sec ago
Untitled5 sec ago
Untitled5 sec ago
Untitled22 sec ago
xXDelightfulOliviaxX10 sec ago

New Paste

//St. Patrick's Day
//Written by DerLoisl @ irc.freenode.net
//2010

000-0.gat,0,0,0		script Patrick	000, {
	
	mes "[Patrick]";
	mes "Happy St. Patrick's Day! What's your name my friend?";
	next;
	input@name$;
	if(SPD == 0) goto L_Quest;
	if(SPD == 1) goto L_Happy;

L_Quest:
	mes "[The Riddler]";
	mes "\"Ah, hello " + @name$ + ", how are you today, ready for St. Patrick's Day???\"";
	next;
	menu

"Oh, yeah, I am!", L_Yeah,
		"I'm not sure...", L_NotSure,
		"Definately not", L_No,
		"What's St. Patrick's Day?", L_Explanation;

L_Happy:
	mes "[Patrick]";
	mes "You've alreday got your reward. Please give the others also a try! And keep in mind that St. Patrick's Day is an event to celebrate St. Patrick.  Next year, you can find my at the same location. Now, go go go and trink as much green beer as you want!";
	mes "See you next year my friend.";
	close;

L_Yeah:
	mes "[Patrick]";
	mes "\"That's what I wanted to hear!";
	mes "Have you ever kissed the Blarney stone?\"";
	next;
	menu
		
		"Sure", goto L_Kissed,
		"Nah", -,
		"Blarney Stone?", goto L_Stone;
	close;

L_NotSure:
	mes "[Patrick]";
	mes "St. Patrick's Day is really exciting...better think about it and tell me your decision later.";
	mes "See you.";
	close;

L_No:
	mes "[Patrick]";
	mes "You're not ready for St. Patrick's Day?!";
	mes "A pity...";
	close;

L_Explanation:

L_Kissed:
	if(Stone == 0) goto L_Kiss;
	if/Stone == 1) goto L_Done;

L_Done:
	mes "[Patrick]"
	mes "\"Oh yeah, that's good. May I ask whether you want to participate in a little game?\"";
	next;
	menu
		"YAY!", goto L_Ok,
		"Maybe next year...", -;
	close;

L_Stone:
	mes "[Patrick]";
	mes "\"The Blarney Stone is an ancient misterious rock. Try to kiss the stone and you might get something.\"";
	next;
	menu
		"No, thank you", -,
		"Where can i find the Blarney Stone?", goto L_Location,
		"Wow, I am on my way!", -;
	close;
	
L_Location:
	mes "[Patrick]";
	mes "I don't know the exact location, but I think the stone is somewhere near the mining camp north of Hurnscald.";
	mes "Find the stone and come back!";
	close;
	
L_Ok:
	mes "[Patrick]"
	mes "I'm glad to hear that.";
	mes "Come on, turn on this wheel and you might win something.";
	next;
		set @TEMP, rand(4);
		if(@TEMP == 0) goto L_Reward0;
		if(@TEMP == 1) goto L_Reward1;
		if(@TEMP == 2) goto L_Reward2;
		if(@TEMP == 3) goto L_Reward3;
		if(@TEMP == 4) goto L_Reward4;
		
L_Reward0:
	mes "[Patrick]";
	mes "Unfortunately a blank. But take this as a consolation prize!;
	getitem "greenbeer", 15;
	getitem 648, 1;
	set SPD, 1;
	close;

L_Reward1:
	mes "[Patrick]";
	mes "Take this as reward.";
	getitem "greenbeer", 30;
	getitem 649, 1;
	getexp 500, 0;
	set SPD, 1;
	close;

L_Reward2:
	mes "[Patrick]";
	mes "Here's your prize.";
	getitem "greenbeer", 30;
	getitem 650, 1;
	set zeny, zeny + 1000;
	set SPD, 1;
	close;

L_Reward3:
	mes "[Patrick]";
	mes "Take this.";
	getitem "greenbeer", 30;
	getitem 651, 1;
	getexp 600, 0;
	set SPD, 1;
	close;

L_Reward4:
	mes "[Patrick]";
	mes "Have fun with your reward.";
	getitem "greenbeer", 30;
	getitem 652, 1;
	set zeny, zeny + 1500;
	set SPD, 1;
	close;
	
L_Kiss:
	mes "[Patrick]";
	mes "Seems like you haven't kissed the stone...";
	close;
	
}

Optional Paste Settings

Syntax Highlighting:

Paste Expiration:

Paste Exposure:

Paste Name / Title:

Hello Guest
Sign Up or Login

You are currently not logged in, this means you can not edit or delete anything you paste. Sign Up or Login

Pastebin.com Tools & Applications

iPhone/iPad

Windows

Firefox

Chrome

WebOS

Android

Mac

Opera

Click.to

UNIX

WinPhone