Correct usage of MysteryEvent to MysteryGift

data/scripts/gift_mystic_ticket.inc

@@ -0,0 +1,60 @@
+MysteryGiftScript_MysticTicket::
+	setvaddress MysteryGiftScript_MysticTicket
+	lock
+	faceplayer
+	vgoto_if_set FLAG_RECEIVED_MYSTIC_TICKET, MysticTicket_Obtained
+	vgoto_if_set FLAG_CAUGHT_LUGIA, MysticTicket_Obtained
+	vgoto_if_set FLAG_CAUGHT_HO_OH, MysticTicket_Obtained
+	checkitem ITEM_MYSTIC_TICKET, 1
+	compare VAR_RESULT, TRUE
+	vgoto_if_eq MysticTicket_Obtained
+	vmessage sText_MysticTicketForYou
+	waitmessage
+	waitbuttonpress
+	checkitemspace ITEM_MYSTIC_TICKET, 1
+	compare VAR_RESULT, FALSE
+	vgoto_if_eq MysticTicket_NoBagSpace
+	giveitem ITEM_MYSTIC_TICKET
+	setflag FLAG_ENABLE_SHIP_NAVEL_ROCK
+	setflag FLAG_RECEIVED_MYSTIC_TICKET
+	vmessage sText_MysticTicketUseAtPort
+	waitmessage
+	waitbuttonpress
+	release
+	end
+
+MysticTicket_NoBagSpace:
+	vmessage sText_MysticTicketBagFull
+	waitmessage
+	waitbuttonpress
+	release
+	end
+
+MysticTicket_Obtained:
+	vmessage sText_MysticTicketThankYou
+	waitmessage
+	waitbuttonpress
+	release
+	end
+
+sText_MysticTicketForYou:
+	.string "Thank you for using the MYSTERY\n"
+	.string "GIFT System.\p"
+	.string "You must be {PLAYER}.\n"
+	.string "There is a ticket here for you.$"
+
+sText_MysticTicketUseAtPort:
+	.string "It appears to be for use at the\n"
+	.string "LILYCOVE CITY port.\p"
+	.string "Why not give it a try and see what\n"
+	.string "it is about?$"
+
+sText_MysticTicketThankYou:
+	.string "Thank you for using the MYSTERY\n"
+	.string "GIFT System.$"
+
+sText_MysticTicketBagFull:
+	.string "Oh, I'm sorry, {PLAYER}.\n"
+	.string "Your BAG's KEY ITEMS POCKET is full.\p"
+	.string "Please store something on your PC,\n"
+	.string "then come back for this.$"