Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Старожил


Сообщения: 426
Благодарности: 108

Профиль | Отправить PM | Цитировать


Цитата ZeroCrash:
Нужна последовательность: буква-цифра »
пжалста:
Код: Выделить весь код
@Echo off
SetLocal EnableDelayedExpansion
SetLocal EnableExtensions

set VL=
set HEX=ABCDEF
for /L %%n in (1,1,4) do (
set /A N=!random!
set /A "C=!N!-((!N!/6)*6)"
call set VL=!VL!%%HEX:~!C!,1%%%%N:~-1%%
if %%n==2 set VL=!VL!-
)
echo %VL%

-------
Как сказало Дерево Дровосеку: "я - пень".


Отправлено: 19:12, 13-07-2009 | #6