Sub Main
/declare i int local 0
/declare Tab string local PoPAdvance
/declare AA string local Planar Power
/declare Tabs[11,3] string local
/varset Tabs[1,1] General
/varset Tabs[1,2] AAW_GeneralPage
/varset Tabs[1,3] AAW_GeneralList
/varset Tabs[2,1] Archetype
/varset Tabs[2,2] AAW_ArchetypePage
/varset Tabs[2,3] AAW_ArchList
/varset Tabs[3,1] Class
/varset Tabs[3,2] AAW_ClassPage
/varset Tabs[3,3] AAW_ClassList
/varset Tabs[4,1] PoPAdvance
/varset Tabs[4,2] AAW_Page4
/varset Tabs[4,3] AAW_List4
/varset Tabs[5,1] PoPAbilities
/varset Tabs[5,2] AAW_Page5
/varset Tabs[5,3] AAW_List5
/varset Tabs[6,1] GoD
/varset Tabs[6,2] AAW_Page6
/varset Tabs[6,3] AAW_List6
/varset Tabs[7,1] OoW
/varset Tabs[7,2] AAW_Page7
/varset Tabs[7,3] AAW_List7
/varset Tabs[8,1] ?
/varset Tabs[8,2] AAW_Page8
/varset Tabs[8,3] AAW_List8
/varset Tabs[9,1] ?
/varset Tabs[9,2] AAW_Page9
/varset Tabs[9,3] AAW_List9
/varset Tabs[10,1] ?
/varset Tabs[10,2] AAW_Page10
/varset Tabs[10,3] AAW_List10
/varset Tabs[11,1] DoD
/varset Tabs[11,2] AAW_Page11
/varset Tabs[11,3] AAW_List11
/for i 1 to ${Tabs.Size}
/if (${Tabs[${i},1].Equal[${Tab}]}) /goto :GotTab
/next i
:GotTab
/notify AAWindow ${Tabs[${i},3]} listselect ${Window[AAWindow].Child[AAW_Subwindows].Child[${Tabs[${i},2]}].Child[${Tabs[${i},3]}].List[${AA}]}
/delay 5
/notify AAWindow ${Tabs[${i},3]} leftmouseup ${Window[AAWindow].Child[AAW_Subwindows].Child[${Tabs[${i},2]}].Child[${Tabs[${i},3]}].List[${AA}]}
/delay 5
/if (${Window[AAWindow].Child[AAW_TrainButton].Enabled}) /notify AAWindow AAW_TrainButton leftmouseup
/return