-
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
-
led 的矩阵
LED矩阵代码
- 2022-01-31 16:43:54下载
- 积分:1
-
5460,电力芯片,汇编
5460,电力芯片,汇编-5460, the power chip, the compilation
- 2022-03-18 03:46:48下载
- 积分:1
-
PID算法C语言程序,实现了简单的PID控制功能
PID算法C语言程序,实现了简单的PID控制功能-PID algorithm for C language procedures realize a simple PID control function
- 2023-05-16 14:05:03下载
- 积分:1
-
mpc563 串行通讯程序和串行外围设备通讯程序代码
mpc563 串行通讯程序和串行外围设备通讯程序代码-mpc563 program code
- 2022-01-26 05:45:37下载
- 积分:1
-
汇编语言程序设计自学设计教程
汇编语言程序设计自学设计教程-assembly language programming self-Design Guide
- 2022-11-17 09:30:03下载
- 积分:1
-
Basic program for Home automation robo in assembly language.
Basic program for Home automation robo in assembly language.
- 2022-05-07 15:14:49下载
- 积分:1
-
轻量级x86 dissasembler
Lightweight x86 Dissasembler
- 2022-04-19 17:02:34下载
- 积分:1
-
Windows Environment 32
Windows环境下32位汇编语言程序设计配套书源码第三章-Windows Environment 32-bit assembly language programming book source package in Chapter III
- 2022-03-04 21:03:47下载
- 积分:1
-
停车场管理系统
数据结构栈的应用,希望对大家有所帮助!...
停车场管理系统
数据结构栈的应用,希望对大家有所帮助!-C
- 2023-01-20 17:35:04下载
- 积分:1