-
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
-
景观
Landscape
key list:
Right/Left - Spin landscape
Forward/Back - Move in current direction either forward or backward
Space - Move the water level up and down
ESC - Exit-Landscape
key list:
Right/Left - Spin landscape
Forward/Back - Move in current direction either forward or backward
Space - Move the water level up and down
ESC - Exit
- 2022-11-28 13:10:03下载
- 积分:1
-
汇编语言编程认识实验
可能对初学汇编和ASM平台的用户有帮助!...
汇编语言编程认识实验
可能对初学汇编和ASM平台的用户有帮助!-Experimental understanding of assembly language programming may be compiled and novice users ASM platform to help!
- 2022-08-16 23:30:38下载
- 积分:1
-
钢琴模拟发声 汇编语言编写
钢琴模拟发声 汇编语言编写-Piano simulation audible language compilation
- 2022-10-13 07:20:03下载
- 积分:1
-
Single
单片机LCD程序,用汇编语言写的,里面有详细的源代码和电路图-Single-chip LCD procedures, using assembly language to write, and there are detailed source code and circuit diagram
- 2022-07-04 02:42:03下载
- 积分:1
-
哈希排序 很好用的 我已经在电脑上运行成功了
哈希排序 很好用的 我已经在电脑上运行成功了 -Hash sort I" ve used a good computer to run a success Thank you
- 2023-06-15 09:25:03下载
- 积分:1
-
an asm program for serial rs232 data communication.
asm的基于rs232的连机数据传输与接受程序。-an asm program for serial rs232 data communication.
- 2023-05-25 18:25:03下载
- 积分:1
-
related codewarrior works very handy example of the ah, we should not miss!
相关的codewarrior工程 范例
非常好用的啊,大家不要错过!
-related codewarrior works very handy example of the ah, we should not miss!
- 2023-01-15 16:40:03下载
- 积分:1
-
遥控小车(51单片机开发例子子程序汇编语言编写)
遥控小车(51单片机开发例子子程序汇编语言编写)-Remote control cars (51 single-chip development to prepare examples of assembly language subroutines)
- 2022-10-12 15:40:03下载
- 积分:1
-
automatically from cars
自 动 往 返 小 汽 车-automatically from cars
- 2022-04-20 22:17:59下载
- 积分:1