会批处理的帮我下，谢谢！

有个文本叫mail1.txt 内容如下：

abacus1973@aol.com

hugeheals 1500 196.03 0203
aim:aimnick533@aol.com
alirah.dianova@gmail.com
angel@igngamespy.com
ben_albolote@yahoo.com
bens79@gmail.com
bertandmargie@bigpond.com
bigjruiZ@HOTMAIL.COM

我想把他变成如下的一个文本mail2.txt

abacus1973@aol.com;aimnick533@aol.com;alirah.dianova@gmail.com;angel@igngamespy.com;ben_albolote@yahoo.com;bens79@gmail.com;bertandmargie@bigpond.com;bigjruiZ@HOTMAIL.COM

注意哦aim:aimnick533@aol.com 中有个“：”我只要后面的那部分的。。。

@echo off
more +13 "%~0">mail1.txt
echo.>mail2.txt
setlocal enabledelayedexpansion
for /f "tokens=1,2* delims=:" %%i in (mail1.txt) do (
set ok=%%j
if not DEFINED ok set ok=%%i
set sum=!sum!!ok!;
)
echo %sum%>>mail2.txt
pause>nul
goto :eof
mail1.txt的内容
abacus1973@aol.com
aim:aimnick533@aol.com
alirah.dianova@gmail.com
angel@igngamespy.com
ben_albolote@yahoo.com
bens79@gmail.com
bertandmargie@bigpond.com
bigjruiZ@HOTMAIL.COM