IF "<Obey$Dir>"="@" THEN Set Obey$Dir ADFS::BubImpact.$.!BubImpact

Set bubbleImpact$dir <obey$dir>
ScreenSize 300
WimpSlot -min 2048k -max 2048k
IF ADFFS$OSVersion>=&50000 THEN ADFEmulateRISCOS 3.71
RMEnsure QTMTracker 1.45 RmLoad ADFFS:trackers.QTMModule
QTMLoad <bubbleImpact$dir>.Data.sound x
IF ADFFS$OSVersion>=&50000 THEN GOARM4JIT 0
| Bugfix: Page Zero access
IF ADFFS$OSVersion>=&50000 THEN JITMEMORYA 164F0 E5908010 EB07C6C2
IF ADFFS$OSVersion>=&50000 THEN MEMA 208000 E3300000 15908010 11A0F00E E3A08004 E3A09003 E0487009 E3A06001 E3A01000 E28EF028

ADFJoystickKeys J1 L=78 R=79 U=89 D=99 B1=95 B2=71 J2 L=98 R=100 U=89 D=99 B1=96
| Player 1  Player 2     Joystick
| Z         Left arrow   Left    - Left
| X         Right arrow  Right   - Right
| SPACE     Right Alt    B1      - Jump
| RETURN                 B2      - Select

<bubbleImpact$dir>.!RunImage
ADFJoystickKeys
IF ADFFS$OSVersion>=&50000 THEN GOARM4JIT
IF ADFFS$OSVersion>=&50000 THEN ADFEmulateRISCOS
RMEnsure QTMTracker 1.45 Set kill$QTM 1
IF "<kill$QTM>"="" THEN RMKill QTMTracker
UnSet kill$QTM
UnSet bubbleImpact$dir