PowerShell实现全屏七彩渐变 · 呼吸 · 屏保
引言想做一下屏幕保护程序的效果-----全屏颜色渐变,类似呼吸灯的效果。就用Windows自带的PowerShell脚本。脚本预设好了七彩颜色,然后循环变化。
首先
我们先实现七彩循环切换的全屏效果,也就是不带渐变。
要想实现全屏颜色填充,必须借助"窗口"。对于PowerShell而言,最直接的方法莫过于调用程序集System.Windows.Forms,让窗口全屏化,隐藏标题栏,去除边框,如下:
Add-Type -AssemblyName System.Windows.Forms# 加载System.Windows.Forms库
# 创建一个新的Form对象
$form = New-Object system.Windows.Forms.Form
$form.Text = "Breathing Effect" # 设置窗体标题为"Breathing Effect"
$form.TopMost = $true # 设置窗体始终在最上层
$form.FormBorderStyle = 'None' # 移除窗体边框
$form.WindowState = 'Maximized' # 最大化窗体以实现全屏效果然后定义颜色,七彩色,红橙黄绿青蓝紫,使用System.Drawing中的Color枚举:
# 定义颜色数组
$colors = @( # 定义一个包含多种颜色的颜色数组
::Red, # 红色
::Orange, # 橙色
::Yellow, # 黄色
::Green, # 绿色
::Blue, # 蓝色
::Indigo, # 靛蓝色
::Violet # 紫罗兰色
)在设定两个变量:
# 设置初始颜色索引和方向
$currentColorIndex = 0 # 初始颜色索引设为0(红色)
$direction = 1 # 方向变量,用于控制颜色变化的方向一个form窗体,背景颜色的设定使用Form.BackColor定义,然后使用 ::Run来运行窗体对象!
当然,我们希望程序循环往复不断切换颜色,所以需要设定一个定时器,让其隔一定时间切换一次颜色,即调用一次切换函数,此函数见下文:
# 更新颜色函数
function Update-Color {
# 改变当前颜色索引
$script:currentColorIndex += $direction # 根据方向变量更新颜色索引
# 检查边界条件并反转方向
if ($script:currentColorIndex -ge ($colors.Length - 1)) {# 如果颜色索引达到最大值
$script:direction = -1 # 反转方向
} elseif ($script:currentColorIndex -le 0) { # 如果颜色索引达到最小值
$script:direction = 1 # 反转方向
}
# 设置窗体背景颜色
$form.BackColor = $colors[$script:currentColorIndex]# 将窗体背景颜色设置为当前颜色
# 延迟一段时间后再次调用Update-Color
Start-Sleep -Milliseconds 500 # 延迟500毫秒
::DoEvents()# 处理所有挂起的事件
} 而定时器的定义和启动:
# 启动定时器以定期更新颜色
$timer = New-Object System.Windows.Forms.Timer# 创建一个新的Timer对象
$timer.Interval = 16.7 # 设置定时器间隔为100毫秒
$timer.Add_Tick({ Update-Color }) # 添加Tick事件处理程序,每次触发时调用Update-Color函数
$timer.Start() # 启动定时器
完整代码如下:
Add-Type -AssemblyName System.Windows.Forms# 加载System.Windows.Forms库
# 创建一个新的Form对象
$form = New-Object system.Windows.Forms.Form
$form.Text = "Breathing Effect" # 设置窗体标题为"Breathing Effect"
$form.TopMost = $true # 设置窗体始终在最上层
$form.FormBorderStyle = 'None' # 移除窗体边框
$form.WindowState = 'Maximized' # 最大化窗体以实现全屏效果# 定义颜色数组
$colors = @( # 定义一个包含多种颜色的颜色数组
::Red, # 红色
::Orange, # 橙色
::Yellow, # 黄色
::Green, # 绿色
::Blue, # 蓝色
::Indigo, # 靛蓝色
::Violet # 紫罗兰色
)# 设置初始颜色索引和方向
$currentColorIndex = 0 # 初始颜色索引设为0(红色)
$direction = 1 # 方向变量,用于控制颜色变化的方向# 更新颜色函数function Update-Color { # 改变当前颜色索引 $script:currentColorIndex += $direction # 根据方向变量更新颜色索引 # 检查边界条件并反转方向 if ($script:currentColorIndex -ge ($colors.Length - 1)) {# 如果颜色索引达到最大值 $script:direction = -1 # 反转方向 } elseif ($script:currentColorIndex -le 0) { # 如果颜色索引达到最小值 $script:direction = 1 # 反转方向 } # 设置窗体背景颜色 $form.BackColor = $colors[$script:currentColorIndex]# 将窗体背景颜色设置为当前颜色 # 延迟一段时间后再次调用Update-Color Start-Sleep -Milliseconds 20 # 延迟50毫秒 ::DoEvents()# 处理所有挂起的事件}# 启动定时器以定期更新颜色
$timer = New-Object System.Windows.Forms.Timer# 创建一个新的Timer对象
$timer.Interval = 16.7 # 设置定时器间隔为100毫秒
$timer.Add_Tick({ Update-Color }) # 添加Tick事件处理程序,每次触发时调用Update-Color函数
$timer.Start() # 启动定时器# 显示窗体::Run($form)# 运行窗体应用程序的消息循环效果如下:
其次
现在在这个脚本基础上,加上渐变效果,也就是每次切换颜色,有一个过渡。
关键的,是设定一插值参数$offt,参与计算差值颜色,我这里使用math::Round函数,如下:
# 更新颜色函数
function Update-Color {
param (
$offt
)
# 获取当前颜色和下一个颜色
$currentColor = $colors[$script:currentColorIndex]
$nextColor = $colors[$script:nextColorIndex]
# 计算插值颜色
$r = (::Round($currentColor.R + ($nextColor.R - $currentColor.R) * $offt))
$g = (::Round($currentColor.G + ($nextColor.G - $currentColor.G) * $offt))
$b = (::Round($currentColor.B + ($nextColor.B - $currentColor.B) * $offt))
# 设置窗体背景颜色
$form.BackColor = ::FromArgb($r, $g, $b)
# 增加插值参数
$script:offt += 0.01
# 如果插值参数超过1,则切换到下一个颜色
if ($script:t -ge 1) {
$script:currentColorIndex = $script:nextColorIndex
$script:nextColorIndex += $direction
# 检查边界条件并反转方向
if ($script:nextColorIndex -ge $colors.Length) {
$script:nextColorIndex = $colors.Length - 2
$script:direction = -1
} elseif ($script:nextColorIndex -lt 0) {
$script:nextColorIndex = 1
$script:direction = 1
}
$script:offt = 0
}
}接着优化一下功能,按 esc 可退出:
# 处理按键事件
$form.Add_KeyDown({
param(
$sender,
$e
)
if ($e.KeyCode -eq ::Escape) {
$form.Close()# 关闭窗体
}
})
完整代码如下:
Add-Type -AssemblyName System.Windows.Forms# 加载System.Windows.Forms库
# 创建一个新的Form对象
$form = New-Object system.Windows.Forms.Form
$form.Text = "Breathing Effect" # 设置窗体标题为"Breathing Effect"
$form.TopMost = $true # 设置窗体始终在最上层
$form.FormBorderStyle = 'None' # 移除窗体边框
$form.WindowState = 'Maximized' # 最大化窗体以实现全屏效果# 定义颜色数组
$colors = @( # 定义一个包含多种颜色的颜色数组
::Red, # 红色
::Orange, # 橙色
::Yellow, # 黄色
::Green, # 绿色
::Blue, # 蓝色
::Indigo, # 靛蓝色
::Violet # 紫罗兰色
)# 设置初始颜色索引和方向$currentColorIndex = 0 # 初始颜色索引设为0(红色)$nextColorIndex = 1 # 下一个颜色索引设为1(橙色)$direction = 1 # 方向变量,用于控制颜色变化的方向$offt = 0 # 插值参数,范围从0到1# 更新颜色函数function Update-Color { param ( $offt ) # 获取当前颜色和下一个颜色 $currentColor = $colors[$script:currentColorIndex] $nextColor = $colors[$script:nextColorIndex] # 计算插值颜色 $r = (::Round($currentColor.R + ($nextColor.R - $currentColor.R) * $offt)) $g = (::Round($currentColor.G + ($nextColor.G - $currentColor.G) * $offt)) $b = (::Round($currentColor.B + ($nextColor.B - $currentColor.B) * $offt)) # 设置窗体背景颜色 $form.BackColor = ::FromArgb($r, $g, $b) # 增加插值参数 $script:offt += 0.01 # 如果插值参数超过1,则切换到下一个颜色 if ($script:offt -ge 1) { $script:currentColorIndex = $script:nextColorIndex $script:nextColorIndex += $direction # 检查边界条件并反转方向 if ($script:nextColorIndex -ge $colors.Length) { $script:nextColorIndex = $colors.Length - 2 $script:direction = -1 } elseif ($script:nextColorIndex -lt 0) { $script:nextColorIndex = 1 $script:direction = 1 } $script:offt = 0 }}# 处理按键事件
$form.Add_KeyDown({
param(
$sender,
$e
)
if ($e.KeyCode -eq ::Escape) {
$form.Close()# 关闭窗体
}
})# 启动定时器以定期更新颜色$timer = New-Object System.Windows.Forms.Timer# 创建一个新的Timer对象$timer.Interval = 50 # 设置定时器间隔为50毫秒$timer.Add_Tick({ Update-Color -offt $script:offt}) # 添加Tick事件处理程序,每次触发时调用Update-Color函数$timer.Start() # 启动定时器# 显示窗体::Run($form)# 运行窗体应用程序的消息循环效果如下:
小结
逻辑很清晰,做个屏幕保护程序,哈哈,使用PowerShell,很 纯粹 的开发体验!(不需要借助IDE、开发框架)
如果想要实现画面实时更新,就要设计一个定时器,不断执行一个函数----刷新画面功能。
来源:程序园用户自行投稿发布,如果侵权,请联系站长删除
免责声明:如果侵犯了您的权益,请联系站长,我们会及时删除侵权内容,谢谢合作!
页:
[1]