Fixed XPDrops not opening on script start #patch

Author: Torwent

osr.simba

@@ -13,9 +13,9 @@
 
 {$IFNDEF WL_BIOMETRICS_INCLUDED}        {$I osr/antiban/biometrics.simba}
 {$IFNDEF WL_PROGRESS_INCLUDED}          {$I osr/progress.simba}
+{$IFNDEF WL_XPDROP_INCLUDED}             {$I osr/interface/xpdrop.simba}
 {$IFNDEF WL_RSCLIENT_INCLUDED}          {$I osr/rsclient.simba}
 {$IFNDEF WL_INTERFACEAREA_INCLUDED}     {$I osr/interface/interfacearea.simba}
-{$IFNDEF WL_XPDROP_INCLUDED}             {$I osr/interface/xpdrop.simba}
 
 {$IFNDEF WL_OPTIONS_INCLUDED}           {$I osr/interface/gametabs/options.simba}
 {$IFNDEF WL_INVENTORY_INCLUDED}         {$I osr/interface/gametabs/inventory.simba}

osr/player.simba

@@ -15,7 +15,7 @@ begin
       MainScreen.SetHighestPitch;
     end;
 
-    if not WL.XPBarOpen then
-      WL.XPBarOpen := XPBar.Open;
+    if not WL.XPDropOpen then
+      WL.XPDropOpen := XPDrop.Open;
   end;
 end;

osr/rsclient.simba

@@ -20,3 +20,20 @@ begin
   Self.ClientModeChanged();
 end;
 
+function TRSClient.IsLoggedIn: Boolean; override;
+begin
+  Result := inherited;
+
+  if Result then
+  begin
+    if not WL.HighestPitch then
+    begin
+      WL.HighestPitch := True;
+      MainScreen.SetHighestPitch;
+    end;
+
+    if not WL.XPDropOpen then
+      WL.XPDropOpen := XPDrop.Open;
+  end;
+end;
+

utils.simba

@@ -6,7 +6,7 @@
 type
   TWaspLib = record
     HighestPitch: Boolean;
-    XPBarOpen: Boolean;
+    XPDropOpen: Boolean;
     Activity: TCountDown;
   end;