RM 2D绘图的插件（加了传送位图功能啦，效率测试）
不依赖SEP Core运行，所以独立发一下但是……谢谢大家的测试我只能说[泪目]……看来这个功能做出来终究还是有它的可取之处的，那就后续再更新一下吧~
就是写着顺手就写出来了……
RUBY 代码
#==============================================================================
# ■ 位图画布处理核心 v1.0 by SailCat
#------------------------------------------------------------------------------
# 方法：本脚本插入Main之前使用
# 依赖：无
# 版本：v1.0 （Build 220228）
# 效果：
# 1. 可以用简单指令在位图对象上画图
# 配置：画笔线形的配置
# 冲突：无
# 说明：
# 1. 绘制直线：
# draw_line(起始x, 起始y, 结束x, 结束y, 颜色, 线形)
# 2. 绘制渐变色直线：
# gradient_draw_line(起始x, 起始y, 结束x, 结束y, 颜色1, 颜色2)
# 3. 绘制路径（连续直线）：
# draw_path(点1x, 点1y, 点2x, 点2y, 点3x, 点3y[, ...], 颜色)
# 4. 绘制多边形（连续封闭直线）：
# draw_polygon(点1x, 点1y, 点2x, 点2y, 点3x, 点3y[, ...], 颜色)
# 5. 绘制正多边形：
# draw_isogon(外接圆心x, 外接圆心y, 半径, 边数, 旋转角, 颜色)
# 6. 绘制椭圆：
# draw_ellipse(圆心x, 圆心y, 半横径，半纵径, 颜色)
# 7. 绘制圆：
# draw_circle(圆心x, 圆心y, 半径，颜色)
# 8. 填涂多边形：
# fill_polygon(点1x, 点1y, 点2x, 点2y, 点3x, 点3y[, ...], 边框颜色[,
# 填充颜色1[, 填充颜色2]])
# 9. 填涂正多边形：
# fill_isogon(外接圆心x, 外接圆心y, 半径, 边数, 旋转角, 边框颜色[,
# 填充颜色1[, 填充颜色2]])
# 10.填涂椭圆：
# fill_ellipse(圆心x, 圆心y, 半横径，半纵径, 边框颜色[, 填充颜色1[,
# 填充颜色2]])
# 11.填涂圆：
# fill_circle(圆心x, 圆心y, 半径，边框颜色[, 填充颜色1[, 填充颜色2]])
# 12.传送多边形：
# blt_polygon(点1x, 点1y, 点2x, 点2y, 点3x, 点3y[, ...], 源位图,
# 参考点1, 参考点1y[, 不透明度])
# 13.传送正多边形：
# blt_isogon(外接圆心x, 外接圆心y, 半径, 边数, 旋转角, 源位图, 参考心x,
# 参考心y[, 不透明度])
# 14.传送椭圆：
# blt_ellipse(圆心x, 圆心y, 半横径，半纵径, 源位图, 参考心x, 参考心y[,
# 不透明度])
# 15.传送圆：
# blt_circle(圆心x, 圆心y, 半径，源位图, 参考心x, 参考心y[, 不透明度])
#==============================================================================
#==============================================================================
# ■ SailCat's 插件公用
#==============================================================================
module SailCat
#--------------------------------------------------------------------------
# ● 脚本配置区
#--------------------------------------------------------------------------
module Canvas_Config
CANVAS_LINE_DOTTED = # 点线画笔
CANVAS_LINE_DASHED = # 短虚线画笔
CANVAS_LINE_LONGDASH = # 长虚线画笔
CANVAS_LINE_DASHDOT = # 点划线画笔
CANVAS_LINE_BROKEN = # 散点画笔
end
end
#==============================================================================
# ■ Bitmap
#==============================================================================
class Bitmap
includeSailCat::Canvas_Config
#--------------------------------------------------------------------------
# ● 常量
#--------------------------------------------------------------------------
CANVAS_LINE_SOLID = # 实心画笔，该常量禁止修改配置
#--------------------------------------------------------------------------
# ● 绘制直线
# x1 : 起始的 X 坐标
# y1 : 起始的 Y 坐标
# x2 : 结束的 X 坐标
# y2 : 结束的 Y 坐标
# color : 直线的颜色 (Color)
# style : 直线的线型
#--------------------------------------------------------------------------
def draw_line(x1, y1, x2, y2, color, style = CANVAS_LINE_SOLID)
return set_pixel(x1, y1, color)if x1 == x2 and y1 == y2
dx = (x2 - x1).abs
dy = (y2 - y1).abs
x = x1
y = y1
rx = x2 - x10
ry = y2 - y10
b_index = 0
b_size = style.size
if dx == 0and style == CANVAS_LINE_SOLID
fill_rect(x1, .min, 1, dy + 1, color)
elsif dy == 0and style == CANVAS_LINE_SOLID
fill_rect(.min, y1, dx + 1, 1, color)
elsif dxyk
yj += 1
xj += dx
end
edges ||= []
edges.push()
end
end
returnunless max_y - min_y > 1
aet = edges
aet.each{|edge| edge += edge}
aet.sort!
if fill1 != fill2
dh = max_y - min_y - 1
dr = (fill2.red - fill1.red) / dh
dg = (fill2.green - fill1.green) / dh
db = (fill2.blue - fill1.blue) / dh
da = (fill2.alpha - fill1.alpha) / dh
gradient = true
end
f = fill1.clone
for y in min_y + 1..max_y - 1
if edges
aet.concat(edges)
aet.sort!
end
0.step(aet.size - 1, 2)do |i|
xi = aet.round
xj = aet.round
xi += 1until xi == width - 1or get_pixel(xi, y) != color
xj -= 1until xj == 0or get_pixel(xj, y) != color
if xj >= xi
fill_rect(xi, y, xj - xi + 1, 1, f)
end
aet.reject! {|edge| edge == y}
aet.each{|edge| edge += edge}
aet.sort!
f.set(f.red + dr, f.green + dg, f.blue + db, f.alpha + da)if gradient
end
end
end
#--------------------------------------------------------------------------
# ● 传送位图多边形
# x1 : 第一点的 X 坐标
# y1 : 第一点的 Y 坐标
# x2 : 第二点的 X 坐标
# y2 : 第二点的 Y 坐标
# x3 : 第三点的 X 坐标
# y3 : 第三点的 Y 坐标
# args : 后续的参数（加多个点，最后是位图, 偏移x，偏移y，(可选)不透明度）
# 偏移x和偏移y的位置参考第一个点
#--------------------------------------------------------------------------
def blt_polygon(x1, y1, x2, y2, x3, y3, *args)
if args[-3].is_a?(Bitmap)
src, x0, y0 = args[-3, 3]
opacity = 255
nodes = .concat(args)
elsif args[-4].is_a?(Bitmap)
src, x0, y0, opacity = args[-4, 4]
nodes = .concat(args)
else
raiseArgumentError
end
raiseArgumentErrorunless nodes.size == 0
edges = {}
min_y = height
max_y = 0
ox = x0 - x1
oy = y0 - y1
0.step(nodes.size - 2, 2)do |i|
xi, yi = nodes
min_y = .min
max_y = .max
xj, yj = nodes[(i + 2) % nodes.size, 2]
dx = 1.0 * (xi - xj) / (yi - yj)
if yi < yj
yh = nodes
if yh < yi
yi += 1
xi += dx
end
edges ||= []
edges.push()
elsif yi > yj
yk = nodes[(i + 5) % nodes.size]
if yj > yk
yj += 1
xj += dx
end
edges ||= []
edges.push()
end
end
aet = []
for y in min_y..max_y
if edges
aet.concat(edges)
aet.sort!
end
0.step(aet.size - 1, 2)do |i|
xi = aet.round
xj = aet.round
blt(xi, y, src, Rect.new(xi + ox, y + oy, xj - xi + 1, 1), opacity)
aet.reject! {|edge| edge == y}
aet.each{|edge| edge += edge}
aet.sort!
end
end
end
#--------------------------------------------------------------------------
# ● 绘制正多边形
# x : 正多边形外接圆心 X 坐标
# y : 正多边形外接圆心 Y 坐标
# rad : 正多边形外接圆 半径
# edges : 正多边形的边数
# angle : 正多边形旋转角度
# color : 正多边形的颜色 (Color)
#--------------------------------------------------------------------------
def draw_isogon(x, y, rad, edges, angle, color)
raiseArgumentErrorif edges < 3
step = Math::PI * 2 / edges
args = []
angle_i = Math::PI * (270 + angle) / 180
edges.timesdo
args.push((x + rad * Math.cos(angle_i)).round,
(y + rad * Math.sin(angle_i)).round)
angle_i += step
end
args.push(color)
draw_polygon(*args)
end
#--------------------------------------------------------------------------
# ● 绘制实心正多边形
# x : 正多边形外接圆心 X 坐标
# y : 正多边形外接圆心 Y 坐标
# rad : 正多边形外接圆 半径
# edges : 正多边形的边数
# angle : 正多边形旋转角度
# border_color : 正多边形的边框颜色 (Color)
# fill_color1 : 填充渐变的上颜色 (Color)
# fill_color2 : 填充渐变的下颜色 (Color)
#--------------------------------------------------------------------------
def fill_isogon(x, y, rad, edges, angle, border_color, fill_color1 =
border_color, fill_color2 = fill_color1)
raiseArgumentErrorif edges < 3
step = Math::PI * 2 / edges
args = []
angle_i = Math::PI * (270 + angle) / 180
edges.timesdo
args.push((x + rad * Math.cos(angle_i)).round,
(y + rad * Math.sin(angle_i)).round)
angle_i += step
end
args.push(border_color, fill_color1, fill_color2)
fill_polygon(*args)
end
#--------------------------------------------------------------------------
# ● 传送位图正多边形
# x : 正多边形外接圆心 X 坐标
# y : 正多边形外接圆心 Y 坐标
# rad : 正多边形外接圆 半径
# edges : 正多边形的边数
# angle : 正多边形旋转角度
# src_bitmap : 传送元位图
# x0 : 传送圆心 X 坐标
# y0 : 传送圆心 Y 坐标
# opacity : 不透明度
#--------------------------------------------------------------------------
def blt_isogon(x, y, rad, edges, angle, src_bitmap, x0, y0, opacity = 255)
raiseArgumentErrorif edges < 3
step = Math::PI * 2 / edges
args = []
angle_i = Math::PI * (270 + angle) / 180
edges.timesdo
args.push((x + rad * Math.cos(angle_i)).round,
(y + rad * Math.sin(angle_i)).round)
angle_i += step
end
args.push(src_bitmap, x0 - x + args, y0 - y + args, opacity)
blt_polygon(*args)
end
#--------------------------------------------------------------------------
# ● 绘制圆
# x : 圆心 X 坐标
# y : 圆心 Y 坐标
# rad : 半径
# color : 圆的颜色 (Color)
#--------------------------------------------------------------------------
def draw_circle(x, y, rad, color)
raiseArgumentErrorif rad < 0
return set_pixel(x, y, color)if rad == 0
draw_ellipse(x, y, rad, rad, color)
end
#--------------------------------------------------------------------------
# ● 绘制椭圆
# x : 圆心 X 坐标
# y : 圆心 Y 坐标
# rad_x : 水平半径
# rad_y : 垂直半径
# color : 椭圆的颜色 (Color)
# fill1 : 填充的颜色1 (Color)
# fill2 : 填充的颜色2 (Color)
#--------------------------------------------------------------------------
def draw_ellipse(x, y, rad_x, rad_y, color, fill1 = nil, fill2 = nil)
raiseArgumentErrorif rad_x < 0or rad_y < 0
return set_pixel(x, y, color)if rad_x == 0and rad_y == 0
return fill_rect(x - rad_x, y, rad_x
页:
[1]