I do have a method that works fairly well, but for completeness sake would like the option to always display health bar for the same reference as the vanilla health bar.
Scn IsFlyingTestScrFloat FlyingBegin ScriptEffectStart Set Flying to IsFlying Message "Flying is %.1f.", FlyingEnd
Scn aaGetPathData;==============================;| Local Variables |;==============================short isNumeric array_var arSetAstring_var subStringstring_var char;==============================;| Arguments |;==============================string_var pathArgBegin _Function {pathArg} setFunctionValue -1 if eval (pathArg == "") return endif forEach (arSetA <- (sv_split pathArg "\")) let subString := arsetA["value"] let isNumeric := 1 forEach (char <- subString) if eval !(IsDigit (CharToASCII char)) let isNumeric := 0 break endif loop if (isNumeric) setFunctionValue sv_ToNumeric subString break endif loopEnd
SCN aaaAdvancedMagecraftSCRBegin MenuMode if ( MenuMode 1002 || MenuMode 1022 ) if ( IsKeyPressed2 aaaMenuHotkey ) ; It was failing here, when it did.. if ( IsHotKeyPressed == 0 ) ; It never got here, I was spamming PrintC's at each point.. Set IsHotKeyPressed to 1 Call menuMenuController endif endif endifEnd
SCN aaaAdvancedMagecraftSCRBegin MenuMode if ( MenuMode 1002 || MenuMode 1022 ) if ( IsKeyPressed2 aaaMenuHotkey ) if ( IsHotKeyPressed == 0 ) Set IsHotKeyPressed to 1 Call menuMenuController endif endif endifEnd
SCN aaaAdvancedMagecraftSCRBegin MenuMode if ( MenuMode 1002 || MenuMode 1022 ) if ( IsKeyPressed2 aaaMenuHotkey && IsHotKeyPressed != aaaMenuHotkey ) Set IsHotKeyPressed to aaaMenuHotkey Call menuMenuController ... elseif ( IsKeyPressed2 aaaOtherHotkey && IsHotKeyPressed != aaaOtherHotkey ) ... Set IsHotKeyPressed to aaaOtherHotkey ... etc... elseif ( IsKeyPressed2 IsHotKeyPressed == 0 ) Set IsHotKeyPressed to 0 endif endifEnd
SCN aaaAdvancedMagecraftSCRBegin MenuMode if ( MenuMode 1002 || MenuMode 1022 ) if ( IsKeyPressed2 aaaMenuHotkey && IsHotKeyPressed != aaaMenuHotkey ) Set IsHotKeyPressed to aaaMenuHotkey Call menuMenuController ... elseif ( IsKeyPressed2 aaaOtherHotkey && IsHotKeyPressed != aaaOtherHotkey ) ... Set IsHotKeyPressed to aaaOtherHotkey ... etc... else Set IsHotKeyPressed to 0 endif endifEnd
Set Item to ( GetActiveMenuSelection ) ; IsSpell - Open Spell Menu if ( GetMagicItemType Item == 1 ) CloseAllMenus Set aaaMenuQST.Item to Item Let aaaMenuQST.MenuFunction := menuSpell Set aaaMenuQST.GenericMenu to 1 Return endif ; Learn Spell if ( IsScroll Item ) CloseAllMenus Set aaaMenuQST.Item to Item Let aaaMenuQST.MenuFunction := menuLearnSpell Set aaaMenuQST.GenericMenu to 1 Return endif ; Disensoul if ( IsSoulgem Item ) CloseAllMenus Set aaaMenuQST.Item to Item Let aaaMenuQST.MenuFunction := guiDisensoul Set aaaMenuQST.GenericMenu to 1 Return endif ; Enchanting if ( IsClothing Item || IsWeapon Item || IsArmor Item || IsAmmo Item ) CloseAllMenus Set aaaMenuQST.Item to Item Let aaaMenuQST.MenuFunction := menuEnchanting Set aaaMenuQST.GenericMenu to 1 Return endif ; Misc. Items if (GetObjectType Item == 70) ; Basically a catch all for any remaining valid inventory objects.. CloseAllMenus Set aaaMenuQST.Item to Item Let aaaMenuQST.MenuFunction := guiItems Set aaaMenuQST.GenericMenu to 1 endif ; Must Be Invalid (Debugging) MessageEx "Invalid Selection: %z" Item Call aaaReleaseHotkey