brauch Hilfe beim Code kürzen

Hallo zusammen,
ich habe mir ein kleines Script gebastelt. Innerhalb einer Form möchte ich immer wiederkehrenden Code mit eine Schleife oder so was sparen. Leider haben meine Versuche keinen Erfolg gehabt. Könnt Ihr mir helfen ?
muchas gracias

[autoit][/autoit][autoit][/autoit][autoit]

While 1
$nMsg = GUIGetMsg()
If $nMsg = $GUI_EVENT_CLOSE or $nMsg = $exititem Then
Call ("_exit")
EndIf
If $nMsg = $bStart Then
if $pause = False Then
$oWMP.controls.stop()
$pause = True
Else
$oWMP.controls.play()
$pause = False
EndIf
EndIf
if $nMsg =$bhome Then
Call ("_homepage")
EndIf
If $nMsg = $sender0 Then
Global $nbrx=0
Call ("_send")
EndIf
.
.
.
If $nMsg = $sender9 Then
Global $nbrx=9
Call ("_send")
EndIf
If $nMsg = $infoitem Then
Call ("_hilfe")
EndIf

[/autoit]

Jup funzt fast alles jetzt greift der Slider irgendwie ins Leere er bewegt sich zwar aber der Lautstärke verändert sich nicht.
Aber was meinst Du mit krude Methode "dass die Control-IDs fortlaufend nummeriert werden" ?
Ach ja dann müßt Ihr noch mir einen Tip geben, wie schliesse ich diesen Beitrag ?

[autoit]

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE, $exititem
_exit()

[/autoit][autoit][/autoit][autoit][/autoit][autoit]

Case $bStart
if $pause=False Then
$oWMP.controls.play()
$pause =True
Else
$oWMP.controls.stop()
EndIf

[/autoit][autoit][/autoit][autoit][/autoit][autoit]

Case $bhome
_homepage()

[/autoit][autoit][/autoit][autoit][/autoit][autoit]

Case $sender0 To $sender9
$nbrx = $nMsg - $sender0
_send()
Case $infoitem
_hilfe()

[/autoit][autoit][/autoit][autoit][/autoit][autoit]

Case $slider
$oWMP.settings.volume = GUICtrlRead($slider)

[/autoit][autoit][/autoit][autoit][/autoit][autoit]

Case $iniview
_iniview()
;GUISetState (@SW_HIDE,$form1)
EndSwitch

[/autoit]

Vielen Dank