vbs代码雨怎么弄

vbs代码雨怎么弄

问题补充说明：有大佬帮我一下吗？

或许可以360问答试一下bat

这是b际at代码

@echooff

titledigitalrain

colora

s构烈规歌员境置免跟etlocalENABLEDELAYEDEXPANSION

for/l%%iin(0)do(

set"line="

for/l%%jin(1,1,80)do(

set/aDown%%j-=2

set"x=!Down%%j!"

if!x!LSS0(

s年妒措正留et/aArrow%%j=!random!%%3

set/aDown%%j庆而有守将=!random!%%15+10

)

set"x=!Arrow%%j!"

if"!x!"=="2"(

set"line=!line!!random:~-1!"

)else(set"line=!line!")

)

set/p=!line举杆夫鱼般益哥怕每仅!<nul

)