[Tutorial] Skrypty Redbot Pro spis by Bojda

Bojda · 1 Kwietnia 2013

Joł w tym temacie dodam skrypty niektóre będą moje.

Instrukcja dodania dla Zielonych

Wchodzimy w "Persistent" > Klikamy "New" > PPM na nowy skrypt i "Edit" > wklejamy zawartość potrzebnego nam skryptu i go aktywujemy. -.-

Nakładanie stealth ringa gdy na ekranie pojawią się potwory o podanych nickach w N ilości.

/* te zmienne mogą być wkopiowane do global variables */
string stealthRing = "stealth ring"; // jaki ring
string[] stealthOnMonsters = {"cyclops", "cyclops smith", "cyclops drone"}; // jakie potwory maja byc uwzgledniane
int stealthRange = 5; // w jakiej odleglosci musza znalezc sie potowory
int stealthOnCount = 2; // ile ich ma byc(potworow)

/* hotkey */
int around = 0;
for (int i = 0; i < stealthOnMonsters.Length; i++) {
around += maround(stealthRange, stealthOnMonsters);
}

if (around >= stealthOnCount)
{
if ($finger.id == 0) {
equipitem(itemid(stealthRing), "finger");
}
} else {
if ($finger.id != 0) {
unequipitem("finger");
}
}

Auto Open Battle

if ($battleopened == false)
{
openbattle();
}

Advenced SS by Slane

//Screenshot Taker v2.2 - By Slane

//Advances
bool Level = true;
bool Magic = false;
bool Fist = false;
bool Club = false;
bool Sword = false;
bool Axe = false;
bool Distance = false;
bool Shielding = false;
bool Fishing = false;
bool Death = true;

//Rare drops
bool Rare_Item_Drop = false;
string Rare_Item = "shield of corruption"; // do not use capital letters

//Boss spawns
bool SS_When_Boss_Spawn = false;
string Boss_Name = "The Voice of Ruin";

//Player on screen
bool Player_On_Screen = false;
string Player_Name = "Slane";

//Low health
bool SS_On_Low_Health = false;
int Low_Health = 3; // works by %

// Do not touch below
string MsgCon = $lastmsg.serverlog.content;
int MsgIndex = $lastmsg.serverlog.index;

if (filexists($name + " - Screenshots") == false)
{
createfile($name + " - Screenshots");
}
if (filexists($name + " - Levels") == false)
{
createfile($name + " - Levels");
}

