-
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
-
对于软件avrcode XMODEM CRC
avrcode for xmodem crc software
- 2023-02-20 17:00:03下载
- 积分:1
-
汇编语言二进制转换为十六进制模块,代码正确。。。。希望有用...
汇编语言二进制转换为十六进制模块,代码正确。。。。希望有用-Assembly language is converted to hexadecimal binary module, the code correctly. . . . Want to be useful
- 2022-07-17 17:47:48下载
- 积分:1
-
汇编语言实时时钟程序
资源描述
使用汇编语言编写的实时时钟程序,先初始化程序,设置光标,不断地获取时间,取时、取分、取秒,并不断地循环,在循环过程中,如果用户按下esc键则退出,如此来现实时间界面,获取当前时间
- 2022-11-01 07:10:02下载
- 积分:1
-
除湿机的说明程序文件 已经生产几十W台 出口机形 分时操作
除湿机的说明程序文件 已经生产几十W台 出口机形 分时操作-dehumidifiers of the document production process dozens of W-exporting machine time-sharing operation
- 2022-06-18 05:13:50下载
- 积分:1
-
Use ATMEGA8L+ 1602LCD written calendar, crystal frequency of 4MHz
使用ATMEGA8L+1602LCD写的万年历,晶振频率为4MHz-Use ATMEGA8L+ 1602LCD written calendar, crystal frequency of 4MHz
- 2022-02-25 17:04:09下载
- 积分:1
-
数字钟设计 数字钟设计
源码
数字钟设计 数字钟设计
源码-numbercolck
- 2022-02-21 23:07:46下载
- 积分:1
-
这是一款自动皂液器的控制程序,可以选择工作次数,低电压检测...
这是一款自动皂液器的控制程序,可以选择工作次数,低电压检测-This automatic soap dispenser is a control program, you can choose to work the number of low-voltage detection
- 2022-07-10 01:46:46下载
- 积分:1
-
读取DS1302的时间数据并用LED动态显示的51汇编(有注释)
读取DS1302的时间数据并用LED动态显示的51汇编(有注释)-Time to read the DS1302 data and dynamic display with LED compilation 51 (annotated)
- 2022-02-07 15:05:27下载
- 积分:1
-
汇编语言编写的类似俄罗斯方块的游戏程序
汇编语言编写的类似俄罗斯方块的游戏程序-compiled languages like Tetris game procedures
- 2023-05-28 03:30:02下载
- 积分:1