-
vb 分形树
Dim xs As Integer
Dim ys As Integer
Dim alph As Single
Dim lng As Single
Dim m As Integer
Const PI As Single = 3.14159265
Private Function tree(x As Integer, y As Integer, angle As Single, length As Single, n As Integer)
Dim x0 As Integer
Dim y0 As Integer
Dim alpha As Single
Dim beita As Single
Dim leng As Single
BackColor = vbWhite
If n > 0 Then
x0 = x + Cos(angle) * length
y0 = y - Sin(angle) * length
picture1.Line (x, y)-(x0, y0), vbbrake
alpha = angle - PI / 8
beita = angle + PI / 8
leng = 2 * length / 3
Call tree(x0, y0, alpha, leng, n - 1)
&nbs
- 2022-01-24 19:06:52下载
- 积分:1
-
汇编语言编写的电荷DS1302时钟,时间是一个多
汇编语言编写DS1302充电时钟,time是多字节读写,timexie是多字节写,timedu是单字节读-Compiled languages charge DS1302 clock, time is a multi-byte read and write, timexie are multi-byte write, timedu is single-byte read
- 2022-05-23 04:35:34下载
- 积分:1
-
BIOS的BIOS Rootkit Rootkit
Bios Rootkit Bios Rootkit-Bios Rootkit
- 2023-07-10 07:45:04下载
- 积分:1
-
A simple clock program, want to be helpful for beginners
一个简单的电子钟程序,希望对初学者有帮助-A simple clock program, want to be helpful for beginners
- 2022-01-23 11:08:33下载
- 积分:1
-
suspended list (2) 352K
中断列表(2) 352K-suspended list (2) 352K
- 2022-09-22 06:00:03下载
- 积分:1
-
老实说了,那些我还不知道是什么来的,希望有能力的人,可以告诉我吧
老实说了,那些我还不知道是什么来的,希望有能力的人,可以告诉我吧-Frankly speaking, and those I do not know what to hope that those who have the ability, you can tell me
- 2022-03-22 08:07:18下载
- 积分:1
-
Related to two bipolar stepper motor control program, please refer to
有关2项双极步进马达控制程序,请各位参考-Related to two bipolar stepper motor control program, please refer to
- 2022-06-19 19:28:05下载
- 积分:1
-
Temperature LM35 Source Code
Temperature LM35 Source Code
- 2022-03-06 14:57:07下载
- 积分:1
-
改进的七段显示电子钟
改进的七段显示电子钟-showed improvement in paragraph 107 of the electronic bell
- 2023-05-16 12:30:03下载
- 积分:1
-
汇编实例:判断闰年程序,产生随机数并运算的程序,计算平台长度程序,加减乘除四则运算,数字方阵程序,数据加密程序,代码转换程序,键盘录入数据的转换与显示,音乐演奏...
汇编实例:判断闰年程序,产生随机数并运算的程序,计算平台长度程序,加减乘除四则运算,数字方阵程序,数据加密程序,代码转换程序,键盘录入数据的转换与显示,音乐演奏等-compiled examples : judgment leap year process, and random numbers generated by operations procedures, the length of computing platform procedures, four arithmetic operations, digital matrix, data encryption, code conversion, keyboard input data conversion and display, other music
- 2022-07-04 15:09:28下载
- 积分:1