$start_uhr=InputBox("Startzeit eingeben", "Bitte geben Sie den Beginn ein" & @CR & "(z.B. 08 oder 15)")
$start_min=InputBox("Startzeit eingeben", "Bitte geben Sie die Beginn-Minute ein" & @CR & "(z.B. 02 oder 56)")
$end_uhr=InputBox("Endzeit eingeben", "Bitte geben Sie die End-Stunde ein")
$end_min=InputBox("Endzeit eingeben", "Bitte geben Sie die End-Minute ein")

#comments-start
If ($start_uhr < 10) Then
	$start_uhr = 0 & $start_uhr ;Falls die Stunden kleiner als "10" sind, vorne mit einer "0" auffüllen
EndIf

If ($start_min < 10) Then
	$start_min = 0 & $start_min ;Falls die Stunden kleiner als "10" sind, vorne mit einer "0" auffüllen
EndIf
#comments-end

If ($start_uhr <= $end_uhr) Then
	$dauer_uhr = $end_uhr - $start_uhr
ElseIf ($start_uhr > $end_uhr) Then
	$dauer_uhr = (24 - $start_uhr) + $end_uhr
EndIf

If ($start_min > $end_min) Then
	$dauer_min = 60 - ($start_min - $end_min)
	$dauer_uhr = $dauer_uhr - 1
Else
	$dauer_min = $end_min - $start_min
EndIf

If ($dauer_min < 10) Then
	$dauer_min = 0 & $dauer_min ;Falls die Minuten kleiner als "10" sind, vorne mit einer "0" auffüllen
EndIf

If ($dauer_uhr < 10) Then
	$dauer_uhr = 0 & $dauer_uhr ;Falls die Stunden kleiner als "10" sind, vorne mit einer "0" auffüllen
EndIf

MsgBox(0,"Ergebnis", "Beginn: " & $start_uhr & ":" & $start_min & @CR & "Ende: " & $end_uhr & ":" & $end_min & @CR & "Dauer: " & $dauer_uhr & ":" & $dauer_min)