import from github

data/maps/GraniteCave_StevensRoom/map.json

@@ -0,0 +1,42 @@
+{
+  "id": "MAP_GRANITE_CAVE_STEVENS_ROOM",
+  "name": "GraniteCave_StevensRoom",
+  "layout": "LAYOUT_GRANITE_CAVE_STEVENS_ROOM",
+  "music": "MUS_PETALBURG_WOODS",
+  "region_map_section": "MAPSEC_GRANITE_CAVE",
+  "requires_flash": false,
+  "weather": "WEATHER_NONE",
+  "map_type": "MAP_TYPE_UNDERGROUND",
+  "allow_cycling": true,
+  "allow_escaping": true,
+  "allow_running": true,
+  "show_map_name": true,
+  "battle_scene": "MAP_BATTLE_SCENE_NORMAL",
+  "connections": null,
+  "object_events": [
+    {
+      "graphics_id": "OBJ_EVENT_GFX_STEVEN",
+      "x": 7,
+      "y": 8,
+      "elevation": 3,
+      "movement_type": "MOVEMENT_TYPE_LOOK_AROUND",
+      "movement_range_x": 0,
+      "movement_range_y": 0,
+      "trainer_type": "TRAINER_TYPE_NONE",
+      "trainer_sight_or_berry_tree_id": "0",
+      "script": "GraniteCave_StevensRoom_EventScript_Steven",
+      "flag": "FLAG_HIDE_GRANITE_CAVE_STEVEN"
+    }
+  ],
+  "warp_events": [
+    {
+      "x": 7,
+      "y": 3,
+      "elevation": 3,
+      "dest_map": "MAP_GRANITE_CAVE_1F",
+      "dest_warp_id": 3
+    }
+  ],
+  "coord_events": [],
+  "bg_events": []
+}

data/maps/GraniteCave_StevensRoom/scripts.inc

@@ -0,0 +1,121 @@
+.set LOCALID_STEVEN, 1
+
+GraniteCave_StevensRoom_MapScripts::
+	.byte 0
+
+GraniteCave_StevensRoom_EventScript_Steven::
+	lock
+	faceplayer
+	msgbox GraniteCave_StevensRoom_Text_ImStevenLetterForMe, MSGBOX_DEFAULT
+	setvar VAR_0x8004, ITEM_LETTER
+	call Common_EventScript_PlayerHandedOverTheItem
+	setflag FLAG_DELIVERED_STEVEN_LETTER
+	msgbox GraniteCave_StevensRoom_Text_ThankYouTakeThis, MSGBOX_DEFAULT
+	giveitem ITEM_TM47
+	call_if_eq VAR_RESULT, FALSE, GraniteCave_StevensRoom_EventScript_BagFull
+	msgbox GraniteCave_StevensRoom_Text_CouldBecomeChampionLetsRegister, MSGBOX_DEFAULT
+	closemessage
+	delay 30
+	playfanfare MUS_REGISTER_MATCH_CALL
+	msgbox GraniteCave_StevensRoom_Text_RegisteredSteven, MSGBOX_DEFAULT
+	waitfanfare
+	closemessage
+	delay 30
+	setflag FLAG_REGISTERED_STEVEN_POKENAV
+	msgbox GraniteCave_StevensRoom_Text_IveGotToHurryAlong, MSGBOX_DEFAULT
+	closemessage
+	call_if_eq VAR_FACING, DIR_NORTH, GraniteCave_StevensRoom_EventScript_StevenExitNorth
+	call_if_eq VAR_FACING, DIR_SOUTH, GraniteCave_StevensRoom_EventScript_StevenExitSouth
+	call_if_eq VAR_FACING, DIR_WEST, GraniteCave_StevensRoom_EventScript_StevenExitWestEast
+	call_if_eq VAR_FACING, DIR_EAST, GraniteCave_StevensRoom_EventScript_StevenExitWestEast
+	playse SE_EXIT
+	removeobject LOCALID_STEVEN
+	release
+	end
+
+GraniteCave_StevensRoom_EventScript_StevenExitNorth::
+	applymovement LOCALID_STEVEN, GraniteCave_StevensRoom_Movement_StevenExit
+	waitmovement 0
+	return
+
+GraniteCave_StevensRoom_EventScript_StevenExitWestEast::
+	applymovement OBJ_EVENT_ID_PLAYER, GraniteCave_StevensRoom_Movement_PlayerTurnTowardExit
+	applymovement LOCALID_STEVEN, GraniteCave_StevensRoom_Movement_StevenExit
+	waitmovement 0
+	return
+
+GraniteCave_StevensRoom_EventScript_StevenExitSouth::
+	applymovement OBJ_EVENT_ID_PLAYER, GraniteCave_StevensRoom_Movement_PlayerTurnTowardExit
+	applymovement LOCALID_STEVEN, GraniteCave_StevensRoom_Movement_StevenExitSouth
+	waitmovement 0
+	return
+
+GraniteCave_StevensRoom_EventScript_BagFull::
+	msgbox GraniteCave_StevensRoom_Text_OhBagIsFull, MSGBOX_DEFAULT
+	return
+
+GraniteCave_StevensRoom_Movement_StevenExit:
+	walk_up
+	walk_up
+	walk_up
+	walk_up
+	walk_up
+	delay_8
+	step_end
+
+GraniteCave_StevensRoom_Movement_PlayerTurnTowardExit:
+	delay_16
+	delay_16
+	delay_16
+	walk_in_place_faster_up
+	step_end
+
+GraniteCave_StevensRoom_Movement_StevenExitSouth:
+	walk_left
+	walk_up
+	walk_up
+	walk_up
+	walk_right
+	walk_up
+	walk_up
+	delay_8
+	step_end
+
+GraniteCave_StevensRoom_Text_ImStevenLetterForMe:
+	.string "My name is STEVEN.\p"
+	.string "I'm interested in rare stones,\n"
+	.string "so I travel here and there.\p"
+	.string "Oh?\n"
+	.string "A LETTER for me?$"
+
+GraniteCave_StevensRoom_Text_ThankYouTakeThis:
+	.string "STEVEN: Okay, thank you.\p"
+	.string "You went through all this trouble to\n"
+	.string "deliver that. I need to thank you.\p"
+	.string "Let me see…\n"
+	.string "I'll give you this TM.\p"
+	.string "It contains my favorite move,\n"
+	.string "STEEL WING.$"
+
+GraniteCave_StevensRoom_Text_CouldBecomeChampionLetsRegister:
+	.string "STEVEN: Your POKéMON appear quite\n"
+	.string "capable.\p"
+	.string "If you keep training, you could even\n"
+	.string "become the CHAMPION of the POKéMON\l"
+	.string "LEAGUE one day. That's what I think.\p"
+	.string "I know, since we've gotten to know each\n"
+	.string "other, let's register one another in\l"
+	.string "our POKéNAVS.\p"
+	.string "… … … … … …$"
+
+GraniteCave_StevensRoom_Text_RegisteredSteven:
+	.string "Registered STEVEN\n"
+	.string "in the POKéNAV.$"
+
+GraniteCave_StevensRoom_Text_IveGotToHurryAlong:
+	.string "Now, I've got to hurry along.$"
+
+GraniteCave_StevensRoom_Text_OhBagIsFull:
+	.string "Oh, your BAG is full…\n"
+	.string "That's too bad, then.$"
+