1 (изменено: Rumata, 2012-10-27 22:22:52)

Тема: JScript: Перевод чисел в/из разных систем счисления

Написано по следам скриптового аналога утилиты hex2dec коллеги greg zakharov. Предложенное решение - на чистом JScript, внедренном в пакетный файл. Перевод чисел из одной системы счисления в другую. Поддерживаются основания от 2 до 36; значение по умолчанию - 10. Возможно чтение данных как из командной строки, так и из конвейера.

Примеры использования:

C:\> radix 15 /o:16
f

C:\> radix f /i:16
15

C:\> radix 0xf /i:16
15

C:\> echo 0xf | radix /i:16
15

Текст программы radix.bat:


@set @x=0/*!&&@set @x=
@ %windir%\System32\cscript.exe //nologo //e:javascript "%~dpnx0" %*
@goto :eof */

//
// radix
// Converts numbers between different numerical systems
//
// Copyright (c) 2012, Ildar Shaimordanov
//

var cArgs = WScript.Arguments;
var nArgs = WScript.Arguments.Named;
var uArgs = WScript.Arguments.Unnamed;

if ( cArgs.length == 0 || nArgs.Exists('H') || nArgs.Exists('HELP') ) {
	WScript.Echo([
		WScript.ScriptName + ' numbers [/I:radix] [/O:radix]', 
		'', 
		'/I   Input radix', 
		'/O   Output radix', 
		'', 
		'Converts numbers between different numerical systems.', 
		'A radix can be one of 2 to 36. The default value is 10.'
	].join('\n'));
	WScript.Quit();
}

function parseRadix(value)
{
	value = nArgs.item(value) || 10;
	if ( isNaN(value) || value < 2 || value > 36 ) {
		throw new Error('Illegal radix: "' + value + '".');
	}
	return value;
};

var iBase = parseRadix('I');
var oBase = parseRadix('O');

var values = uArgs;
if ( values.length == 0 ) {
	values = [];
	while ( ! WScript.StdIn.AtEndOfStream ) {
		values.push(WScript.StdIn.ReadLine());
	}
	values.item = function(i)
	{
		return this[i];
	};
}

for (var r, i = 0; i < values.length; i++) {
	r = values.item(i);
	r = parseInt(r, iBase);
	r = Number(r).toString(oBase);
	WScript.StdOut.WriteLine(r);
}
( 2 * b ) || ! ( 2 * b )

2 (изменено: smaharbA, 2012-10-30 18:21:38)

Re: JScript: Перевод чисел в/из разных систем счисления

mshta "javascript:(123456).toString(36)"

cmd /c "mshta "javascript:(new ActiveXObject('Scripting.FileSystemObject')).GetStandardStream(1).Write((123456).toString(36));window.close();" | more"

Я конечно далек от мысли... (с)