if (Death && $hppc < 2)
{
focusclient();
wait(500);
screenshot("Dead");
filewrite($name + " - Screenshots", MsgCon+"\r\n");
}
if (Level && $hppc == 100 && $mppc == 100 && !$pzone)
{
if (fileline($name + " - Levels", filelinescount($name + " - Levels")-1) != $level.ToString())
{
focusclient();
wait(500);
screenshot($name+" - Level "+$level);
filewrite($name + " - Levels", $level+"\r\n");
}
}
if (Magic && $lastmsg.serverlog.content.IndexOf("Magic Level") != -1)
{
if (MsgCon != fileline($name + " - Screenshots", filelinescount($name + " - Screenshots")-1))
{
focusclient();
wait(500);
screenshot("Magic");
filewrite($name + " - Screenshots", MsgCon+"\r\n");
}
}
if (Fist && $lastmsg.serverlog.content.IndexOf("fist") != -1)
{
if (MsgCon != fileline($name + " - Screenshots", filelinescount($name + " - Screenshots")-1))
{
focusclient();
wait(500);
screenshot("Fist");
filewrite($name + " - Screenshots", MsgCon+"\r\n");
}
}
if (Club && $lastmsg.serverlog.content.IndexOf("club fighting") != -1)
{
if (MsgCon != fileline($name + " - Screenshots", filelinescount($name + " - Screenshots")-1))
{
focusclient();
wait(500);
screenshot("Club");
filewrite($name + " - Screenshots", MsgCon+"\r\n");
}
}
if (Sword && $lastmsg.serverlog.content.IndexOf("sword fighting") != -1)
{
if (MsgCon != fileline($name + " - Screenshots", filelinescount($name + " - Screenshots")-1))
{
focusclient();
wait(500);
screenshot("Sword");
filewrite($name + " - Screenshots", MsgCon+"\r\n");
}
}
if (Axe && $lastmsg.serverlog.content.IndexOf("axe fighting") != -1)
{
if (MsgCon != fileline($name + " - Screenshots", filelinescount($name + " - Screenshots")-1))
{
focusclient();
wait(500);
screenshot("Axe");
filewrite($name + " - Screenshots", MsgCon+"\r\n");
}
}
if (Distance && $lastmsg.serverlog.content.IndexOf("distance fighting") != -1)
{
if (MsgCon != fileline($name + " - Screenshots", filelinescount($name + " - Screenshots")-1))
{
focusclient();
wait(500);
screenshot("Distance");
filewrite($name + " - Screenshots", MsgCon+"\r\n");
}
}
if (Shielding && $lastmsg.serverlog.content.IndexOf("shielding") != -1)
{
if (MsgCon != fileline($name + " - Screenshots", filelinescount($name + " - Screenshots")-1))
{
focusclient();
wait(500);
screenshot("Shielding");
filewrite($name + " - Screenshots", MsgCon+"\r\n");
}
}
if (Fishing && $lastmsg.serverlog.content.IndexOf("fishing") != -1)
{
if (MsgCon != fileline($name + " - Screenshots", filelinescount($name + " - Screenshots")-1))
{
focusclient();
wait(500);
screenshot("Fishing");
filewrite($name + " - Screenshots", MsgCon+"\r\n");
}
}
if (Rare_Item_Drop && MsgCon.IndexOf(Rare_Item) != -1)
{
if (MsgCon != fileline($name + " - Screenshots", filelinescount($name + " - Screenshots")-1))
{
focusclient();
wait(500);
screenshot(Rare_Item);
filewrite($name + " - Screenshots", MsgCon+"\r\n");
}
}
if (SS_When_Boss_Spawn && maround(7, Boss_Name) > 0)
{
focusclient();
wait(500);
screenshot(Boss_Name);
}
if (Player_On_Screen && paround(7, Player_Name) > 0)
{
focusclient();
wait(500);
screenshot(Player_Name+" On Screen");
}
if (SS_On_Low_Health && $hppc <= Low_Health && $hppc > 0)
{
focusclient();
wait(500);
screenshot($hppc+"% health");
}

Ring Equipper Script

/*
LUDEN SCRiPTS

Ring Equipper Script v.2.2.

Having an error?
Report to my MSN: [email protected]
*/

int Ring = itemid("Ring of Healing"); //Change to the wanted ring type
int MinMana = 1; //Minimum percentual amount of MANA points to equip the ring (100 = Use ring all the time)
int MinHealth = 1; //Minimum percentual amount of HEALTH points to equip the ring (100 = Use ring all the time)

if ($mppc > MinMana || ($hppc > MinHealth))
{
if ($finger.id != 0)
{
if (windowscount() >= 1 && ($lootbodies == 0))
{
unequipitem("finger");
}
}
}
else if ($mppc <= MinMana || ($hppc <= MinHealth))
{
if (windowscount() >= 1 && ($lootbodies == 0))
{
if ($finger.id == 0)
{
equipitem(Ring, "finger");
}
}
}

Multi RuneSpell Shooter

/*
LUDEN SCRiPTS

Multi Rune/Spell Shooter v.1.1

Having an error?
Report to my MSN: [email protected]
*/

string Hotkey1 = "F1"; //Example hotkey for rune or spell number one 'Exori Vis'
string Hotkey2 = "F2"; //Example hotkey for rune or spell number two 'Exori Gran Vis'
string Monster = "X"; //Monster name
string PvP = "yes/no"; //Yes for pvp server/no for opt-pvp
int MonsterHP = 20; //The percentual amount of health the monster must have equal to, or more than to use the spell or rune type.

if ($target.name == Monster && ($target.hppc >= MonsterHP))
{
if (PvP == "yes")
{
if (paround(0, true) == 0)
{
presskey(Hotkey1);
wait(1000, 2000);
presskey(Hotkey2);
wait(8000, 9000);
}
}
else if (PvP == "no")
{
presskey(Hotkey1);
wait(1000, 2000);
presskey(Hotkey2);
wait(8000, 9000);
}
}

