玫瑰花代码shell
时间: 2024-06-12 17:11:01 浏览: 226
以下是玫瑰花代码的shell脚本:
```
#!/bin/bash
echo "请输入要画几朵玫瑰花:"
read num
echo "请输入每朵玫瑰花的大小(建议不要超过10):"
read size
for ((i=1;i<=num;i++))
do
for ((j=1;j<=size;j++))
do
t=$(echo "scale=2; $j/$size" | bc)
x=$(echo "scale=2; -1*$t*$t+2*$t" | bc)
y=$(echo "scale=2; 2*sqrt($t)-2*sqrt($t)*$x" | bc)
for ((k=1;k<=size;k++))
do
if [ $(echo "$k==$size*$y" | bc) -eq 1 ]
then
echo -n "*"
else
echo -n " "
fi
done
echo ""
done
done
```
相关问题
如何使用edge浏览器在VBScript中创建一段用于求爱的动态玫瑰花
要在VBScript中使用Edge浏览器创建一段用于求爱的动态玫瑰花,可以按照以下步骤进行操作:
1. 打开记事本(Notepad),并复制以下代码:
```
Set objShell = CreateObject("WScript.Shell")
Set objEdge = CreateObject("Microsoft.Edge.Application")
objEdge.Navigate2 "about:blank"
Do While objEdge.ReadyState <> 4
WScript.Sleep 100
Loop
objEdge.Document.write "<html><body bgcolor='pink'></body></html>"
Set objRose = objEdge.Document.createElement("div")
objRose.id = "rose"
objRose.style.position = "absolute"
objRose.style.width = "10px"
objRose.style.height = "10px"
objRose.style.background = "red"
objRose.style.borderRadius = "50%"
objRose.style.bottom = "0px"
objRose.style.left = "50%"
objEdge.Document.body.appendChild(objRose)
Do While True
intHeight = objRose.offsetHeight
intWidth = objRose.offsetWidth
If intHeight > 300 Then Exit Do
objNewRose = objRose.cloneNode(True)
objNewRose.style.width = intWidth * 1.1 & "px"
objNewRose.style.height = intHeight * 1.1 & "px"
objNewRose.style.bottom = intHeight & "px"
objNewRose.style.left = intWidth / 2 & "px"
objEdge.Document.body.appendChild(objNewRose)
Set objRose = objNewRose
WScript.Sleep 100
Loop
objEdge.Document.write "<h1>我爱你</h1>"
```
2. 将上述代码保存为一个.vbs文件。例如,将文件保存为“DynamicRose.vbs”。
3. 双击运行DynamicRose.vbs文件,即可看到一个动态玫瑰花和一段求爱的话语。
注意:在上面的代码中,我们利用了Edge浏览器来绘制玫瑰花并显示求爱的话语,因此需要保证计算机中安装有Edge浏览器。同时,由于这里涉及到了操作浏览器的DOM元素,因此也需要允许VBScript操作Edge浏览器。如果计算机中禁用了VBScript或Edge浏览器,可能无法正常运行以上代码。
现在,您就可以成功地在VBScript中使用Edge浏览器创建一段用于求爱的动态玫瑰花了。
阅读全文