Delete from cursor to end of segment, preserve ending punctuation

Hotkey: Press Alt-D

!d:: ;delete from cursor to end of segment, preserve ending punctuation
Send ^+!{PgDn}
Sleep 100
Send +{Left}
Sleep 100
Send {Delete}
Return