Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Messages - Man7dowN

Pages: [1] 2 3
1
Script development tools / Re: Gaderian's Gump script helper
« on: April 30, 2020, 11:11:10 PM »
oh wow, this is really nice glad i stumbled upon this, good work it looks sharp

2
Script Debug / Re: pet attack with location error
« on: March 04, 2019, 04:25:55 AM »
i think i got it
if anyone would like to test or look at this for errors that be great.

it should set closest enemy , set pet location , attack target , then check to see if pet has moved, if pet doesnt move attack target again

Code: [Select]
  set %monstertype ZC_WE_IJB_ID_Q_V_UD_ED_RI_SI_EJ_QD_BE_WE_R_S_VI_FD_
set %petid WZXQ
set %scanpk
 
 
for %searchDistance 1 10
{
  finditem %monstertype G_ , %searchdistance
  if #findcnt > 0
   {
    set %targetkill #ltargetid
    event sysmessage monster set
    finditem %petid G_ , %searchdistance
     if #findcnt > 0
      {
       event sysmessage pet distance is at #finddist
       set %petdist1 #finddist
       killloop:
       set #ltargetid %targetkill
       msg all kill$
       wait 10
       target
       event macro 22 0
       wait 10
        {
         finditem %petid G_ , %searchdistance
            if #finddist <> %petdist1
             {
              event sysmessage MOVED
              halt
            if #finddist = %petdist1
              {
               event sysmessage STAYED
               goto killloop
               }
              }
             }
            }
           }
   if #findcnt = 0
     event sysmessage NO MOB
     wait 30
     return

3
Script Debug / Re: pet attack with location error
« on: March 03, 2019, 06:49:24 AM »
Up to you but I would build the loop around enemy hits VS pet x y. I haven't had much luck getting a x y to compare its self to a set x y on my scripts. I'm sure it can be done.. But it it does work and your monster runs off at 5% as they do... Your going to loop as your pet chases. Just an idea.

i have been messing around with #finddist but i havnt been able to get it to work right yet, seems like it would be easier than setting multiple x ,y and comparing.

im just trying to get in to say hey i found enemy, set my pet current location, have pet attack enemy, then recheck pets current location, if pet location changes halt, if pet location unchanged use all attack loop again

but if i can get it going i will gladly share the little loop here, this is what i have so far but it fails


Code: [Select]
set %monstertype ZC_WE_IJB_
set %petid PDZR
set %scanpk



for %searchDistance 1 10
{
  finditem %monstertype G_ , %searchdistance
  if #findcnt > 0
  {
  finditem %petid
    wait 5
    set %petdist #finddist
    }
    killloop:
    finditem %monstertype G_ , %searchdistance
     if #findcnt > 0
     {
       set #ltargetid #findid
       msg all kill$
       wait 5
       target
       event macro 22 0
       wait 10
       }
       finditem %petid
        if %petid = %petdist
          {
           event sysmessage attack again
           goto killloop
        if %petid <> %petdist
           {
            event sysmessage pet moving
            halt
            }
           }

4
Script Debug / pet attack with location error
« on: February 28, 2019, 10:41:05 AM »
hello all, having trouble getting my pet attack sub working correctly.

what im trying to do is this

check for closest enemy
{
if find enemy found
{
set pet current location
{
killloop:
have pet attack nearest target
{
check pets location, if pet is in same location return to kill loop
{
if pet location changed halt



what i wrote is not working correctly, looking for any help i can get

Code: [Select]
set %monstertype ZC_WE_IJB_
set %petid PDZR
set %scanpk



for %searchDistance 1 10
{
  finditem %monstertype G_ , %searchdistance
  if #findcnt > 0
  {
  finditem %petid
    wait 5
    set %petidx #findx
    set %petidy #findy
    }
    killloop:
    finditem %monstertype G_ , %searchdistance
     if #findcnt > 0
     {
       set #ltargetid #findid
       msg all kill$
       wait 5
       target
       event macro 22 0
       }
       finditem %petid
        if %petid = %petidx || %petid = %petidy
          {
           event sysmessage attack again
           goto killloop
        if %petid <> %petidx || %petid <> %petidy
           {
            event sysmessage pet moving
            halt
            }
           }


5
Script Debug / Re: cant exit goto correctly
« on: February 27, 2019, 08:38:12 AM »
I might point out a few things that look weird to me.

 if #findkind
   {
    goto bankbookstock
      }
     Finditem %recallget C_ , %BankboxID

no condition on if statement for this and the next.



Also this statement and others like it  does nothing

bankbookstock_exit

Also need waits after dropc commands

Hope this helps.

(I rarely use goto statements, I use gosub)


it sure does thank you for reply, i sometimes find myself coming up with commands that dont exist lol, but they sound good

6
Script Debug / cant exit goto correctly
« on: February 27, 2019, 02:40:27 AM »
this is my  restock sub, mainly having trouble with dropping recalls on runebook and returning from the GOTO back to where it left off in the sub, it keeps moving threw other GOTO's.
i think i have a bracket miss placed but i cant find it,,,
any help appreciated

Code: [Select]
SET %weight 200
set %regamount 50
SET %bandageamount 200
SET %bankbook APNOHPD
SET %farmbook LPOELOD
SET %restockbag FTQDSPD
SET %lootbag ZRBNPMD
SET %dropbag RPYCWND
SET %dropoff POF_MYM
set %garlic KZF_
set %ginseng JZF_
set %mandrake RZF_
set %spider MZF_
set %bandage ZLF_
set %recallget WTL_
set %recallgetamount 100
set %bankboxID JYDQBND



GOSUB RESTOK
halt



SUB RESTOK
Finditem %recallget C_ , %BankboxID
  if #findkind
   {
    goto bankbookstock
      }
     Finditem %recallget C_ , %BankboxID
  if #findkind
   {
    goto farmbookstock
      }
     findItem %bandage C_ , %lootbag
  if #findkind = -1
   {
     set %rg %bandage
     goto bandagesnag
     }
findItem %garlic C_ , %lootbag
  if #findkind = -1
   {
     set %rg %garlic
     goto regsnag
     }
     findItem %ginseng C_ , %lootbag
  if #findkind = -1
   {
     set %rg %ginseng
     goto regsnag
     }
     findItem %mandrake C_ , %lootbag
  if #findkind = -1
   {
     set %rg %mandrake
     goto regsnag
     }
     findItem %spider C_ , %lootbag
  if #findkind = -1
   {
     set %rg %spider
     goto regsnag
     }
     return



bankbookstock:
finditem %recallget C_ , %restockbag
     exevent drag #findid #findstack
     wait 10
     exevent dropc %bankbook
bankbookstock_exit
farmbook:
finditem %recallget C_ , %restockbag
     exevent drag #findid #findstack
     wait 10
     exevent dropc %bankbook
     farmbook_exit
bandagesnag:
finditem %rg C_ , %restockbag
     exevent drag #findid %bandageamount
     wait 10
     exevent dropc %lootbag
     bandagesnag_exit
regsnag:
finditem %rg C_ , %restockbag
     exevent drag #findid %regamount
     wait 10
     exevent dropc %lootbag
     regsnag_exit

7
Script Debug / Re: stuck in loop
« on: February 25, 2019, 10:55:23 AM »
got it all fixed, had an extra bracket screwing it up, added sub loop for item drop

HAPPY DAYS!!!!

Code: [Select]
SET %weight 200
SET %restockbag FTQDSPD
SET %lootbag ZRBNPMD
SET %dropbag RPYCWND
SET %dropoff pof_ZLF_

loop:
if #weight > %weight
    gosub opencontainers
    gosub bankdrop

   
GoTo loop


;;;;;;;;;;;;;;;;;;;;;
sub bankdrop
loop1:
findItem %dropoff C_ , %lootbag
 wait 8
  if #findkind = -1
   halt
   if #findkind = 1
   {
   wait 10
   exevent drag #findid #findstack
   wait 10
   exevent dropc %dropbag
   goto loop1
   return


;;;;;;;;;;;;;;;;;;;;;;
sub opencontainers


event macro 8 1  ; paperdoll
wait 10
Contpos 1450 40
wait 10
event macro 8 7   ;backpack
wait 10
contpos 1050 200
wait 10
msg bank $       ;open bank
wait 10
contpos 850 200
wait 10
set #LObjectID %lootbag  ;lootbag
    event macro 17 0
    wait 10
Contpos 1450 400
wait 10
set #LObjectID %restockbag  ;regs,aids
    event macro 17 0
    wait 10
Contpos 1050 400
return

8
Script Debug / stuck in loop
« on: February 25, 2019, 09:57:58 AM »
been using this site for years and other ppls scripts, so i decided  to try and make my own from scratch. i went threw cervezas  tutorials on this site which was fun.

current issue i am having is im stuck in a loop where it just wants to organize bag positions , i have made a sub to move containers to position and open them all, this works fine, i also made a sub to drop gold from a loot bag into a bank bag, this works fine, problem is when i combine them  i get stuck only moving containers around and not advancing to dropoff sub.
any help appreciated

Code: [Select]
SET %weight 200
SET %restockbag FTQDSPD
SET %lootbag ZRBNPMD
SET %dropbag RPYCWND
SET %dropoff pof_ZLF_

loop:
if #weight > %weight
    gosub opencontainers
    gosub bankdrop

   
GoTo loop


;;;;;;;;;;;;;;;;;;;;;
sub bankdrop

findItem %dropoff C_ , %lootbag
 wait 8
  if #findkind = -1
   halt
   if #findkind = 1
   {
   wait 10
   exevent drag #findid #findstack
   wait 10
   exevent dropc %dropbag
   }
   return


;;;;;;;;;;;;;;;;;;;;;;
sub opencontainers


event macro 8 1  ; paperdoll
wait 10
Contpos 1450 40
wait 10
event macro 8 7   ;backpack
wait 10
contpos 1050 200
wait 10
msg bank $       ;open bank
wait 10
contpos 850 200
wait 10
set #LObjectID %lootbag  ;lootbag
    event macro 17 0
    wait 10
Contpos 1450 400
wait 10
set #LObjectID %restockbag  ;lootbag
    event macro 17 0
    wait 10
Contpos 1050 400
return

9
Scripting Chat / Re: help please with small script
« on: July 20, 2015, 02:35:25 AM »
It just to kill the Boss. I see now.  Was wondering if that was during regular hunting.

No, but it can be set up for regular hunting pretty easy

10
Scripting Chat / Re: help please with small script
« on: July 19, 2015, 07:00:18 AM »
Will be nice to see the final product of this build.   Seen like a little help for mage. 

Ya it's for champ, helps with all the casting on long fights,  little more relax time

11
Scripting Chat / Re: help please with small script
« on: July 19, 2015, 05:06:46 AM »
Glad it work for you, It is a nice little build to learn.   did you see what you were missing. 

I had the set timer wrong, then changed the sub a little on finding target, works great... 2 steps left, adding a mage cure and  greater than 2 wither sub

12
Scripting Chat / Re: help please with small script
« on: July 19, 2015, 03:00:37 AM »
here an idea for you




Works awesome ghost, just what I was looking for, I changed it around a little bit, but all the key parts are there, thanks ghost

13
Scripting Chat / Re: help please with small script
« on: July 16, 2015, 07:31:23 AM »
Any suggestions I can try tonight?

14
Scripting Chat / Re: help please with small script
« on: July 14, 2015, 10:14:31 AM »
Here some little stuff that might help you.   Have u think of those thing

find how long Corpse skin last

set %spellTimer #scnt2 + ( insert delay)

if ( %spellTimer < #scnt2 )
gosub CS


Anyone know how I can implement this to my script, i can't get it to work, not sure why,  the post before this is the full script code I'm using

15
Scripting Chat / Re: help please with small script
« on: July 12, 2015, 07:07:32 PM »
i have the mana check on spells worked out

Code: [Select]
SET %target OE_XF_IE_LD_VE_BI_UB_HE_OE_CI_NG
    SET !_lowHits 55
    SET !_maxRange 10
    ; =====================================
    IGNOREITEM reset
    Ignoreitem #Charid


    enemyloop:
    FOR !_range 1 !_maxrange
    {
       FINDITEM %target G_ , !_range
       IF #FINDKIND <> -1
       {
         SET #LTARGETID #FINDID
         SET !_enemy #FINDID
         if #findCnt > 0 && #mana > 41
         GOSUB FS
         if #findCnt > 0 && #mana < 40
         GOSUB FB
       }
       WAIT 10
    }
    SET !_range 0
    goto enemyLoop
    ;================

    ; ================

   SUB FS
   finditem !_enemy G_
   if #findcnt > 0
   {
   event macro 15 50
   set #ltargetkind 1
   set #ltargetid #findid
   target 3s
   event macro 22 0
   wait 5
  }
    FINDITEM !_enemy G_
    IF #FINDKIND = 1
    {
    RETURN
    ;==================
   
    SUB FB
   finditem !_enemy G_
   if #findcnt > 0
   {
   event macro 15 17
   set #ltargetkind 1
   set #ltargetid #findid
   target 3s
   event macro 22 0
   wait 5
  }
    FINDITEM !_enemy G_
    IF #FINDKIND = 1
    {
    RETURN



 back to messing round with corpse skin timer, thank you everyone for your input so far it has helped the nooblet scripter lol

Pages: [1] 2 3