Roller Coaster

PILOT 2303x[P 2168]
SYNC standard P 667, P 735
DATA
  bit 0 = DP 738
  bit 1 = DP 1463
  FLAG BYTE none
  PARITY BYTE none
The bytes are saved in reverse order (DEC IX).

The loading routine:
 FA46 F3         DI
 FA47 AF         XOR  A
 FA48 FD21005B   LD   IY,+5B00
 FA4C 21FEFF     LD   HL,+FFFE
 FA4F CD5DFA     CALL FA5D
 FA52 FB         EI
 FA53 3E01       LD   A,+01
 FA55 D20000     JP   NC,0000,START
 FA58 3E01       LD   A,+01
 FA5A C30000     JP   0000,START
 FA5D 24         INC  H
 FA5E 08         EX   AF,AF'
 FA5F 25         DEC  H
 FA60 3E08       LD   A,+08
 FA62 D3FE       OUT  (+FE),A
 FA64 DBFE       IN   A,(+FE)
 FA66 1F         RRA
 FA67 E620       AND  +20
 FA69 F601       OR   +01
 FA6B 4F         LD   C,A
 FA6C BF         CP   A
 FA6D CDDFFA     CALL FADF
 FA70 30FB       JR   NC,FA6D
 FA72 111504     LD   DE,+0415
 FA75 10FE       DJNZ FA75
 FA77 1B         DEC  DE
 FA78 7A         LD   A,D
 FA79 B3         OR   E
 FA7A 20F9       JR   NZ,FA75
 FA7C CDDCFA     CALL FADC
 FA7F 30EC       JR   NC,FA6D
 FA81 069C       LD   B,+9C
 FA83 CDDCFA     CALL FADC
 FA86 30E5       JR   NC,FA6D
 FA88 3EC6       LD   A,+C6
 FA8A B8         CP   B
 FA8B 30E0       JR   NC,FA6D
 FA8D 14         INC  D
 FA8E 20F1       JR   NZ,FA81
 FA90 06C9       LD   B,+C9
 FA92 CDDFFA     CALL FADF
 FA95 30D6       JR   NC,FA6D
 FA97 78         LD   A,B
 FA98 FED4       CP   +D4
 FA9A 30F4       JR   NC,FA90
 FA9C CDDFFA     CALL FADF
 FA9F 79         LD   A,C
 FAA0 EE01       XOR  +01
 FAA2 4F         LD   C,A
 FAA3 1600       LD   D,+00
 FAA5 06B0       LD   B,+B0
 FAA7 1818       JR   FAC1
 FAA9 08         EX   AF,AF'
 FAAA 2005       JR   NZ,FAB1
 FAAC FD7300     LD   (IY+00),E
 FAAF 180A       JR   FABB
 FAB1 CB11       RL   C
 FAB3 AB         XOR  E
 FAB4 C0         RET  NZ
 FAB5 79         LD   A,C
 FAB6 1F         RRA
 FAB7 4F         LD   C,A
 FAB8 23         INC  HL
 FAB9 1802       JR   FABD
 FABB FD2B       DEC  IY
 FABD 2B         DEC  HL
 FABE 08         EX   AF,AF'
 FABF 06B2       LD   B,+B2
 FAC1 1E01       LD   E,+01
 FAC3 CDDCFA     CALL FADC
 FAC6 D0         RET  NC
 FAC7 3ECB       LD   A,+CB
 FAC9 B8         CP   B
 FACA CB13       RL   E
 FACC 06B0       LD   B,+B0
 FACE D2C3FA     JP   NC,FAC3
 FAD1 7A         LD   A,D
 FAD2 AD         XOR  L
 FAD3 57         LD   D,A
 FAD4 7C         LD   A,H
 FAD5 B5         OR   L
 FAD6 20D1       JR   NZ,FAA9
 FAD8 37         SCF
 FAD9 C3DA1A     JP   1ADA
 FADC CDDFFA     CALL FADF
 FADF 3E0C       LD   A,+0C
 FAE1 3D         DEC  A
 FAE2 20FD       JR   NZ,FAE1
 FAE4 A7         AND  A
 FAE5 04         INC  B
 FAE6 C8         RET  Z
 FAE7 3E7F       LD   A,+7F
 FAE9 DBFE       IN   A,(+FE)
 FAEB 1F         RRA
 FAEC 00         NOP
 FAED A9         XOR  C
 FAEE E620       AND  +20
 FAF0 28F3       JR   Z,FAE5
 FAF2 79         LD   A,C
 FAF3 EEF9       XOR  +F9
 FAF5 4F         LD   C,A
 FAF6 E607       AND  +07
 FAF8 F608       OR   +08
 FAFA D3FE       OUT  (+FE),A
 FAFC 37         SCF
 FAFD C9         RET
 FAFE 210061     LD   HL,+6100
 FB01 016F98     LD   BC,+986F
 FB04 AF         XOR  A
 FB05 86         ADD  A,(HL)
 FB06 0B         DEC  BC
 FB07 23         INC  HL
 FB08 04         INC  B
 FB09 05         DEC  B
 FB0A 20F9       JR   NZ,FB05
 FB0C 00         NOP
 FB0D 00         NOP
 FB0E FE86       CP   +86
 FB10 C20000     JP   NZ,0000,START
 FB13 C33C8C     JP   8C3C

