Author Topic: A Common Collect Script  (Read 4159 times)

0 Members and 1 Guest are viewing this topic.

Arf

  • Arf The Legend
  • Global Moderator
  • Undead Hero
  • *********
  • Posts: 354
  • Reputation: +13/-16
A Common Collect Script
« on: July 13, 2013 02:09 AM GMT »
Collect.cs   this is the most highly sought after script for farming clays.  I included it here because i think that if one player has it then they all should have it.  I give it to whomever wants it but i don't show them how to use it.  if you want it, learn how to use it.

Include("presto\\Match.cs");
Include("presto\\Event.cs");

bindCommand(keyboard0, make, "m", TO, "$Collect = 1;");
bindCommand(keyboard0, break, "n", TO, "$Collect = 0;");

Event::Attach(eventClientMessage, OnMessage);

function OnMessage(%client, %msg) {
   if($Collect == 1) {
         if(Match::String(%msg, "* has died and you gained * experience!") == 1) {
            aCollect();
            return;
         }
         else if(Match::String(%msg, "* has died.") == 1) {
            aCollect();
            return;
         }
      }


function aCollect() {
   Schedule("postAction(2048, IDACTION_MOVEFORWARD, 0.999999);", 0.5);
   Schedule("postAction(2048, IDACTION_MOVEFORWARD, 0.9999991);", 1);
   Schedule("postAction(2048, IDACTION_MOVEBACK, 0.999999);", 2);
   Schedule("postAction(2048, IDACTION_MOVEBACK, 0.999999);", 2.5);
   Schedule("postAction(2048, IDACTION_MOVEBACK, 0.999999);", 3);
}

function Stop() {
   $Collect = 0;
   }
}
In Particle We Trust...




The Goal is not so important as the journey that takes you there....

KoRo

  • Fat, Emo Robot
  • Centurian Lord
  • ********
  • Posts: 3,415
  • Reputation: +14/-6
