Would you care if this was written in Batch?

@echo off
ECHO Arabic Number?
SET /p Arabic1=
SET arabic=%arabic1%

:1000
IF %Arabic% GEQ 1000 (
SET M=%M%M
SET /a Arabic=Arabic-1000
) ELSE (
GOTO 900
)
GOTO 1000

:900
IF %Arabic% GEQ 900 (
SET CM=CM
SET /a Arabic=Arabic-900
)

IF %Arabic% GEQ 500 (
SET D=D
SET /a Arabic=Arabic-500
)

IF %Arabic% GEQ 400 (
SET CD1=CD1
SET /a Arabic=Arabic-400
)

:100
IF %arabic% GEQ 100 (
SET C=%C%C
SET /a arabic=arabic-100
) ELSE (
GOTO 90
)
GOTO 100

:90
IF %arabic% GEQ 90 (
SET XC=XC
SET /a arabic=arabic-90
)

IF %arabic% GEQ 50 (
SET L=L
SET /a arabic=arabic-50
)

IF %arabic% GEQ 40 (
SET XL=XL
SET /a arabic=arabic-40
)

:10
IF %arabic% GEQ 10 (
SET x=%X%X
SET /a arabic=arabic-10
) ELSE (
GOTO 9
)
GOTO 10

:9
IF %arabic% GEQ 9 (
SET IX=IX
SET /a Arabic=arabic-9
)

IF %arabic% GEQ 5 (
SET V=V
SET /a Arabic=arabic-5
)

IF %arabic% GEQ 4 (
SET IV=IV
Set /a arabic=arabic-4
)

:1
IF %arabic% GEQ 1 (
SET I=%I%I
SET /a arabic=arabic-1
) ELSE (
GOTO END
)
GOTO 1
:end
SET r=%M%%CM%%D%%cd1%%C%%XC%%L%%XL%%X%%IX%%V%%IV%%I%
ECHO %arabic1% Is %r%

PAUSE

I only Batch if possible, 2000 more lines of code, oh well.