彩色标题随意变动

.DLL命令 SetBkMode, 整数型, "gdi32", "SetBkMode", , , SetBkMode，Long，前一个背景模式的值
.参数 设备场景句柄, 整数型, , hdc，设备场景的句柄
.参数 方式, 整数型, , nBkMode，下述常数之一：OPAQUE用当前的背景色填充虚线画笔、阴影刷子以及字符的空隙TRANSPARENT透明处理，即不作上述填充

.判断循环首 (Leng ＞ i)
.如果 (随机渐变)
Ra ＝ A ＋ (B － A) ÷ Leng × 1
Rb ＝ B ＋ (A － B) ÷ Leng × 2
SetTextColor (Dc, 取颜色值 (Ra ＋ i × 1.5, Rb, 0)) ' 这个渐变算法好像不行
.否则
SetTextColor (Dc, 取颜色值 (取随机数 (0, 255), 取随机数 (0, 255), i))
.如果结束
i ＝ i ＋ 1
.如果 (字体抖动)
R ＝ 取随机数 (-2, 2)
.如果真 (i ≤ 1)
SetWindowTextA (取窗口句柄 (), “”) ' 用来刷新显示。。另类的方法
.如果真结束

.否则
R ＝ 0
.如果结束
Tx ＝ 取字节集中间 (文字字节, i, 1)
.如果真 (Tx [1] ≥ 129)
Tx ＝ 取字节集中间 (文字字节, i, 2)
i ＝ i ＋ 1
y ＝ y ＋ 0.5
.如果真结束
TextOutA (Dc, 15 ＋ (i － y) × 10, 6 － R, 到文本 (Tx), 取字节集长度 (Tx)) ' 字体位置关系也需要改进，控制上下位置，还可以让字体抖动哦~~~~
.判断循环尾 ()
ReleaseDC (取窗口句柄 (), Dc)