China DOS Union

Everyone's code is very wonderful. Compared with my sort scheme, it is much more sophisticated. I will give you all points!

The plan I made is here

Redtek's use of shift shifting and the sequential display feature of set .

Increase the display of the most frequent occurrence ^_^

@echo off

setlocal EnableDelayedExpansion

set str=adadfdfseffserfefsefseetsdg



:loop

        set str$=%str$% %str:~0,1% && set str=%str:~1%

        if not "%str%" == "" goto loop



call :start %str$%

set . 

echo The most frequent occurrence: %max%=%maxN%

pause

exit



:start

        if == ( goto :eof ) else ( set /a  .%1+=1 )

if !.%1! GTR !maxN! set maxN=!.%1!&&set max=.%1

        shift

        goto :start

Bug fixed

[ Last edited by zxcv on 2006-11-29 at 08:27 PM ]

Brother namejm on floor 17's plan "Make a batch script for content statistics in text" is being appreciated. The code inside is really interesting and wonderful ~~ : ) ) )

In response to Brother zxcv: The reason the code on my floor 15 didn't include the part for the most frequent occurrence is because I didn't know how to do it (whispering ~)

Really wonderful ~~ Learned from Brothers namejm and zxcv ~ : ) ) )

I'm learning on the fly
All are good examples of learning good role models

Great, everyone keep it up^_^

if !.%1! GTR !maxN! set maxN=!.%1! && set max=.%1
if %%j GTR !l! set l=%%j & set m=%%i

The sentence from user namejm and zxcv is interesting~~

Find the largest number. If the value obtained is greater than the "variable storing the maximum value", it means the obtained number is larger, so it should replace the original value in the "variable storing the maximum value". After all the data has been "gone through", the value in the "variable storing the maximum value" will naturally be the largest value~:)

Appreciate and strongly support!!!
Learned a lot more, and communication has sparked many inspirations~

The latter ones are getting more and more exciting. Everyone gains a lot from such exchanges, learns quickly and it's also interesting.
It is suggested that everyone find more such problems in the future. The requirements should not be too difficult, focusing on participation.
Let's discuss whether we can add some honorary awards in each session in the future, such as:
Shortest code
Fastest speed
Strongest stability
Best creativity
And another type that no one can understand but can complete the function.
Give full play to everyone's divergent thinking from these perspectives. However, how to name such things...

There is another kind that no one can understand clearly but can complete the function. Hehe, this non-willing to be helpless moderator, you did magic.

Then the moderator's name is "Unprecedented"~ Isn't this name great?

The results with the most occurrences of MS are not quite right. Where is the problem?

Also post an immature piece of code to count the number of occurrences of each character:

Idea: First use the "function" test to get the length of variable str and save it as OSlen; then get the first character of variable str and save it as str0, then replace all str0 in variable str with empty, then get the length of str and save it as %num%, then the first character that appears is: %str0%, and the length is: %OSlen%-%num%, and so on.....

@echo off

setlocal EnableDelayedExpansion

set str=adadfdfseffserfefsefseetsdg

call :test %str%



for /l %%i in (0 1 100) do (

   set /a OSlen=!num!  

   set str%%i=!str:~0,1!

   call :test1 !str! !str%%i! %%i)



:exit

    pause>nul

    exit 



:test

    set /a num=0

    set var=%1

    for /l %%i in (1 1 100) do (

       set var_=!var:~%%i,1!

       if "!var_!"=="" set /a num=%%i &&goto :eof)

    goto :eof



:test1 

    set var=%1

    set var_=%2

    set num_=%3

    set str=!var:%var_%=!

    if "%str%"=="" goto :exit

    call :test %str%



    set /a len%num_%=!OSlen!-!num!

    echo Character %2 appears !len%num_%! times

[ Last edited by youxi01 on 2006-11-30 at 06:47 AM ]

I also post one using for /l!

@echo off&setlocal enabledelayedexpansion

set  str=adadfdfseffserfefsefseetsdgdsfjkljdsklfjdsfdsgdsafdsaf



for /l %%i in (0,1,100) do (

if "!str:~%%i,1!"=="" goto end

call :define !str:~%%i,1!

set/a !str:~%%i,1!+=1

)



:end

for /l %%x in (1,1,%num%) do (

call set exchang=%%!%%x!%%

call echo !%%x!--%%!%%x!%%个 

if  !exchang! gtr !max! call set max=%%!%%x!%%&set maxstr=!%%x!)

echo.&echo.出现次数最多的是%maxstr%=%max%次

pause>nul&goto :eof



:define

if not defined %1 set/a num+=1&&set !num!=%1

Appreciate the code on floors 15 and 18, learned it! Made a little change to the above code, but the essence remains!

@echo off

setlocal EnableDelayedExpansion

set str=adadfdfseffserfefsefseetsdg



for /l %%i in (0 1 100) do (

   if "!str:~%%i,1!"=="" goto :exit

   set /a .!str:~%%i,1!+=1)

:exit

    set.

    for /f "delims== tokens=1,2" %%i in ('set.') do (

        if %%j GTR !maxl! set /a maxl=%%j && set max=%%i)

    echo The most frequent is %max:.=% character, total %maxl% times

pause