Wyrzuca gold na ziemie z potworka jak ma mało cap

if ($cap < 50)
{
setsetting("Looting\\gold coin\\Destination", "ground");
}
else
{
setsetting("Looting\\gold coin\\Destination", "1");
}

Skin I Stak Ciał

if (maround(0) == 0 && $lootbodies == 0 && stakespot() >= 1)
{
stake(7);
}
else if (maround(0) == 0 && $lootbodies == 0 && skinspot() >= 1)
{
skin(7);
}
else if (maround(0) == 0 && $lootbodies == 0 && fishspot() >= 1)
{
fish();
}

Safe Exori

Skrypt wyszukuje w danym obszarze wokół schodów czy nie znajduje się
gracz jeśli gracz znajduje się w czerwonym polu nie użyje exori.
Exori ustawiasz w "tools" -> Area Spells -> Spell1 i Spell2 skrypt będzie obsługiwał dodane tam czary.

Screen

/*Safe Exori Groundfloor v1.2

Hotkey by Delking

Changelog v1.1:
Added more IDs(to make it safer)

Changelog v1.2:
Added even more IDs

*/

int[] stairids = new int[] {166, 167, 411,412,413,414,369,370, 428, 432, 433,434,435,437,438, 475,476,482,483,1263, 484,485, 566,567,593, 394, 593,594,595,293,294,600,601,604,605,606,607,608,609,610,615,867,868,1067,1066,1080,1999,1959,4823,4824,4825,4826,5731, 5763, 5544, 5022,5023, 6127,6128,6129,6130, 6917,6918,6919,6920, 7053, 7522, 7729,7730,7731,7732,7733,7734,7735,7736,7749, 7750, 7755, 8823,8824,8825,8859, 8932, 9100,8658};//Local Stair ID List

