Bumgal macro

macros macros macros

Moderators: Phineas, noivad

Post Reply
Talin
Noble
Posts: 1150
Joined: Sat Apr 03, 2004 4:13 pm
Profession: Healer
Race: Sylvan
Player Status: Active
Contact:

Bumgal macro

Post by Talin » Tue Jun 07, 2011 1:06 am

The following macro is an old Bumgal macro, but does not work. Anyone able to tell me how to rewrite it? It is not mine, btw, but the author shall for now stay unseen.

I would like to whisper the number to Bumgal, and especially to drop blue bauble, green token, and shiny medallion immediately.

Code: Select all

"/ingot"
{
if gIngotting != 1
  setglobal gIngotting 1
  message "o Ingot started."
  label winingot

  if @env.textLog.word = "thinking"
	"/whisper 6\r"
  end if
	
  if @env.textLog.word[8] == "green"
	"/drop green token\r"
  end if

  if @env.textLog.word[8] == "blue"
	"/drop  blue bauble\r"
  end if

  if @env.textLog.word[8] == "shiny"
	"/drop shiny medallion\r"
  end if

  if @env.textLog.word[8] == "ingot."
	"/selectitem ingot\r"
	message "o yay"
	goto won
  end if

  pause 1
  if gIngotting == 1
    goto winingot
  end if
  label won
  setglobal gIngotting 0
  message "o Ingot stopping."
else
  setglobal gIngotting 0
end if
}

User avatar
warawonda
Exile
Posts: 230
Joined: Fri Feb 11, 2011 8:39 pm
Profession: Mystic
Race: Sylvan
Player Status: Spambot
Location: Puzzle Island

Re: Bumgal macro

Post by warawonda » Tue Jun 07, 2011 10:37 am

Code: Select all

setglobal gambleIngot 1

"/ingot"
{
if gambleIngot != 1
  setglobal gambleIngot 1
  message "* Ingot started."
  label start

  if @env.textLog.word = "thinking"
   random no-repeat
   "/whisper 1\r"
   or
   "/whisper 2\r"
   or
   "/whisper 3\r"
   or
   "/whisper 4\r"
   or
   "/whisper 5\r"
   or
   "/whisper 6\r"
   or
   "/whisper 7\r"
   or
   "/whisper 8\r"
   or
   "/whisper 9\r"
   or
   "/whisper 10\r"
   end random
  end if
   
  if @env.textLog.word[8] == "green"
   "/drop green token\r"
  end if

  if @env.textLog.word[8] == "blue"
   "/drop  blue bauble\r"
  end if

  if @env.textLog.word[8] == "shiny"
   "/drop shiny medallion\r"
  end if

  if @env.textLog.word[8] == "ingot."
   "/selectitem ingot\r"
   message "* You Won an Ingot"
   goto exit
  end if

  pause 1
  if gambleIngot == 1
    goto start
  end if
  label exit
  set gambleIngot 0
  message "* Ingot recived stopping."
else
  set gambleIngot 0
end if
}
haven't tested it but should work.
the rich get richer, and the poor get poorer; enter clanlord, and they wonder why no one new joins and stays on

User avatar
Gorvin
Noble
Posts: 1001
Joined: Tue Dec 16, 2003 12:45 pm
Profession: Champion
Race: Dwarf
Player Status: Active

Re: Bumgal macro

Post by Gorvin » Tue Jun 07, 2011 4:54 pm

Talin wrote:

Code: Select all

  if @env.textLog.word = "thinking"
This line needs to be changed to this:

Code: Select all

  if @env.textLog.word[7] == "thinking"

Post Reply