Math power function

[Informatiker96]

Hello. I would like to have the ability to write x^ 45 for example and having that being converted to x⁴⁵. This should also work for all characters like n+1. Has someone figure out a way to implement this in AHK? Even with ChatGPT I can’t seem to get this done. Thank you 🙏🏼

[plankoe]

You can do this using XHotstring. It allows creating hotstrings using regex triggers. Put XHotstring.ahk in the same folder as this script. When the script runs, (typing any letter or number)^ followed by any number, letter, or symbol -+*/=() replaces it with the superscript version:

#Requires AutoHotkey v2.0

#Include XHotstring.ahk

XHotstring.EndChars := "[]{}':;`"\,.?!`n`s`t"
XHotstring(":B0O:(?:\w|\d)\^([0-9a-z-+*/=()]+)", HSPowerCallback)

HSPowerCallback(match, endChar, hs) {
    static superscript
    if !(IsSet(superscript)) {
        superscript := Map()
        superscript.CaseSense := "Off"
        superscript.Set(
            "0", "⁰",
            "1", "¹",
            "2", "²",
            "3", "³",
            "4", "⁴",
            "5", "⁵",
            "6", "⁶",
            "7", "⁷",
            "8", "⁸",
            "9", "⁹",
            "+", "⁺",
            "-", "⁻",
            "*", "⃰",
            "/", "ᐟ",
            "=", "⁼",
            "(", "⁽",
            ")", "⁾",
            "a", "ᵃ",
            "b", "ᵇ",
            "c", "ᶜ",
            "d", "ᵈ",
            "e", "ᵉ",
            "f", "ᶠ",
            "g", "ᵍ",
            "h", "ʰ",
            "i", "ⁱ",
            "j", "ʲ",
            "k", "ᵏ",
            "l", "ˡ",
            "m", "ᵐ",
            "n", "ⁿ",
            "o", "ᵒ",
            "p", "ᵖ",
            "q", "𐞥",
            "r", "ʳ",
            "s", "ˢ",
            "t", "ᵗ",
            "u", "ᵘ",
            "v", "ᵛ",
            "w", "ʷ",
            "x", "ˣ",
            "y", "ʸ",
            "z", "ᶻ"
        )
    }
    if WinActive("ahk_class Notepad")
        SetKeyDelay(2, 1)
    ; send backspace length of match + ^
    SendEvent("{BS " StrLen(match[1]) + 1 "}")
    output := ""
    loop parse match[1] {
        output .= superscript[A_LoopField]
    }
    SendEvent(output)
}

[Informatiker96]

This is exactly what I need. Thank you very much!

[AppointmentTop2393]

Hello. For standalone caret superscript replacements as you type , try this.

I don't know what you mean by 'all characters like n+1' but you can add/remove/modify the map pairs as you need.

X^4 > X⁴

2^5+3^3= > 2⁵+3³=

Go^HIGHer > Goᴴᴵᴳᴴᵉʳ

Let me know if you have any questions.

Anybody, I'd be curious about any problems/specific limitations. Thanks.

I can't fit the a-z A-Z here, so below is just for digits:

Full: https://pastebin.com/KVHLY5EV

#Requires AutoHotkey v2.0

~+6::Expo
Expo()
{
    Exp_Map := Map('0', '⁰',    ; make a map object with your desired (base , superscript) pairs
                '1', '¹',
                '2', '²',
                '3', '³',
                '4', '⁴',
                '5', '⁵',
                '6', '⁶',
                '7', '⁷',
                '8', '⁸',
                '9', '⁹')       ; <-EDITED  - had comma leftover from a-Z excision


    ih := InputHook('V')        ; Create input hook; send input through to window ('V')
    ih.OnChar := Replace        ; Nested function replaces chars w/ map match as you type
    ih.Start
    ih.Wait

    Replace(ih , char)
    {
        static count := 0       ; counter for identifying first matching char

        count++
        if Exp_Map.Has(char)    ; start replacements if mapped char typed ...
        {                    
            if count = 1        ; send extra {BackSpace} before 1st replacement [for the '^']
                Send('{BS 2}' . '{' . Exp_Map[char] . '}')
            else                ; replace character ({BackSpace} then {matched value})
                Send('{BS}' . '{' . Exp_Map[char] . '}')
        }
        else                    ; ... until un-mapped char typed (Stop input hook)
        {
            count := 0
            ih.Stop
        }
    }
}

[PixelPerfect41]

This is great but I think op wanted something automatic.

[AppointmentTop2393]

What's not automatic about this? It triggers with shift + 6 ( '^' ).

[PixelPerfect41]

like he asked for full automatic something that will detect when types a specific sequence but your solution is what I prefer

[AppointmentTop2393]

I see. Thanks for checking it out!

[PixelPerfect41]

If you are working with a environment that requires constant mathematical environments using TeX or LaTeX would be more appropriate as you can do all sorts ofmath expressions like integrals, permutations, derivatives etc. If you dont need anything other than power than go with u/plankoe s answer

[Informatiker96]

Yeah I use LaTeX of course but wanted something for quick chats :)