Originariamente inviato da TakilianRueshin
					
						
						
							
							
							
							
								
								
								
								
									Visualizza il messaggio
								
							
						
					
				
				
			
		 per tutto cmq..
 per tutto cmq..
							
						 .
. per tutto cmq..
 per tutto cmq..
							
						
 .
.
							
						| [SCAMBIO]Mie Pelli/Piume per Tuoi Minerali <<Luna>> Machete&Corde - Prezzi mai visti! <<Luna>> Fukiya&Shuriken - Prezzi mai visti! <<Market Rueshin>> Global Crafting System ICQ: 160962957 . Fai click QUI e scoprirai il mondo EOS!  | 
 boscags7 ok??
 boscags7 ok?? 



;=======================================
;* @name    Model_PlaceCurrentBod
;* @author  AG
;* @purpose Sposta il BOD corrente in maniera intelligente, a seconda del luogo in cui ci si trova.
;* @returns
;* @example gosub safecall Model_PlaceCurrentBod
;* @status  Partially tested
sub Model_PlaceCurrentBod
    set !bod %CurrentBod_Id
    set !clsTrash %Constants_TrashBarrel
    set !location %Location_Name
    set !tailor %CurrentBod_Tailor
    set !action %CurrentBod_Action
    set !dismissBodbook #false
    gosub safecall Yeld
    if !action = keep
    {
        gosub safecall Std_MoveObject !bod %Config_Bodbooks_Keep
        set !dismissBodbook #true
    }
    if !action = trash
    {
        if %Config_Bodbooks_Trash <> !null
        {
            gosub safecall Std_MoveObject !bod %Config_Bodbooks_Trash
            set !dismissBodbook #true
        }
        else
        {
            finditem !clsTrash G_2
            if #findkind <> -1
            {
                gosub safecall Std_MoveObject !bod #findid
            }
            else
            {
                gosub safecall Std_MoveObject !bod %Config_Bodbooks_Fill
                set !dismissBodbook #true
            }
        }
    }
    if !action = deliver
    {
       if ( !tailor && !location = tailor ) || ( ! !tailor && !location = smith )
       {
           gosub safecall Std_Pathfind %Location_X %Location_Y %Location_Z
           gosub safecall Std_MoveObject !bod %Location_Vendor
       }
       else
       {
           gosub safecall Std_MoveObject !bod %Config_Bodbooks_Deliver
           set !dismissBodbook #true
       }
    }
    if !action = fill
    {
        gosub safecall Std_MoveObject !bod %Config_Bodbooks_Fill
        set !dismissBodbook #true
    }
    if !dismissBodbook
    {
        set !timeout #systime + 3000
        while #systime < !timeout && #contsize <> 615_454 ; dismiss bodbook
        {
        }
        if #contsize = 615_454
        {
            set !x #contposx + 50
            set !y #contposy + 50
            click !x !y r
        }
    }
return
| [SCAMBIO]Mie Pelli/Piume per Tuoi Minerali <<Luna>> Machete&Corde - Prezzi mai visti! <<Luna>> Fukiya&Shuriken - Prezzi mai visti! <<Market Rueshin>> Global Crafting System ICQ: 160962957 . Fai click QUI e scoprirai il mondo EOS!  | 



 
							
						    BodItemSetDb_7: ; ringmail gloves, ringmail leggings, ringmail sleeves, ringmail tunic
      return Ringmail__BMH_KMH__IMH_HMH_NLH_QLH__ZLH_CMH_YLH_XLH__WLH_VLH_

		if ( #contkind = !StartContKind || contname <> !StartContName  || contsize <> !StartContSize  )
		{
          set !CloseGumpX #contposx + 50
		      set !CloseGumpY #contposy + 50
		      click !CloseGumpX !CloseGumpY r
		      wait 5
    }
sub BringUpCraftMenu
	if %0 < 1 || %1 = N/A
	{
		display ok Wrong use of Sub BringUpCraftMenu: some required arguments are missing!
			+$Script will be halted.
		halt
	}
	if %2 = N/A || %0 <= 1
		set %2 #true
	if %2 <> #true && %2 <> #false
	{
		display ok Unexpected value for argument 2 in Sub BringUpCraftMenu!
			+$Please check!$
			+$Script will be halted.
  halt
	}
	nameSpace Push
	nameSpace Local BringUpCraftMenu , #time , #random , #scnt2
	set !ToolsType %1
	set !Halt %2
	if !ToolsType = tinker
		set !ToolsType JTL_GTL_KTL
	if !ToolsType = tailor
		set !ToolsType HAG
	if !ToolsType = smith
		set !ToolsType TLH_FBG_GBG_OLH_OBG_TBG
	if !ToolsType = carpentry
		set !ToolsType YFG_ZHG_CIG_BIG_AGG_EGG_AIG_WFG_IGG_KGG_ZFG
	if !ToolsType = bowcraft
		set !ToolsType UFG
	if !ToolsType = alchemy
		set !ToolsType RQF
	if !ToolsType = inscription
		set !ToolsType PBG
	if !ToolsType = masonry
		set !ToolsType ZEH
	if !ToolsType = glassblow
		set !ToolsType CQF
	if !ToolsType = Cooking
		set !ToolsType BCG_DND_OGG
	UseTools:
	set !StartContKind #contkind
	set !StartContName #contname
	set !StartContSize #contsize
	FindTools:
	finditem !ToolsType C_ , #backpackid
	if #findkind = -1 && !Halt
	{
		display ok Impossible to find any craft tool in your backpack!
			+$Script will be halted.
		halt
	}
	if #findcol <> 0
	{
		;display ok You seem to have some runik kits in your back pack! $Script will ignore them!
		ignoreitem #findid runikkits
		goto FindTools
	}
	if #findkind <> -1
		set #lobjectid #findid
	Event Macro 17 0 ;Last Object
	wait 12
	gosub waitForSysVars contkind <> !StartContKind contname <> !StartContName contsize <> !StartContSize 5
	if ! #result ;Craft Gump was already opened?
	{
		set !CloseGumpX #contposx + 50
		set !CloseGumpY #contposy + 50
		click !CloseGumpX !CloseGumpY r
		wait 5
		if ( #contkind = !StartContKind || contname <> !StartContName  || contsize <> !StartContSize  )
		{
          set !CloseGumpX #contposx + 50
		      set !CloseGumpY #contposy + 50
		      click !CloseGumpX !CloseGumpY r
		      wait 5
    }
		goto UseTools
	}
	ignoreitem reset runikkits
	nameSpace Clear
	nameSpace Pop
return #findid





 
							
						
 
							
						| [SCAMBIO]Mie Pelli/Piume per Tuoi Minerali <<Luna>> Machete&Corde - Prezzi mai visti! <<Luna>> Fukiya&Shuriken - Prezzi mai visti! <<Market Rueshin>> Global Crafting System ICQ: 160962957 . Fai click QUI e scoprirai il mondo EOS!  | 



Commenta