Pokemon Red Mega Punch + Paras to Kill after Route 3 Lass + Nerd Uses no A presses, gets paras 5 steps early. You lose 2.5 or so seconds on the extra encounter tiles this way but that should be faster than waiting an additional dsum cycle. Success rate: 40/60 Longest streak: 17 Route (HTas syntax but I'm sure you can figure out what it means) reset gb doOptimalIntro gb -- Up+B+Select -> Start -> A setInputGetter gb (readIORef inputRef) setTraceCallback gb $ \dat -> do let addr = trace_PC dat when (addr == 0x7916) $ do writeIORef encRef True bufferedWalk gb inputRef . rleExpand $ [ (i_Right, 1) , (i_Down, 1) , (i_Right, 5) , (i_Up, 1) ] writeIORef inputRef i_A waitForItemJingle gb bufferedWalk gb inputRef . rleExpand $ [ (i_Up, 5) , (i_Right, 1) , (i_Up, 3) ] writeIORef inputRef i_A waitForItemJingle gb bufferedWalk gb inputRef . rleExpand $ [ (i_Left, 1) , (i_Up, 15) , (i_Left, 2) , (i_Up, 5) , (i_Left, 2) , (i_Up, 1) , (i_Left, 2) -- Past lass , (i_Down, 1) , (i_Left, 4) , (i_Down, 1) , (i_Left, 5) , (i_Down, 1) , (i_Left, 1) , (i_Down, 1) , (i_Left, 2) , (i_Down, 4) -- B1F , (i_Left, 1) , (i_Down, 2) , (i_Left, 7) -- B2F , (i_Right, 1) , (i_Up, 1) , (i_Right, 2) , (i_Up, 2) , (i_Left, 1) , (i_Up, 1) , (i_Right, 1) ] writeIORef inputRef i_A waitForItemJingle gb bufferedWalk gb inputRef . rleExpand $ [ (i_Down, 3) , (i_Left, 2) , (i_Down, 1) , (i_Left, 1) -- B1F , (i_Up, 1) , (i_Right, 6) , (i_Up, 1) , (i_Right, 2) -- 1F , (i_Down, 1) , (i_Left, 1) , (i_Down, 5) , (i_Left, 5) , (i_Up, 2) , (i_Left, 1) , (i_Up, 2) , (i_Left, 1) , (i_Up, 4) , (i_Left, 1) , (i_Up, 3) , (i_Left, 1) , (i_Up, 2) , (i_Left, 1) , (i_Up, 1) , (i_Left, 1) , (i_Up, 1) , (i_Left, 2) ] writeIORef inputRef i_A waitForItemJingle gb bufferedWalk gb inputRef . rleExpand $ [ (i_Down, 1) , (i_Right, 1) , (i_Down, 1) , (i_Right, 1) , (i_Down, 1) -- B1F , (i_Down, 3) , (i_Right, 1) , (i_Down, 6) , (i_Right, 1) , (i_Down, 2) , (i_Right, 10) , (i_Down, 1) , (i_Right, 4) -- B2F , (i_Right, 1) , (i_Up, 2) , (i_Right, 1) , (i_Up, 1) , (i_Right, 3) , (i_Right, 1) , (i_Down, 2) , (i_Right, 5) , (i_Up, 2) , (i_Right, 4) , (i_Down, 8) , (i_Left, 3) , (i_Down, 2) , (i_Left, 1) , (i_Down, 7) , (i_Left, 21) -- Freedom , (i_Left, 1) , (i_Up, 14) ] loc <- getLocation gb encountered <- readIORef encRef encData <- if encountered then Just <$> getEncounterData gb else pure Nothing pure $ (loc, encData) IGT0: 0 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4472 IGT0: 1 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4573 IGT0: 2 Location {locMap = 60, locX = 6, locY = 9} Species: 4 Level: 9 DVs: 0bf9 IGT0: 3 Location {locMap = 60, locX = 5, locY = 8} Species: 107 Level: 8 DVs: 4bcd IGT0: 4 Location {locMap = 61, locX = 27, locY = 31} Species: 107 Level: 11 DVs: b8c1 IGT0: 5 Location {locMap = 61, locX = 10, locY = 17} No encounter IGT0: 6 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4472 IGT0: 7 Location {locMap = 59, locX = 17, locY = 12} Species: 169 Level: 8 DVs: 4473 IGT0: 8 Location {locMap = 59, locX = 16, locY = 13} Species: 107 Level: 9 DVs: 019b IGT0: 9 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4573 IGT0: 10 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4573 IGT0: 11 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4573 IGT0: 12 Location {locMap = 59, locX = 35, locY = 30} Species: 107 Level: 8 DVs: d2d0 IGT0: 13 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4573 IGT0: 14 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4472 IGT0: 15 Location {locMap = 60, locX = 6, locY = 13} Species: 4 Level: 9 DVs: 9dae IGT0: 16 Location {locMap = 59, locX = 7, locY = 4} Species: 107 Level: 7 DVs: 3d6f IGT0: 17 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4472 IGT0: 18 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4673 IGT0: 19 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4472 IGT0: 20 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4472 IGT0: 21 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4472 IGT0: 22 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4472 IGT0: 23 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4371 IGT0: 24 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4371 IGT0: 25 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4371 IGT0: 26 Location {locMap = 59, locX = 3, locY = 3} Species: 169 Level: 8 DVs: 9e58 IGT0: 27 Location {locMap = 61, locX = 32, locY = 26} Species: 169 Level: 9 DVs: 4574 IGT0: 28 Location {locMap = 59, locX = 3, locY = 3} Species: 169 Level: 8 DVs: 9e58 IGT0: 29 Location {locMap = 59, locX = 3, locY = 3} Species: 169 Level: 8 DVs: 9e58 IGT0: 30 Location {locMap = 59, locX = 3, locY = 3} Species: 169 Level: 8 DVs: 9e58 IGT0: 31 Location {locMap = 59, locX = 3, locY = 3} Species: 169 Level: 8 DVs: 9e58 IGT0: 32 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4472 IGT0: 33 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4472 IGT0: 34 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4472 IGT0: 35 Location {locMap = 61, locX = 26, locY = 8} Species: 107 Level: 10 DVs: 5b2c IGT0: 36 Location {locMap = 59, locX = 35, locY = 28} Species: 107 Level: 11 DVs: 57d6 IGT0: 37 Location {locMap = 59, locX = 35, locY = 30} Species: 107 Level: 8 DVs: d8d6 IGT0: 38 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4573 IGT0: 39 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4472 IGT0: 40 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4472 IGT0: 41 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4472 IGT0: 42 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4472 IGT0: 43 Location {locMap = 61, locX = 26, locY = 9} Species: 169 Level: 9 DVs: 069d IGT0: 44 Location {locMap = 61, locX = 36, locY = 19} Species: 107 Level: 10 DVs: 84f3 IGT0: 45 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4573 IGT0: 46 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4573 IGT0: 47 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4573 IGT0: 48 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4573 IGT0: 49 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4573 IGT0: 50 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4573 IGT0: 51 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4573 IGT0: 52 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4573 IGT0: 53 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4573 IGT0: 54 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4573 IGT0: 55 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4573 IGT0: 56 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4472 IGT0: 57 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4472 IGT0: 58 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4472 IGT0: 59 Location {locMap = 61, locX = 10, locY = 21} Species: 109 Level: 10 DVs: 4472