ビット一括操作デモコード

@echo off
title Bitwise example code by:cn-bathome-more
echo.
echo. Bitwise terminology explained (personal understanding):
echo.
echo.Bitwise operations: logical operations or bitwise shifts of binary numbers by the operands represented in the computer.
echo. with: all 1 is 1 (refers to the return value, the same below), otherwise it is 0.
echo.or: as long as there is 1, it is 1, otherwise it is 0.
echo.iso-or: different is 1, same is 0.
echo.Inverse: 1 is 0, 0 is 1 (monomial operator).
echo.negative: Inverse first and then add 1 (monomial operator).
echo.Shift left by n: equivalent to multiply by 2 to the nth power (with 0's complement).
echo.Shift right by n: Equivalent to dividing by 2 to the nth power (1's complement for negative numbers, 0's complement for positive numbers).
echo.
The following example is the result of running on a 32-bit system (value range: -2147483648~2147483647).
echo. Please enter the value (integer) that the batch can handle, otherwise it will not be processed correctly. If an overflow occurs, the result will not be correct either.
echo.
rem The function that converts decimal to binary.
set "fun_d2b=setlocal enabledelayedexpansion&(for /l %%a in (0 1 31) do (set /a "str=! #a#! ^>^>%%a"&set /a "str^&=1"&set "str_d2b=!str!!str_d2b!"))&(for %%a in (!str_d2b!) do ( endlocal&set #a#=%%a))"
setlocal enabledelayedexpansion
:agn
set in=&set /p in=Please enter two numbers (separated by a space):
if not defined in exit
set n=0
for %%a in (%in%) do (
   set /a n+=1
   set /a num!n!=%%a 2>nul
)
cls
echo. The valid values of the two numbers entered are: "!num1!" and "!num2!", expressed in binary as:
set /a str1=num1,str2=num2
%fun_d2b:#a#=str1%
%fun_d2b:#a#=str2%
echo.&echo.!str1! ==^> !num1!
echo.!str2! ==^> !num2!
echo.&echo. The results of the various bitwise operations are as follows:
set /a "num=!num1!&!num2!,t=num"
%fun_d2b:#a#=num%&echo.&echo.!num! ==^> by bit with: !num1! ^& !num2! = !t!
set /a "num=!num1!|!num2!,t=num"
%fun_d2b:#a#=num%&echo.&echo.!num! ==^> by bit or: !num1! ^| !num2! = !t!
set /a "num=!num1!^^^!num2!,t=num"
%fun_d2b:#a#=num%&echo.&echo.!num! ==^> by bitwise iso or: !num1! ^^^^ !num2! = !t!
set /a "num=~!num1!,t=num"
%fun_d2b:#a#=num%&echo.&echo.!num! ==^> inverse by bit: ~(!num1!) = !t!
set /a "num=-!num1!,t=num"
%fun_d2b:#a#=num%&echo.&echo.!num! ==^> take negative: -(!num1!) = !t!
set /a "ran=%random%%%5+2,num=!num1!,num<<=ran,t=num"
%fun_d2b:#a#=num%&echo.&echo.!num! ==^> left shift!ran! bit: !num1! ^<^< !ran! = !t!
set /a "ran=%random%%%5+2,num=!num1!,num>>=ran,t=num"
%fun_d2b:#a#=num%&echo.&echo.!num! ==^> right shift!ran! bit: !num1! ^>^> !ran! = !t!
echo.&goto :agn

@echo off
::Define functions
set "d-h=setlocal enabledelayedexpansion&set/a dx=#a#&set xs=0123456789abcdef&(for /l %%z in (1,1,4) do set /a x%%z=dx%%16,dx =dx/16)&(for /f "tokens=1-4" %%1 in ("!x1! !x2! !x3! !x4!") do set hx=!xs:~%4,1!!xs:~%3,1!&(if !hx!==00 set hx=)& amp;(for %%z in ("!hx!!xs:~%%2,1!!xs:~%%1,1!") do endlocal& set #a#=%%~z))"
::10 to hex function, parameter entry #a#
::To be defined before turning on variable delay
setlocal enabledelayedexpansion
for /l %%a in (1,7,1024) do (
    set abc=%%a
    
(%d-h:#a#=abc%)
rem function call

echo !abc!
)
pause

@echo off

::Define functions
set "d-h=setlocal enabledelayedexpansion&set/a dx=#a#&set xs=0123456789abcdef&(for /l %%z in (1,1,4) do set /a x%%z=dx%%16,dx =dx/16)&(for /f "tokens=1-4" %%1 in ("!x1! !x2! !x3! !x4!") do set hx=!xs:~%4,1!!xs:~%3,1!&(if !hx!==00 set hx=)& amp;(for %%z in ("!hx!!xs:~%%2,1!!xs:~%%1,1!") do endlocal& set #a#=%%~z))"
::10 decimal to hexadecimal function, call method: %d-h:#a#=variable name%

set "len=for /f "tokens=1-3" %%1 in ("#a#") do setlocal enabledelayedexpansion&(if defined %%2 (set /a z=8180,x=0& amp;(for /l %%a in (1,1,14) do set/a "y=(z-x)/2+x"&(for %%b in (!y!) do if "! %%2:~%%b,1!" equ "" (set/a z=y) else (set/a x=y)))) else (set z=0))&(for %%z in ("!z!") do endlocal&set %%1=%%~z) "
::take the string length function, call method: %len:#a#=result variable name string variable name %
setlocal enabledelayedexpansion

for /l %%a in (1,7,1024) do (
    set abc=%%a

        (%len:#a#=slen abc%)
        (%d-h:#a#=abc%)
        (%len:#a#=dlen abc%)
        rem function calls
        
        echo %%a to hex as:!abc! Number of characters before conversion:!slen! Number of characters after conversion:!dlen!
)
pause