Re: A Common Collect Script
« Reply #1 on: July 16, 2013 07:34 AM GMT »
Maybe we should collect all the various scripts that people use and make a database out of them? I have a few simple ones that I wrote...like one that will automatically put your valuables into storage (assuming your storage is open and you're using CowboyHUD or InventoryHUD), i.e. It will store your diamonds as you're mining them so you will never lose any from the server crashing while having 500+.

I also made a script to auto buy/sell items at intervals of 100 so you don't have to type it in all the time.

B2

  • Undead Hero
  • ****
  • Posts: 228
  • Reputation: +8/-14
Re: A Common Collect Script
« Reply #2 on: July 17, 2013 12:33 PM GMT »
I thought SIayer made the autostore one?

Arf

  • Arf The Legend
  • Global Moderator
  • Undead Hero
  • *********
  • Posts: 354
  • Reputation: +13/-16
Re: A Common Collect Script
« Reply #3 on: July 18, 2013 12:33 AM GMT »
Yes yes yes I agree.  we should post whatever useful scripts there are...  I am sure that many would enjoy some of the advantages they would bring.




Maybe we should collect all the various scripts that people use and make a database out of them? I have a few simple ones that I wrote...like one that will automatically put your valuables into storage (assuming your storage is open and you're using CowboyHUD or InventoryHUD), i.e. It will store your diamonds as you're mining them so you will never lose any from the server crashing while having 500+.

I also made a script to auto buy/sell items at intervals of 100 so you don't have to type it in all the time.
In Particle We Trust...




The Goal is not so important as the journey that takes you there....

KoRo

  • Fat, Emo Robot
  • Centurian Lord
  • ********
  • Posts: 3,415
  • Reputation: +14/-6
Re: A Common Collect Script
« Reply #4 on: July 18, 2013 08:21 AM GMT »
B2, I've been playing SIayer for the last 4 years (minus the 3 year hiatus I took, lol). I wrote the autostore script; at least, I wrote the one that I'm using. I definitely used other scripts as inspiration though; namely Presto's stuff.


For those who are interested (make sure you have Cowboy hud installed and your storage open. This is good if you're mining so your mineral count will never go above 500 and you lose all the stuff past 500 that you mined...or if you kill more than 500 ubers. In general, it just automatically stores everything valuable (subjective, of course) so it won't get stolen, lost, etc).



//To start storing items, type startSlots();
//To stop storing items, type stopSlots();


function startSlots() {
   echo("");
   echo(">> Auto-storing valuable items.");
   echo("");
   $Slots = true;
   slotLoop();
}


function stopSlots() {
   $Slots = false;
   echo("");
   echo(">> No longer auto-storing items.");
   echo("");
}


function slotLoop() {
   if(getItemCount("Keldrinite") > 0) {
      sell("Keldrinite"); }

   if(getItemCount("Diamond") > 0) {
      sell("Diamond"); }

   if(getItemCount("Emerald") > 0) {
      sell("Emerald"); }

   if(getItemCount("Gold") > 0) {
      sell("Gold"); }

   if(getItemCount("Sapphire") > 0) {
      sell("Sapphire"); }

   if(getItemCount("Topaz") > 0) {
      sell("Topaz"); }

   if(getItemCount("Titanium") > 0) {
      sell("Titanium"); }

   if(getItemCount("Iron") > 0) {
      sell("Iron"); }

   if(getItemCount("Ruby") > 0) {
      sell("Ruby"); }

   if(getItemCount("Nickel") > 0) {
      sell("Nickel"); }

   if(getItemCount("Silver") > 0) {
      sell("Silver"); }

   if(getItemCount("Dragon Scale") > 0) {
      sell("Dragon scale"); }

   if(getItemCount("Claymore") > 2) {
      sell("Claymore"); }

   if(getItemCount("Gladius") > 2) {
      sell("Gladius"); }

   if(getItemCount("Bastard Sword") > 2) {
      sell("Bastard Sword"); }

   if(getItemCount("Enchanted Stone") > 0) {
      sell("Enchanted Stone"); }

   if($Slots) {
   schedule("slotLoop();", 1); }
}
« Last Edit: July 19, 2013 12:45 AM GMT by KoRo »

KoRo

  • Fat, Emo Robot
  • Centurian Lord
  • ********
  • Posts: 3,415
  • Reputation: +14/-6
Re: A Common Collect Script
« Reply #5 on: July 18, 2013 08:31 AM GMT »
If anyone use's Cody's Winamp Monitor for Tribes, I wrote script that will begin playing Winamp whenever an important event happens (i.e. if the server crashes). Not useful if you're completely AFK and without access to your computer, but if you have Tribes minimized, or if you're within earshot of your computer, it's a rugged but simple "siren" to alert you to something having happened.



//Be sure that both Winamp and Tribes Winamp Moniter are up and running, and that Winamp is stopped.

event::Attach(eventConnectionTimeout, disconnectAlarm);

function disconnectAlarm() {
    schedule("winamp::play();", 0);
}

KoRo

  • Fat, Emo Robot
  • Centurian Lord
  • ********
  • Posts: 3,415
  • Reputation: +14/-6
Re: A Common Collect Script
« Reply #6 on: July 18, 2013 08:35 AM GMT »
After all these years, I finally was able to develop an auto-remort script. If you hit level 101, it will automatically remort you, put appropriate amounts of SP into the appropriate skills, switch your weapon, begin auto-firing your weapon, and then transport you to your desired location. Only useful for those who are at such a high RL that they can afford to do all of that at lvl 1. Nevertheless, it's an important step on a much larger project I've been thinking about.



echo("");
echo("Type startautoremort(); to activate.");
echo("Type stopautoremort(); to deactivate.");
echo("");


function startautoremort() {
   $yesremort = true;
    echo("");
   echo("Auto remorting at level 101");
    echo("");
}


function stopautoremort() {
   $yesremort = false;
    echo("");
   echo("No longer auto remorting");
    echo("");
}



   
event::Attach(eventClientMessage, lvlCatch);

function lvlCatch(%client, %msg) {
    %level100 = Match::String(%msg, "Welcome to level 100");
    %level101 = Match::String(%msg, "Welcome to level 101");

      if(%level100 && $yesremort) {
      $DeusRPG::AutoCasting = 0; //Stop Deus autocasting at lvl 100 so it doesn't get in the way of remorting at lvl 101
   }

      if(%level101 && $yesremort) {
      Schedule("say(0, \"#cast remort\");", 0);
        Schedule("autoskills();", 5);
   }
}


function autoskills() {
   %i = 0.5;
   schedule("remoteeval(2048, ScoresOn);", %i);
   schedule("ClientMenuSelect(sp);", %i++);
//   ClientMenuselect("page 1"); //Pages 1-4
//   ClientMenuSelect("2 1"); //First number is skill 1-23, second number is the page to show after.
    schedule("say(1,\"19\");",%i++); //19 into Slashing
    schedule("ClientMenuSelect(\"1 1\");",%i++);
    schedule("say(1,\"10\");",%i++); //10 into Weght Capacity
    schedule("ClientMenuSelect(\"5 1\");",%i++);
    schedule("say(1,\"17\");",%i++); //17 into Offensive Casting
    schedule("ClientMenuSelect(\"10 2\");",%i++);
    schedule("say(1,\"20\");",%i++); //20 into Endurance
    schedule("ClientMenuSelect(\"15 3\");",%i++);
    schedule("say(1,\"20\");",%i++); //20 into Energy
    schedule("ClientMenuSelect(\"20 4\");",%i++);
    schedule("say(1,\"10\");",%i++); //10 into Neutral Casting
    schedule("ClientMenuSelect(\"22 4\");",%i++);
    schedule("remoteeval(2048, ScoresOff);", %i++);
    schedule("say(0,\"#cast transport uber\");", %i++);
    schedule("use(\"Anchet's Sword\");", %i++);
    schedule("DeusRPGPack::func14();", %i++);
    schedule("DeusRPGPack::func14();", %i++);
}
« Last Edit: July 19, 2013 12:48 AM GMT by KoRo »

KoRo

  • Fat, Emo Robot
  • Centurian Lord
  • ********
  • Posts: 3,415
  • Reputation: +14/-6
Re: A Common Collect Script
« Reply #7 on: July 18, 2013 08:44 AM GMT »
Same idea as the server crash alarm, but in this case it's for when certain people join the server. Particularly people that you are paranoid of, or just the regular trolls. This probably isn't a big deal anymore since hardly anyone plays, but back in the days of Focus and Jeenyus, I would have loved something like this. I borrowed heavily from HocusFocus.cs (Cody's amazing Focus auto-taunt script), so much so that I haven't bothered to clean it up and fix up the variable names, etc.


$Focus::Target[0] = "Focus";
$Focus::Target[1] = "Jeenyus";
$Focus::Target[2] = "Arf";
$Focus::Target[3] = "Particle";


event::Attach(eventClientJoin, Connected);

function Connected(%client) {
        %client = client::getname(%client);
       for (%i=0; $Focus::Target[%i] != ""; %i++) {
      if (%client == $Focus::Target[%i]) {
                winamp::play();
                }
        }
}




Alternatively, you could modify it so that it just plays music whenever anyone joins...probably a headache, but eh.



event::Attach(eventClientJoin, Connected);

function Connected(%client) {
   winamp::play();
}
« Last Edit: July 18, 2013 08:47 AM GMT by KoRo »

KoRo

  • Fat, Emo Robot
  • Centurian Lord
  • ********
  • Posts: 3,415
  • Reputation: +14/-6
Re: A Common Collect Script
« Reply #8 on: July 18, 2013 08:49 AM GMT »
My own auto buy/sell script for when you have many thousands of items and you don't want to kill your hand going through the "y-uparrow-enter-doubleclick" loop dozens of times over to buy, and then again to sell. Also made it usable for dust, even though there's already an auto-dusting script in Deus i think. It's very dirty and could use a lot of polishing, but it gets the job done.



include("presto\\Match.cs");
include("presto\\Event.cs");
   
   echo("");
   echo("");
   echo(">> Type startbuy(); to begin auto-buying from storage.");
   echo("");
   echo(">> Type stopbuy(); to stop.");
   echo("");
   echo("");
   echo("");
   echo("");
   echo(">> Type startsell(); to begin auto-selling to merchant.");
   echo("");
   echo(">> Type stopsell(); to stop.");
   echo("");
   echo("");
   echo("");
   echo("");
   echo(">> Type buydust(); to begin auto-buying dust.");
   echo("");
   echo(">> Type stopdust(); to stop.");
   echo("");
   echo("");


function startbuy($buyitem) {
   $buyspam = true;
   buyloop();
   }   


function buyloop() {
   schedule("say(1, \"100\");", 0);
   buy($buyitem);
   if($buyspam)
   schedule("buyloop();", 0.5);
   }


function stopbuy() {
   $buyspam = false;
   }








function startsell($sellitem) {
   $sellspam = true;
   sellloop();
   }

function sellloop() {
   if(getItemCount($sellitem) > 100) {
      schedule("say(1, \"100\");", 0.5);
      sell($sellitem);
      }

   if($sellspam)
   schedule("sellloop();", 0.5);   
   }


function stopsell() {
   $sellspam = false;
   }





function buydust() {
   $buydust = true;
   dustloop();
   }   


function dustloop() {
   schedule("say(1, \"#say hi\");", 0);
   schedule("say(1, \"#say yes\");", 1);

   if($buydust)
   schedule("dustloop();", 2);
   }

function stopdust() {
   $buydust = false;
   }
« Last Edit: July 18, 2013 08:53 AM GMT by KoRo »

B2

  • Undead Hero
  • ****
  • Posts: 228
  • Reputation: +8/-14
Re: A Common Collect Script
« Reply #9 on: July 18, 2013 09:12 PM GMT »
Awesome!! Great job on the scripts man! Thanks for sharing!

Do you know where I can get Tribes Winamp Moniter?
« Last Edit: July 18, 2013 09:38 PM GMT by B2 »

KoRo

  • Fat, Emo Robot
  • Centurian Lord
  • ********
  • Posts: 3,415
  • Reputation: +14/-6
Re: A Common Collect Script
« Reply #10 on: July 19, 2013 12:42 AM GMT »
I'm going to collect all the old scripts and programs that have been lost through time and make a database for them. One thing you should know about me is that I hoard EVERYTHING, including scripts for a 15 year old game.

Vorter_X_

  • Centurian Lord
  • ********
  • Posts: 2,693
  • Reputation: +2/-0
Re: A Common Collect Script
« Reply #11 on: August 16, 2013 03:01 AM GMT »
I have my old hard drives somewhere around here...they've got everything installed still...I wonder which box those are in o.O...And by everything...I mean ALL the good scripts...just have no idea where those 5gb 5" HDDs are...I'll find em and try to get stuff off them though...

 

With Quick-Reply you can write a post when viewing a topic without loading a new page. You can still use bulletin board code and smileys as you would in a normal post.

Warning: this topic has not been posted in for at least 120 days.
Unless you're sure you want to reply, please consider starting a new topic.

Name: Email:
Verification:
Type the letters shown in the picture
Listen to the letters / Request another image
Type the letters shown in the picture:
Tribes RPG / PCRPG is a modification of the game "Starseige: _______".  (Just the word that goes in the blank):
This question is designed to stop automated account registration.  Those accounts are typically used to post messages commonly referred to as _______.  (Same name as a meat product packed into a rectangular can):
Do what you want 'cuz a pirate is free.  You are a pirate.  What are you?: