terse

手机码，太累，
下午手机上码错字，唉

@echo off&setlocal enabledelayedexpansion
set/a "_I=1,_IV=4,_V=5,_IX=9,_X=10,_XL=40,_L=50,_XC=90,_C=100,_CD=400,_D=500,_CM=900,_M=1000"
set "romstr=M,CM,D,CD,C,XC,L,XL,X,IX,V,IV,I"
set num=123
set "result="
for %%i in (%romstr%) do (
       for /l %%j in (1,1,3) do if !num! geq !_%%i! (
             set result=!result!%%i
             set /a num-=_%%i
       )
)
echo;!result!
pause 
 
复制代码