批处理之家 - Powered by Discuz! Board

@echo off
:a
set /a r=%random% * %random% * %random% * %random% * %random%
REM 容我强行加一位
echo %r%%random:~1,1% >>11144.txt
REM 从1个字符截取是为了避免截到负号
REM 各位，要学会变通……
pause
goto a

复制代码

@echo off
REM 支持天文数字，不限长度，小数也行，已分装为函数，直接呼。
call :MULTIPLICATION %random%×%random%×%random%×%random%×%random%×%random%×%random%×%random%
pause&exit /b
def MULTIPLICATION():
{
:MULTIPLICATION <表达式>
set "expression=%1"
if "!CHECK_ENABLE_DELAYED_EXPANSION!"=="%CHECK_ENABLE_DELAYED_EXPANSION%" (SETLOCAL) else (SETLOCAL ENABLEDELAYEDEXPANSION)
set RESULT=1&set "expression=%expression:×= %"
for %%a in (!expression!) do (
CALL :CALCULATE !RESULT! %%a RESULT
)
echo 计算%1
echo =!RESULT!
ENDLOCAL
GOTO :EOF
}
def CALCULATE():
{
:CALCULATE <被乘数> <乘数> [积]
for /f "tokens=1,2 delims=." %%a in ("%1") do (
set A1=%%a&set A=!A1!%%b
if "%%b"=="" (set PA=0) else (
set A2=%%b
for %%i in (512 256 128 64 32 16 8 4 2 1) do (
if not "!A2:~%%i!"=="" (
set/a PA+=%%i
set "A2=!A2:~%%i!"
)
)
if "!A2:~1!"=="" (set/a PA+=1)
)
)
for /f "tokens=1,2 delims=." %%a in ("%2") do (
set B1=%%a&set B=!B1!%%b
if "%%b"=="" (set PB=0) else (
set B2=%%b
for %%i in (512 256 128 64 32 16 8 4 2 1) do (
if not "!B2:~%%i!"=="" (
set/a PB+=%%i
set "B2=!B2:~%%i!"
)
)
if "!B2:~1!"=="" (set/a PB+=1)
)
)
CALL :CUTNUM !A! A NA
CALL :CUTNUM !B! B NB
set/a "N=NA+NB,PO=PA+PB"
for /l %%i in (1 1 !N!) do (
for /l %%j in (1 1 %%i) do (
set/a j=%%i-%%j+1
if defined A[%%j] (
if defined B[!j!] (
set/a sum=A[%%j]*B[!j!]+sum
)
)
)
set/a s=sum+1000
set sum=!sum:~0,-3!
set pul=!s:~-3!!pul!
)
if !PO! equ 0 (
for /l %%i in (1 1 10) do (
if "!pul:~0,1!"=="0" (
set pul=!pul:~1!
)
)
set "%3=!pul!"
) else (
set pre=!pul:~0,-%PO%!
for /l %%i in (1 1 20) do (
if "!pre:~0,1!"=="0" (
set pre=!pre:~1!
)
)
if not defined pre (set pre=0)
set "%3=!pre!.!pul:~-%PO%!
)
for /l %%i in (1 1 !N!) do (set "A[%%i]="&set "B[%%i]=")&set "pul="&set/a "PA=0,PB=0,PO=0"
GOTO :EOF
}
def CUTNUM():
{
:CUTNUM <待切分数> <数据类型> [切分组数]
set num=%1
if "!num:~-3!"=="!num:~-4!" (
set %2[1]=!num!
set %3=1
GOTO :EOF
)
for /l %%i in (1 1 365) do (
if "!num:~0,-3!"=="" (
set/a %2[%%i]=!num!
set %3=%%i
GOTO :EOF
)
set/a %2[%%i]=1!num:~-3!-1000
set num=!num:~0,-3%!
)
GOTO :EOF
}

复制代码

@echo off
setlocal enabledelayedexpansion
set /a buff=!random! %% 9 + 1 % [0-8] + 1 = [1-9] %
:next
for /l %%n in (0, 1, 500) do (
set /a x = !random! %% 10
set buff=!buff!!x!
)
echo !buff!
pause

复制代码

