• IS THIS SITE UGLY? Click "RG3" at the very bottom-left of this page to change it. To dismiss this notice, click the X --->
bLang.mac language trainer that will only spam non-max languages

bLang.mac language trainer that will only spam non-max languages 1.0

Download now: Join us with Level 2 access
or earn your way in with RedCents.
Beta version

Rich (BB code):
|**


   bLang.mac by LamahHerder
      http://www.macroquest2.com/phpBB3/viewtopic.php?f=49&t=20211
      This will practice only languages that are not 100


   Usage:
      /mac bLang while in a group (or with a merc)


   Requirements:
  
   Future Ideas:
      Add a teach mode to spam 20 lines so your newbie can get 1 point in every language, will do this after Teir'Dal fixed
  
   Stolen/Borrowed/Referenced:
      http://macroquest2.com/wiki/index.php/Main_Page
     
   1701a
      Initial Release (LamahHerder)


**|


#event langHelp "#1# - #2#"


sub main
    /echo =====================================
    /echo You must click your main chat window so it will chat there for this to work as /lang only effects the active window
    /echo =====================================
   
    /if ( ${Me.GroupSize}<=1 ) /call endmac


    /declare gsayDelay int outer 2
    /declare gsayTeachCnt int outer
    /declare gsayTeachTotal int outer 20
   
    /declare langArray[25] string outer
    /declare langNum int outer 1
   
    /doevents flush
    /lang help
    /delay 5
    /doevents langHelp


    /for langNum 1 to ${langArray.Size}
        /if ( ${Bool[${langArray[${langNum}]}]} ) {
            /if ( ${langArray[${langNum}].Equal[Human Tongue]} ) {
                /if ( ${Me.LanguageSkill[Common Tongue]} != 100 ) {
                    /echo Learning Common/Human Tongue
                    /lang ${langNum}
                    /while ( ${Me.LanguageSkill[Common Tongue]} < 100 ) {
                        /if ( ${Me.GroupSize}<=1 ) /call endmac
                        /delay ${gsayDelay}
                        /gsay Do you understand the words that are coming out of my mouth?
                        /gsay Do you understand the words that are coming out of my mouth?
                        /gsay Do you understand the words that are coming out of my mouth?


                    }
                }
                /next langNum
            }
           
            /if ( ${langArray[${langNum}].Equal[Elder Teir'Dal]} ) {
                /echo Sorry Elder Teir'Dal is broken... skipping
                    /next langNum
                   
                    /if ( ${Me.LanguageSkill[Elder Teir'Dal]} != 100 ) {
                        /echo Learning Elder Teir'Dal/Dragon
                        /lang ${langNum}
                        /while ( ${Me.LanguageSkill[Elder Dragon]} < 100 ) {
                            /if ( ${Me.GroupSize}<=1 ) /call endmac
                            /delay ${gsayDelay}
                            /gsay Do you understand the words that are coming out of my mouth?
                            /gsay Do you understand the words that are coming out of my mouth?
                            /gsay Do you understand the words that are coming out of my mouth?
   
                        }
                    }
                    /next langNum
                }
               
            /if ( ${Me.LanguageSkill[${langArray[${langNum}]}]} != 100 ) {
                        /echo Learning ${langArray[${langNum}]}
                        /lang ${langNum}
                        /while ( ${Me.LanguageSkill[${langArray[${langNum}]}]} < 100 ) {
                            /if ( ${Me.GroupSize}<=1 ) /call endmac
                            /delay ${gsayDelay}
                            /gsay Do you understand the words that are coming out of my mouth?
                            /gsay Do you understand the words that are coming out of my mouth?
                            /gsay Do you understand the words that are coming out of my mouth?
                        }
                    }
        }
    /next langNum
/echo Language all 100
/end


sub endmac
    /echo [${Macro.Name}] You need a group! You have none! Goodbye!
/end


sub event_langHelp(Line, int num, string name)
    /varset langArray[${num}] ${name}
/return
Server Type
Live, Emu, TLP, Test Server
Author
LamahHerder
Downloads
46
First release
Last update
Rating
0.00 star(s) 0 ratings
Top