工具：连网电脑一台
原料：易语言
第一步：首先在易语言主程序窗体上加两个画板，两个标签，一个按钮，在标签分别写上要绘画的类型，
第二步是写代码：.版本 2.支持库 EThread.支持库 spec.局部变量 随机数, 整数型随机数 ＝ 10启动线程 (&画矩形, 随机数, )启动线程 (&画椭圆, 随机数, ).子程序 画矩形.参数 参数, 整数型.局部变量 循环, 逻辑型调试输出 (参数).判断循环首 (循环 ＝ 假) 置随机数种子 () 画板2.激活 () 画板2.画笔类型 ＝ 取随机数 (0, 8) 画板2.画笔颜色 ＝ 取随机数 (, ) 画板2.刷子类型 ＝ 取随机数 (0, 50) 画板2.刷子颜色 ＝ 取随机数 (, ) 画板2.画矩形 (取随机数 (0, 画板2.宽度), 取随机数 (0, 画板2.高度), 取随机数 (0, 画板2.宽度), 取随机数 (0, 画板2.高度)) 延时 (1500) 处理事件 ().判断循环尾 ().子程序 画椭圆.参数 参数, 整数型.局部变量 循环, 逻辑型调试输出 (参数).判断循环首 (循环 ＝ 假) 置随机数种子 () 画板1.激活 () 画板1.画笔类型 ＝ 取随机数 (0, 8) 画板1.画笔颜色 ＝ 取随机数 (, ) 画板1.刷子类型 ＝ 取随机数 (0, 50) 画板1.刷子颜色 ＝ 取随机数 (, ) 画板1.画椭圆 (取随机数 (0, 画板1.宽度), 取随机数 (0, 画板1.高度), 取随机数 (0, 画板1.宽度), 取随机数 (0, 画板1.高度)) 延时 (200) 处理事件 ().判断循环尾 ()