多种代码生成炫酷代码雨（推荐）_bat代码激光雨

作者：知新_RL | 2024-02-15 14:51:47

踩

bat代码激光雨

本人详解
作者：王文峰，参加过 CSDN 2020年度博客之星，《Java王大师王天师》
公众号：JAVA开发王大师，专注于天道酬勤的 Java 开发问题
中国国学、传统文化和代码爱好者的程序人生，期待你的关注和支持！本人外号：神秘小峯山峯
转载说明：务必注明来源（注明：作者：王文峰哦）

本人主页

多种代码生成代码雨

文章目录

多种代码生成代码雨

一、html代码雨

效果图：

王文峰

代码块

<!DOCTYPE html>
<html lang="en">
<head>
    <meta charset="UTF-8">
    <title>Code</title>
    <style>
        body{
            margin: 0;
            overflow: hidden;
        }
    </style>
</head>

<body>
<canvas id="myCanvas"></canvas>
<script>
    const width = document.getElementById("myCanvas").width = screen.availWidth;
    const height = document.getElementById("myCanvas").height = screen.availHeight;
    const ctx = document.getElementById("myCanvas").getContext("2d");
    const arr = Array(Math.ceil(width / 10)).fill(0);
    const str = "ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789".split("");

function rain() {
    ctx.fillStyle = "rgba(0,0,0,0.05)";
    ctx.fillRect(0, 0, width, height);
    ctx.fillStyle = "#0f0";
    arr.forEach(function (value, index) {
        ctx.fillText(str[Math.floor(Math.random() * str.length)], index * 10, value + 10);
        arr[index] = value >= height || value > 8888 * Math.random() ? 0 : value + 10;
    });
}

setInterval(rain, 30);
</script>
</body>
</html>
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36

二、vb代码雨

效果图：

王文峰

代码块

@echo off&mode con cols=42 lines=20&color 02
setlocal enabledelayedexpansion
set code=123456789abcdef
set m=1&set v=1
title 神秘小峯代码雨
:begin
set /a a=%random%%%2,b=%random%%%3
if %b% neq 0 (set b=%a%) else (set "b= ") 
set str=%str%%b%
set /a n+=1
if %n% lss 40 goto begin
set /a m+=1,x+=1
if %m% geq 20 set /a v+=1 
set str%m%=%str%
cls&for /l %%i in (%m%,-1,%v%) do echo.!str%%i!
if %x% equ 20 call :lp
set str=&set n=0
goto begin
:lp
set /a a=%random%%%15,x=0
set a=!code:~%a%,1!
color 0%a%
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22

三、bat代码雨

效果图：

王文峰

代码块

@echo off&mode con cols=42 lines=20&color 02
set m=1&set v=1
set code==^^^&%%%^:!$#^>^<:=~*()@"'`;\|-_+?,.ghijklmnopqrstuvwxyz0123456789abcdef
setlocal enabledelayedexpansion
:begin
set /a num=%random%%%40+1,num1=num,num=200/num
title 乱雨纷飞，当前雨量：%num1%
:lp
set /a a=%random%%%63,b=%random%%%%num%
set a=!code:~%a%,1!
if %b% equ 0 (set "b=!a!") else (set "b= ") 
set str%m%=!str%m%!!b!
set /a n+=1AA
if %n% lss 40 goto lp
set /a x+=1,w+=1
if %x% equ 40 call :lop
cls&for /l %%i in (%m%,-1,%v%) do echo.!str%%i!
set /a m+=1
if %m% geq 20 set /a v+=1
if %w% equ 100 (set w=0&goto begin) else (set n=0&goto lp)
:lop
set /a a=%random%%%15+1
set a=!code:~-%a%,1!
if %w% equ 100 (set w=0&goto begin) else (set n=0&goto lp)
:lop
set /a a=%random%%%15+1
set a=!code:~-%a%,1!
color 0!a!&set x=0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28

本人详解
作者：王文峰，参加过 CSDN 2020年度博客之星，《Java王大师王天师》
公众号：JAVA开发王大师，专注于天道酬勤的 Java 开发问题
中国国学、传统文化和代码爱好者的程序人生，期待你的关注和支持！本人外号：神秘小峯山峯
转载说明：务必注明来源（注明：作者：王文峰哦）

一键三连 _一键三连一键三连~

本文内容由网友自发贡献，转载请注明出处：【wpsshop博客】