Fixed pokey deactivation problems.

Fixed jumping out of quicksand.

Author: HelloFangaming

objects/obj_pokey.object.gmx

@@ -100,6 +100,41 @@ if offsetnext = 4
 
 //Keep changing offset values
 alarm[0] = 10
+</string>
+          </argument>
+        </arguments>
+      </action>
+    </event>
+    <event eventtype="3" enumb="1">
+      <action>
+        <libid>1</libid>
+        <id>603</id>
+        <kind>7</kind>
+        <userelative>0</userelative>
+        <isquestion>0</isquestion>
+        <useapplyto>-1</useapplyto>
+        <exetype>2</exetype>
+        <functionname></functionname>
+        <codestring></codestring>
+        <whoName>self</whoName>
+        <relative>0</relative>
+        <isnot>0</isnot>
+        <arguments>
+          <argument>
+            <kind>1</kind>
+            <string>///Make sure pokey parts do not get lost
+if not instance_exists(mebelow)
+{
+    var next = mebelow
+    while next != noone
+    {
+        instance_activate_object(next)
+        if instance_exists(next)
+            next = next.mebelow
+        else
+            next = noone
+    }
+}
 </string>
           </argument>
         </arguments>
@@ -152,10 +187,7 @@ if mebelow = noone
 else
 {
 
-    //Activate the below pokey
-    instance_activate_object(mebelow)
-
-    //If it exist, snap to its position
+    //If it exists, snap to its position
     if instance_exists(mebelow)
     {
         x = mebelow.x

objects/obj_pokey_green.object.gmx

@@ -106,6 +106,41 @@ if offsetnext = 4
 
 //Keep changing offset values
 alarm[0] = 10
+</string>
+          </argument>
+        </arguments>
+      </action>
+    </event>
+    <event eventtype="3" enumb="1">
+      <action>
+        <libid>1</libid>
+        <id>603</id>
+        <kind>7</kind>
+        <userelative>0</userelative>
+        <isquestion>0</isquestion>
+        <useapplyto>-1</useapplyto>
+        <exetype>2</exetype>
+        <functionname></functionname>
+        <codestring></codestring>
+        <whoName>self</whoName>
+        <relative>0</relative>
+        <isnot>0</isnot>
+        <arguments>
+          <argument>
+            <kind>1</kind>
+            <string>///Make sure pokey parts do not get lost
+if not instance_exists(mebelow)
+{
+    var next = mebelow
+    while next != noone
+    {
+        instance_activate_object(next)
+        if instance_exists(next)
+            next = next.mebelow
+        else
+            next = noone
+    }
+}
 </string>
           </argument>
         </arguments>
@@ -169,10 +204,7 @@ if mebelow = noone
 else
 {
 
-    //Activate the below pokey
-    instance_activate_object(mebelow)
-
-    //If it exist, snap to its position
+    //If it exists, snap to its position
     if instance_exists(mebelow)
     {
         x = mebelow.x

objects/obj_quicksand.object.gmx

@@ -69,7 +69,7 @@ and keyboard_check_pressed(vk_shift)
     audio_play_sound(snd_jump,0,0)
 
     //Make Mario move upwards
-    other.vspeed = -2.85
+    other.vspeed = -3.85
 
     //Enable variable jumping
     other.jumpnow = 1