The saving routine:
 F99D 21FEFF     LD   HL,+FFFE
 F9A0 FD21005B   LD   IY,+5B00
 F9A4 AF         XOR  A
 F9A5 CDB3F9     CALL F9B3
 F9A8 FB         EI
 F9A9 3E02       LD   A,+02
 F9AB D2FEFA     JP   NC,FAFE
 F9AE 3E01       LD   A,+01
 F9B0 C3FEFA     JP   FAFE
 F9B3 110008     LD   DE,+0800
 F9B6 08         EX   AF,AF'
 F9B7 3E01       LD   A,+01
 F9B9 0602       LD   B,+02
 F9BB 10FE       DJNZ F9BB
 F9BD D3FE       OUT  (+FE),A
 F9BF EE09       XOR  +09
 F9C1 06A4       LD   B,+A4
 F9C3 1D         DEC  E
 F9C4 20F5       JR   NZ,F9BB
 F9C6 05         DEC  B
 F9C7 15         DEC  D
 F9C8 F2BBF9     JP   P,F9BB
 F9CB 062F       LD   B,+2F
 F9CD 10FE       DJNZ F9CD
 F9CF D3FE       OUT  (+FE),A
 F9D1 3E09       LD   A,+09
 F9D3 0637       LD   B,+37
 F9D5 10FE       DJNZ F9D5
 F9D7 D3FE       OUT  (+FE),A
 F9D9 01083B     LD   BC,+3B08
 F9DC 08         EX   AF,AF'
 F9DD 5F         LD   E,A
 F9DE C3EAF9     JP   F9EA
 F9E1 7C         LD   A,H
 F9E2 B5         OR   L
 F9E3 2837       JR   Z,FA1C
 F9E5 FD5E00     LD   E,(IY+00)
 F9E8 7A         LD   A,D
 F9E9 AB         XOR  E
 F9EA 57         LD   D,A
 F9EB 3E01       LD   A,+01
 F9ED 37         SCF
 F9EE C305FA     JP   FA05
 F9F1 79         LD   A,C
 F9F2 CB78       BIT  7,B
 F9F4 10FE       DJNZ F9F4
 F9F6 3004       JR   NC,F9FC
 F9F8 0638       LD   B,+38
 F9FA 10FE       DJNZ F9FA
 F9FC D3FE       OUT  (+FE),A
 F9FE 0635       LD   B,+35
 FA00 20EF       JR   NZ,F9F1
 FA02 05         DEC  B
 FA03 AF         XOR  A
 FA04 3C         INC  A
 FA05 CB13       RL   E
 FA07 C2F4F9     JP   NZ,F9F4
 FA0A 2B         DEC  HL
 FA0B FD2B       DEC  IY
 FA0D 0631       LD   B,+31
 FA0F 7C         LD   A,H
 FA10 A7         AND  A
 FA11 C2E1F9     JP   NZ,F9E1
 FA14 063B       LD   B,+3B
 FA16 10FE       DJNZ FA16
 FA18 37         SCF
 FA19 C3A000     JP   00A0
 FA1C 5A         LD   E,D
 FA1D 7A         LD   A,D
 FA1E AB         XOR  E
 FA1F 57         LD   D,A
 FA20 3E01       LD   A,+01
 FA22 37         SCF
 FA23 C33AFA     JP   FA3A
 FA26 79         LD   A,C
 FA27 CB79       BIT  7,C
 FA29 10FE       DJNZ FA29
 FA2B 3004       JR   NC,FA31
 FA2D 0630       LD   B,+30
 FA2F 10FE       DJNZ FA2F
 FA31 D3FE       OUT  (+FE),A
 FA33 063E       LD   B,+3E
 FA35 20EF       JR   NZ,FA26
 FA37 05         DEC  B
 FA38 AF         XOR  A
 FA39 3C         INC  A
 FA3A CB13       RL   E
 FA3C C229FA     JP   NZ,FA29
 FA3F 063F       LD   B,+3F
 FA41 10FE       DJNZ FA41
 FA43 C3A000     JP   00A0