Potenz rechner(brauche verkürzung des scripts)

Msgbox(0,"Potenzsrechnung", "Dies ist ein Potenz-Rechner @ Made by Dennis Graß @ Germany")
$a = InputBox("Standart-Zahl hier eintragen!","Standart-Zahl hier eintragen!")
$zahl = InputBox("Hoch-Zahl hier eintragen!", "Hoch-Zahl hier eintragen!")

;Terminates script if no command-line arguments
If $zahl = 1 Then
MsgBox(0, "ergebnis:" , $a)
;Alternative:
elseIf $zahl = 2 Then
MsgBox(0, "ergebnis:" , $a * $a)
Endif
If $zahl = 3 Then
MsgBox(0, "ergebnis:" , $a * $a * $a)
;Alternative:
elseIf $zahl = 4 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a)
Endif
If $zahl = 5 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a)
;Alternative:
elseIf $zahl = 6 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a)
Endif
If $zahl = 7 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a)
;Alternative:
elseIf $zahl = 8 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a)
Endif
If $zahl = 9 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a)
;Alternative:
elseIf $zahl = 10 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
Endif
If $zahl = 11 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
;Alternative:
elseIf $zahl = 12 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
Endif
If $zahl = 13 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
;Alternative:
elseIf $zahl = 14 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
Endif
If $zahl = 15 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
;Alternative:
elseIf $zahl = 16 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
EndIf
If $zahl = 17 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
;Alternative:
elseIf $zahl = 18 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
EndIf
If $zahl = 19 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
;Alternative:
elseIf $zahl = 20 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
EndIf
If $zahl = 21 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
;Alternative:
elseIf $zahl = 22 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
EndIf
If $zahl = 23 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
;Alternative:
elseIf $zahl = 24 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
EndIf
If $zahl = 25 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
;Alternative:
elseIf $zahl = 26 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
EndIf
If $zahl = 27 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
;Alternative:
elseIf $zahl = 28 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
EndIf
If $zahl = 29 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
;Alternative:
elseIf $zahl = 30 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
EndIf
If $zahl = 31 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
;Alternative:
elseIf $zahl = 32 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
EndIf
If $zahl = 33 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
;Alternative:
elseIf $zahl = 34 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
EndIf
If $zahl = 35 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
;Alternative:
elseIf $zahl = 36 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
EndIf
If $zahl = 37 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
;Alternative:
elseIf $zahl = 38 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
EndIf
If $zahl = 39 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
;Alternative:
elseIf $zahl = 40 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
EndIf
If $zahl = 41 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
;Alternative:
elseIf $zahl = 42 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
EndIf
If $zahl = 43 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
;Alternative:
elseIf $zahl = 44 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
EndIf
If $zahl = 45 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
;Alternative:
elseIf $zahl = 46 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
EndIf
If $zahl = 47 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
;Alternative:
elseIf $zahl = 48 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
EndIf
If $zahl = 49 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
;Alternative:
elseIf $zahl = 50 Then
MsgBox(0, "ergebnis:" , $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a * $a)
EndIf