Added Following Pokemon mechanics and sprites/palettes for all Gen 1 Pokemon

data/scripts/field_move_scripts.inc

@@ -287,3 +287,69 @@ EventScript_FailSweetScent::
 
 Text_FailSweetScent:
 	.string "Looks like there's nothing here…$"
+    
+FollowerPositionFixScript::
+	setvar 0x8000 0x0
+	callnative FollowerTrainerSightingPositionFix
+	compare VAR_RESULT 0xFFFF
+	goto_if_eq FollowerPositionFixScriptReturn
+	call WalkCall
+	setvar 0x8000 0x1
+	callnative FollowerTrainerSightingPositionFix
+FollowerPositionFixScriptReturn:
+	return
+    
+FollowerIntoPlayerScript::
+	setvar 0x8000 0x0
+	callnative FollowerIntoPlayer
+	compare VAR_RESULT 0xFFFF
+	goto_if_eq FollowerPositionFixScriptReturn
+	setvar 0x8005 0xFE  @ follower
+	call WalkCall
+	setvar 0x8000 0x1
+	callnative FollowerIntoPlayer
+	return
+    
+WalkCall:
+	compare VAR_RESULT 0x0
+	call_if_eq WalkDownCall
+	compare VAR_RESULT 0x1
+	call_if_eq WalkUpCall
+	compare VAR_RESULT 0x2
+	call_if_eq WalkLeftCall
+	compare VAR_RESULT 0x3
+	call_if_eq WalkRightCall
+	waitmovement 0x8005
+	return
+	
+WalkDownCall:
+	applymovement 0x8005 WalkDown
+	return
+
+WalkUpCall:
+	applymovement 0x8005 WalkUp
+	return
+
+WalkLeftCall:
+	applymovement 0x8005 WalkLeft
+	return
+
+WalkRightCall:
+	applymovement 0x8005 WalkRight
+	return
+    
+WalkDown:
+    walk_down
+    step_end 
+
+WalkUp:
+    walk_up
+    step_end
+
+WalkLeft:
+    walk_left
+    step_end
+
+WalkRight:
+    walk_right
+    step_end