for (int i = 0; i < stairids.Length; i++)
{
if (($posz == 7) && (topitemid(ground($posx-2, $posy-2, $posz)) == stairids || topitemid(ground($posx-2, $posy-1, $posz)) == stairids || topitemid(ground($posx-2, $posy, $posz)) == stairids || topitemid(ground($posx-2, $posy+1, $posz)) == stairids || topitemid(ground($posx-2, $posy+2, $posz)) == stairids || topitemid(ground($posx-1, $posy-2, $posz)) == stairids || topitemid(ground($posx-1, $posy-1, $posz)) == stairids || topitemid(ground($posx-1, $posy, $posz)) == stairids || topitemid(ground($posx-1, $posy+1, $posz)) == stairids || topitemid(ground($posx-1, $posy+2, $posz)) == stairids || topitemid(ground($posx, $posy-2, $posz)) == stairids || topitemid(ground($posx, $posy-1, $posz)) == stairids || topitemid(ground($posx, $posy, $posz)) == stairids || topitemid(ground($posx, $posy+1, $posz)) == stairids || topitemid(ground($posx, $posy+2, $posz)) == stairids || topitemid(ground($posx+1, $posy-2, $posz)) == stairids || topitemid(ground($posx+1, $posy-1, $posz)) == stairids || topitemid(ground($posx+1, $posy, $posz)) == stairids || topitemid(ground($posx+1, $posy+1, $posz)) == stairids || topitemid(ground($posx+1, $posy+2, $posz)) == stairids || topitemid(ground($posx+2, $posy-2, $posz)) == stairids || topitemid(ground($posx+2, $posy-1, $posz)) == stairids || topitemid(ground($posx+2, $posy, $posz)) == stairids || topitemid(ground($posx+2, $posy+1, $posz)) == stairids || topitemid(ground($posx+2, $posy+2, $posz)) == stairids || topitemid(ground($posx, $posy, $posz)) == stairids)) //Safe Exori by Delking
{
while (($posz == 7) && (topitemid(ground($posx-2, $posy-2, $posz)) == stairids || topitemid(ground($posx-2, $posy-1, $posz)) == stairids || topitemid(ground($posx-2, $posy, $posz)) == stairids || topitemid(ground($posx-2, $posy+1, $posz)) == stairids || topitemid(ground($posx-2, $posy+2, $posz)) == stairids || topitemid(ground($posx-1, $posy-2, $posz)) == stairids || topitemid(ground($posx-1, $posy-1, $posz)) == stairids || topitemid(ground($posx-1, $posy, $posz)) == stairids || topitemid(ground($posx-1, $posy+1, $posz)) == stairids || topitemid(ground($posx-1, $posy+2, $posz)) == stairids || topitemid(ground($posx, $posy-2, $posz)) == stairids || topitemid(ground($posx, $posy-1, $posz)) == stairids || topitemid(ground($posx, $posy, $posz)) == stairids || topitemid(ground($posx, $posy+1, $posz)) == stairids || topitemid(ground($posx, $posy+2, $posz)) == stairids || topitemid(ground($posx+1, $posy-2, $posz)) == stairids || topitemid(ground($posx+1, $posy-1, $posz)) == stairids || topitemid(ground($posx+1, $posy, $posz)) == stairids || topitemid(ground($posx+1, $posy+1, $posz)) == stairids || topitemid(ground($posx+1, $posy+2, $posz)) == stairids || topitemid(ground($posx+2, $posy-2, $posz)) == stairids || topitemid(ground($posx+2, $posy-1, $posz)) == stairids || topitemid(ground($posx+2, $posy, $posz)) == stairids || topitemid(ground($posx+2, $posy+1, $posz)) == stairids || topitemid(ground($posx+2, $posy+2, $posz)) == stairids || topitemid(ground($posx, $posy, $posz)) == stairids)) //Safe Exori by Delking
{
settools("Area Spells\\Spell 1\\Enabled", "No");
settools("Area Spells\\Spell 2\\Enabled", "No");
}
}
else
{
settools("Area Spells\\Spell 1\\Enabled", "Yes");
settools("Area Spells\\Spell 2\\Enabled", "Yes");

Perfect Exori Min

Ten skrypt wyszukuje potwory i uderza z Exori Min, jeśli na północy znajdują się 3 potwory użyje exori min.
Jeśli na wschodzie znajdują się 2 potwory a na południu 3 użyje exori min w kierunku południa.
Jego priorytet to liczba potworów, możesz ustalić liczbę potworów przy której skrypt ma działać.

int Amount_To_Shoot = 2;
bool Cast_Exori_Min = true;
bool Player_Safe = true;

//West
int wa = 0;
int wb = 0;
int wc = 0;
if (iscreatureontile(ground($posx-1,$posy-1,$posz))) { wa = 1; }
if (iscreatureontile(ground($posx-1,$posy,$posz))) { wb = 1; }
if (iscreatureontile(ground($posx-1,$posy+1,$posz))) { wc = 1; }
int west = wa+wb+wc;

//North
int na = 0;
int nb = 0;
int nc = 0;
if (iscreatureontile(ground($posx-1,$posy-1,$posz))) { na = 1; }
if (iscreatureontile(ground($posx,$posy-1,$posz))) { nb = 1; }
if (iscreatureontile(ground($posx+1,$posy-1,$posz))) { nc = 1; }
int north = na+nb+nc;

//East
int ea = 0;
int eb = 0;
int ec = 0;
if (iscreatureontile(ground($posx+1,$posy-1,$posz))) { ea = 1; }
if (iscreatureontile(ground($posx+1,$posy,$posz))) { eb = 1; }
if (iscreatureontile(ground($posx+1,$posy+1,$posz))) { ec = 1; }
int east = ea+eb+ec;

//South
int sa = 0;
int sb = 0;
int sc = 0;
if (iscreatureontile(ground($posx-1,$posy+1,$posz))) { sa = 1; }
if (iscreatureontile(ground($posx,$posy+1,$posz))) { sb = 1; }
if (iscreatureontile(ground($posx+1,$posy+1,$posz))) { sc = 1; }
int south = sa+sb+sc;

//South Cast
if (maround(1) >= Amount_To_Shoot && Cast_Exori_Min && south >= Amount_To_Shoot && $self.dir == "south" && cancast("exori min") && south >= north && south >= east && south >= west && (paround(5, true) == 0 || !Player_Safe))
{
cast("exori min");
}
else if (maround(1) >= Amount_To_Shoot && Cast_Exori_Min && south >= Amount_To_Shoot && $self.dir != "south" && cancast("exori min") && south >= north && south >= east && south >= west && (paround(5, true) == 0 || !Player_Safe))
{
turn("s");
}//West Cast
else if (maround(1) >= Amount_To_Shoot && Cast_Exori_Min && west >= Amount_To_Shoot && $self.dir == "west" && cancast("exori min") && west >= south && west >= north && west >= east && (paround(5, true) == 0 || !Player_Safe))
{
cast("exori min");
}
else if (maround(1) >= Amount_To_Shoot && Cast_Exori_Min && west >= Amount_To_Shoot && $self.dir != "west" && cancast("exori min") && west >= south && west >= north && west >= east && (paround(5, true) == 0 || !Player_Safe))
{
turn("w");
}//North Cast
else if (maround(1) >= Amount_To_Shoot && Cast_Exori_Min && north >= Amount_To_Shoot && $self.dir == "north" && cancast("exori min") && north >= south && north >= west && north >= east && (paround(5, true) == 0 || !Player_Safe))
{
cast("exori min");
}
else if (maround(1) >= Amount_To_Shoot && Cast_Exori_Min && north >= Amount_To_Shoot && $self.dir != "north" && cancast("exori min") && north >= south && north >= west && north >= east && (paround(5, true) == 0 || !Player_Safe))
{
turn("n");
} //East Cast
else if (maround(1) >= Amount_To_Shoot && Cast_Exori_Min && east >= Amount_To_Shoot && $self.dir == "east" && cancast("exori min") && east >= south && east >= west && east >= north && (paround(5, true) == 0 || !Player_Safe))
{
cast("exori min");
}
else if (maround(1) >= Amount_To_Shoot && Cast_Exori_Min && east >= Amount_To_Shoot && $self.dir != "east" && cancast("exori min") && east >= south && east >= west && east >= north && (paround(5, true) == 0 || !Player_Safe))
{
turn("e");
}

Auto Exana Pox

if($poisoned && $mp >= 25){
cast("exana pox");
}

Wyrzuca wiale gdy ma mało capa

int xcap = 50; // Poniżej ile capa ma wyrzucac viale
int ilosc = 10; // Ile conajmniej ma być viali aby zostały wyrzucone

int[] vials = {283,284,285};
for (int i = 0; i < vials.Length; ++i)
{
if (itemcount(vials) >= ilosc && ($cap <= xcap) && maround(5) == 0 && $lootbodies == 0)
{
dropitems(vials);
}
}

Przełącznik broni w razie niskiego hp, podczas skillowania.

/* te zmienne mogą być wkopiowane do global variables */
int minHP = 300;
string weapon = "crimson sword";
string weaponTraining = "knife";

/* hotkey */
if ($hp <= minHP && $lhand.id != itemid(weapon)) {
unequipitem("lhand");
wait(400,600);
equipitem(itemid(weapon), "lhand");
wait(400,600);
} else if ($hp > minHP && $lhand.id != itemid(weaponTraining) && itemcount(weaponTraining) != 0) {
unequipitem("lhand");
wait(400,600);
equipitem(itemid(weaponTraining), "lhand");
wait(400,600);
}

Alarm gdy na ekranie pojawi się gracz lub gracze o podanych nickach.

/* te zmienne mogą być wkopiowane do global variables */
string[] alarmOnPlayerOnScreen = { "Nick1", "Nick2" };
strng alarmFile = "player.wav";

/* hotkey */
for (int i = 0; i < alarmOnPlayerOnScreen.Length; i++) {
if (paround(7, alarmOnPlayerOnScreen, false) > 0) {
playsound(alarmFile);
}
}

Advanced Utito Tempo Script

//Advanced Utito Tempo Script by Bojda
int hp_Pc_To_Cast = 85; //Health Percent or less to cast:
int mp_Pc_To_Cast = 50; //Mana Percent or above to cast:
string Spell_Name = ("Utito Tempo"); //Name spell to use:
int Spell_Cooldown = 10000; //Cooldown in milliseconds of to use:
int Amount_To_Cast = 3;//Amount Monsters To cast Spell
int Range_To_Cast = 2;//Range Monster To cast Spell

if(maround(Range_To_Cast,false) >= (Amount_To_Cast) && ($mppc >= mp_Pc_To_Cast) && ($hppc >= hp_Pc_To_Cast) )
{
cast(Spell_Name);
wait(Spell_Cooldown);
}

Strong Strike

int monsterHP = 80; // % of health and less to use spell - if more, will not cast spell
int monsterAround = 3; // maximum monsters next to you to use spell - if more, will not cast spell
string[] Monster = {"Bog Raider", "Nightmare", "Destroyer", "Demon", "Plaguesmith"}; // add monsters to cast spell on

//do not edit below
for (int i = 0; i < Monster.Length; i++)
{
if (cancast("exori gran ico"))
{
if ($target.hppc <= monsterHP && $target.dist == 1 && maround(1) < monsterAround && $target.name == Monster)
{
cast("exori gran ico");
}
}
}

co jakiś czas będzie coś dodawane ;P

Kafari37 · 1 Kwietnia 2013

Działa dzięki

Ader90 · 1 Kwietnia 2013

Moglby ktos wytlumaczyc jak sie robi te waypointy :P?

Nie chce mi schodzic na dol,wlazic po linie itp.

Sir Manieek · 1 Kwietnia 2013

Co to za tut ? To jest bardziej spis.. -.-

NieOgarnieety · 1 Kwietnia 2013

fajne

Bojda · 1 Kwietnia 2013

dobre tyle że jeszcze dodaj krotki opis co robi, mozna wywnioskowac z tytułu ale to ma być dla zielonych nie?

dla zielonych dałem tut do dodania skrypta, a skryptów raczej nie będę tłumaczył bo każdy z czasem zrozumie =]

damster1 · 1 Kwietnia 2013

Przydatny tutorial, wielu się przyda

Poradnik dodałem do tego spisu

http://www.mpcforum.pl/topic/885589-spis-przydatnych-poradnikw-w-dziale-tibia/

PrawilnaTibia · 2 Kwietnia 2013

ładny ,tylko jeslibys go aktualizował to był by miód.

@

Liked.

zielony mms · 2 Kwietnia 2013

Dzięki! Na pewno się przyda!

saitva18 · 28 Maja 2013

Jest jakas opcja zeby redbot wyłączał targeting gdy inny player jest na ekranie badz zeby atakowal tylko potworki ktore atakuja naszego playera??

Bojda · 28 Maja 2013

Jest jakas opcja zeby redbot wyłączał targeting gdy inny player jest na ekranie badz zeby atakowal tylko potworki ktore atakuja naszego playera??

Jednym z minusów redbota jest to że ma słabo rozbudowany targeting i niema opcji żeby atakował tylko te potwory co nas atakują, ale skrypt spróbuje zrobić

Edit: Jak gracz na ekranie wyłącza targeting, jak niema włącza.

if(paround(7,false) >= 1)

{

settargeting("off");

wait(100, 300);

}

else

{

settargeting("on");

wait(100, 300);

}

kubaszyszka · 8 Czerwca 2013

da rade takie zrobic?

podnoszenie spearow z baga < bo chce postawic palka na noc a w bagu bedzie 800 spirow > ale zeby nie mial w rece wiecej niz 10

zmienianie monka gdy ten ma ponizej 30% hp

Zaloguj się

👋 Witaj na MPCForum!

[Tutorial] Skrypty Redbot Pro spis by Bojda

Rekomendowane odpowiedzi

Bojda

Bojda

Kafari37

Kafari37

Ader90

Ader90

Sir Manieek

Sir Manieek

NieOgarnieety

NieOgarnieety

Bojda

Bojda

damster1

damster1

PrawilnaTibia

PrawilnaTibia

zielony mms

zielony mms

saitva18

saitva18

Bojda

Bojda

kubaszyszka

kubaszyszka

Zarchiwizowany