6570654070787720878720551520564154192193998902816086851452904732144780019389263586200609358950653640540242619622445932113675385232481440504623438397918374865436219267994386113298474419239439794012785659476174471571184545283730436865172796040135857465692690349178886482910237798021062959227243531344335976742355958334085783138354920855791983156491921655256801724083502037195999929886805102634476523685138718787280756603121554463142218441609413865654588056453274851408646034723618642147238107631842622898486346171400150238671844174223073868457046510677266833404164811528579151643300970194091506732646044721607114716237540238801066582316649602672155254967183641433828056846278706541918373354154436176687977337735914005638636289108728698662122250591192922873781132225809848909413217220497160987044321784755320503274415361064670506417109951777951111222172519465289853842156244986675282553667712469331648097063332329565699197760802460358860025507620311020220375535980742552681579267194201416296545361511061033132229425171804964956380912712880574289735155144987723538398876144643927011649368142860065206521080951410072310214738309933612629906040078995025943272985808367334126922713215030652270598089341655506525222164344623935615392900058431139684378733615416478425753085595906840603138655022293127711120382746730690034510817569126730222137879089915298096309542733178135333077497018928045033547214042951368905321303592357833425188129671106155648871469783589600635174576624144458652817686240363957276244093752533464020365754548948420976444946604540175389216850782016068141037517048275123108961231801061978236160159228954552297405638676471933384836504559844440037410300897730022226147134973911727130329398768902980084552959102675380922208804027740089273783909892148517075212312418936672315583206961836240840316707884746185230824901571077580429915363921908399664423038409552678182074047251837934431229524884831526295561413456446090584763221352938800162276291133256596855293786760318047286985255023989473547984833233983847923284802966866615029445113644516904917437498339533255046158352210438740752816485287044761486020089710916914364880674052199399944726075926756527896401239290707751491403269125102676498250998653950339055726816815543599198937750511414638552301909027944202412006034095597617684748593287812436742059507897666453594078617539361558330256811293655231032884373394020796110460686759887544451489198543637905084417218972162634595849594735499809032486317876298197512736428865595083479318380428132555974235750700995868919301811548996389255422572491392411029031919368516749639067403787804140114493033241464440416908322826690134919544855973555454479363684842166668835481089303763926715238636213111847338785631434983733273287033108797922615410378872371093734018706431177369046326975094468398206600124277449500926660577898185221616859684407486607688293000845316931162576906655833574231088247220174180269825643345895755355207563726454910084726104989494069745970446418113894219237308095772713693606694151473862606476709776050919276488111503171713251592941099452704901336316937605532384019345021361660866510969192901848286725146923982047084415449289941729895804237659249518421712691601744679459699712032614477800731219435605630291222428194388970019570850732383703317595584405024826984696527809044569140378668861071847112272444353673443595983291457834951799380387142068436770244777615309592446701075737658862523191871139760628985934709775481219649105130448395008117608530069493405458142708761913084015810569294748906127257923934762649921528686079586470396045723165991151884357449499690803061666975368843622668346316675214260936419073750673463209453387235840969557671237671575740149287124941624997065577276535728828540852790781839184687141687652921555756677051598684133169994715349486609526243742078412167948583780209586067438645436124072370918907914180255956090688606304224800344457105889192034079495903558278080713078328028683824078785164529728489228999243775051909585454654058876982818565169896337773792115199360311975637841567803141270252981798731706571145913180437051635174484196680372083141287456597230843521460592386052182277226088138923497167420411738045252549477679164055444846285315822186041862096416127137747921019637609214262733507281036927342612682915903852872556994459864928630294331515754530482054074332587164538024974183845656215480189843865260028849531882650759970878466152227510847597021210198227189378167026493955814065955559480093814615163112552528333852176816572363270656029383558391983362227620657397951255981190144631730577214371523663865679531782903619606485923483366809279826766883477856566857925092450034074555310029265382724922893924572726115776317349129700622337100834531466872102734389270354473881271217470058618325704951215911337174369738309136954379865236856504756023071294796891014330996133589430536818023525447241199761480334846833155610118346787459816213222603563513582436630623639114535902335149105131946324923327289540482724725859181390543172967743363076358915275378677125782984