几何图形绘制脚本 v0.8

雪流星 · 发表于 2008-4-25 21:00:28

加入我们，或者，欢迎回来。

您需要登录才可以下载或查看，没有帐号？注册会员

x

最近在研究精灵，刚好八云紫妹妹又在问怎麽画三角形
於是就写出来了，顺便写了其他几个形状。
原本要做出绘制正多边行的，但是公式方面还有问题
等解决了再发出。
使用了Deathless 的线条绘制脚本
====================================
            使用说明
====================================
三角形绘制：    XXX = Triangle.new(第一点, 第二点, 第三点,[线粗, 颜色])
  正三角形绘制：  XXX = Triangle_E.new(原点, 边长, [线粗, 颜色])
  等腰三角形绘制：XXX = Triangle_I.new(原点, 底长, [边长, 线粗, 颜色])
四边形绘制：    XXX = Quadri.new(第一点, 第二点, 第三点, 第四点, [线粗, 颜色])
  长方形绘制： XXX = Rectangle.new(原点, 宽度, 长度,[线粗, 颜色])
  菱形绘制：    XXX = Rhombus.new(原点, 宽度, 长度,[线粗, 颜色])
  正方形绘制： XXX = Square.new(原点, 长度,[线粗, 颜色])
上面在[]中的参数为选填的，默认线粗为1, 颜色白
等腰三角形的边长默认为底长的2/3倍

任意多边行：  XXX = Polygon.new([第一点, 第二点, 第三点, ...], {线粗, 颜色})
上面在{}中的参数为选填的，默认线粗为1, 颜色白

点的格式为： [X座标, Y座标]
绘制任意多边型时，必须提供两点以上的参数，否则直接无视

其他函数：
.name                   返回名称
.area                   返回面积（目前不支援四边形和多边型）
.print_name(x, y)    显示名称座标
.length(p1, p2)       计算p1到p2两点间距离

顺便附赠一个网格脚本
使用 XXX = Grid.new([横距, 纵距])
横距和纵距不提供的话默认为32

class Polygon < Sprite_Base
attr_accessor :p1
attr_accessor :p2
attr_accessor :p3
attr_accessor :name
attr_accessor :po
#attr_accessor :print
def initialize(points, thick=1, color=normal_color)
super(Viewport.new(0, 0, 544, 416))
self.bitmap = Bitmap.new(544, 416)
@p1=[]
@p2=[]
@p3=[]
@thick = thick
@color = color
@points = points
@name = "Polygon"
draw
end
def set_viewport(x, y, width, height)
self.viewport = Viewport.new(x, y, width, height)
end
def update
end
def draw
self.bitmap.clear
for i in [email protected]
if @points.size > 2
if i < (@points.size) - 1
p1 = @points[i]
p2 = @points[i+1]
else
p1 = @points[i]
p2 = @points[0]
end
self.bitmap.drawline(p1[0], p1[1], p2[0], p2[1], @thick, @color)
end
end
end
def area
return 0
end
def print_name(x, y)
#self.bitmap.font.color.alpha = print ? 255 : 0
self.bitmap.draw_text(x, y, bitmap.text_size(@name).width, 24, name)
end
def length(p1, p2)
a = (p2[0]-p1[0]).abs
b = (p2[1]-p1[1]).abs
return Math.hypot(a, b)
end
end
class Triangle < Polygon
def initialize(p1, p2, p3, thick=1, color=normal_color)
@p1 = p1
@p2 = p2
@p3 = p3
super([p1, p2, p3],thick, color)
@name = "Triangle"
end
def area
a = length(@p1, @p2)
b = length(@p2, @p3)
c = length(@p3, @p1)
d = (a+b+c)/2
area = Math.sqrt( d*(d-a)*(d-b)*(d-c) )
return area
end
end
class Triangle_E < Triangle
def initialize(p1, side, thick=1, color=normal_color)
height = (side/2) * Math.sqrt(3)
@p1 = []
@p1[0] = p1[0]+side/2
@p1[1] = p1[1]
@p2=[]
@p2[0]=p1[0]
@p2[1]=p1[1]+height
@p3=[]
@p3[0]=p1[0]+side
@p3[1]=p1[1]+height
super(@p1, @p2, @p3, thick, color)
end
end
class Triangle_I < Triangle
def initialize(p1, base, side=base*2/3, thick=1, color=normal_color)
base_h = base/2
height = Math.sqrt( side**2 - base_h**2 )
@p1 = []
@p1[0] = p1[0]+base/2
@p1[1] = p1[1]
@p2=[]
@p2[0]=p1[0]
@p2[1]=p1[1]+height
@p3=[]
@p3[0]=p1[0]+base
@p3[1]=p1[1]+height
super(@p1, @p2, @p3, thick, color)
end
end
class Quadri < Polygon
attr_accessor :p4
def initialize(p1, p2, p3, p4, thick=1, color=normal_color)
super([p1, p2, p3, p4], thick, color)
@p1 = p1
@p2 = p2
@p3 = p3
@p4 = p4
@name = "Quadrilateral"
draw
end
end
class Rectangle < Quadri
def initialize(p1, width, length, thick=1, color=normal_color)
@p1 = p1
@p2=[]
@p2[0] = p1[0]
@p2[1] = p1[1] + width
@p4 = []
@p4[0] = p1[0] + length
@p4[1] = p1[1]
@p3=[]
@p3[0] = @p4[0]
@p3[1] = @p2[1]
@width = width
@length = length
super(@p1, @p2, @p3, @p4, thick, color)
@name = "Rectangle"
end
def area
return @length * @width
end
end
class Rhombus < Quadri
def initialize(p1, width, height, thick=1, color=normal_color)
@p1 = []
@p1[0] = p1[0] + width/2
@p1[1] = p1[1]
@p2 = []
@p2[0] = p1[0] + width
@p2[1] = p1[1] + height/2
@p3 = []
@p3[0] = p1[0] + width/2
@p3[1] = p1[1] + height
@p4 = []
@p4[0] = p1[0]
@p4[1] = p1[1] + height/2
super(@p1, @p2, @p3, @p4, thick, color)
@name = "Rhombus"
end
def area
return @width * @height / 2
end
end
class Square < Rectangle
def initialize(p1, side, thick=1, color=normal_color)
super(p1, side, side, thick, color)
@name = "Square"
end
end
class Grid < Sprite_Base
def initialize(x=32, y=32)
super(Viewport.new(0, 0, 544, 416))
self.bitmap = Bitmap.new(544, 416)
color = Color.new(255, 255, 255, 255)
for i in 1...(544/x)
dx = x*i
self.bitmap.drawline(dx, 0, dx, 416, 1, color)
end
for i in 1...(416/y)
dy = y*i
self.bitmap.drawline(0, dy, 544, dy, 1, color)
end
end
end
class Polygon < Sprite_Base
#--------------------------------------------------------------------------
# ● 獲取文字顏色
# n : 文字顏色色號（0-31）
#--------------------------------------------------------------------------
def text_color(n)
windowskin = Cache.system("Window")
x = 64 + (n % 8) * 8
y = 96 + (n / 8) * 8
return windowskin.get_pixel(x, y)
end
#--------------------------------------------------------------------------
# ● 獲取一般文字顏色
#--------------------------------------------------------------------------
def normal_color
return text_color(0)
end
#--------------------------------------------------------------------------
# ● 獲取系統文字顏色
#--------------------------------------------------------------------------
def system_color
return text_color(16)
end
#--------------------------------------------------------------------------
# ● 獲取危機文字顏色
#--------------------------------------------------------------------------
def crisis_color
return text_color(17)
end
#--------------------------------------------------------------------------
# ● 獲取戰鬥不能文字顏色
#--------------------------------------------------------------------------
def knockout_color
return text_color(18)
end
end
# 线条绘制脚本作者 Deathless
class Bitmap
#--------------------------------------------------------------------------
# ● 描绘直线
# x1，y1，x2，y2：直线两端的坐标
# width：宽度
# color：颜色
#--------------------------------------------------------------------------
def drawline(x1, y1, x2, y2, width, color)
x1 = x1.to_f
y1 = y1.to_f
x2 = x2.to_f
y2 = y2.to_f
width = width.to_f
k = (y2 - y1) / (x2 - x1)
if k.abs > 1
drawline_x(x1, y1, x2, y2, width, color)
else
drawline_y(x1, y1, x2, y2, width, color)
end
end
def drawline_x(x1, y1, x2, y2, width, color)
l = ((x1 - x2) ** 2 + (y1 - y2) ** 2) ** 0.5 * width / (y1 - y2)
length = l.abs * 2
k = (x2 - x1) / (y2 - y1) #x=ky+b
b = x1 - k * y1
if l > 0
for ty in y2.to_i..y1.to_i
tx = ty * k + b
fill_rect(tx - l, ty, length, 1, color)
end
else
for ty in y1.to_i..y2.to_i
tx = ty * k + b
fill_rect(tx + l, ty, length, 1, color)
end
end
end
def drawline_y(x1, y1, x2, y2, width, color)
l = ((x1 - x2) ** 2 + (y1 - y2) ** 2) ** 0.5 * width / (x1 - x2)
height = l.abs * 2
k = (y2 - y1) / (x2 - x1) #y=kx+b
b = y1 - k * x1
if l > 0
for tx in x2.to_i..x1.to_i
ty = tx * k + b
fill_rect(tx, ty - l, 1, height, color)
end
else
for tx in x1.to_i..x2.to_i
ty = tx * k + b
fill_rect(tx, ty + l, 1, height, color)
end
end
end
end

复制代码

效果图：

使用范例：
在事件中调用脚本:$scene = Scene_Try.new即可

class Scene_Try < Scene_Base
def start
@triangle = Triangle.new([10,40],[40, 40],[10, 100])
@i_triangle = Triangle_I.new([60, 10], 60)
@e_triangle = Triangle_E.new([110, 20], 60)
@triangle.print_name(100, 100)
@quadri = Quadri.new([10, 230], [20, 230], [70, 250], [10, 250])
@rectangle = Rectangle.new([80, 200], 100, 50)
@rhombus = Rhombus.new([10, 300], 100, 50)
@square = Square.new([150, 300], 30)
@quadri.print_name(175, 250)
end
end

复制代码

八云紫 · 发表于 2008-4-25 21:04:43

哦耶。最近画图形都画怕掉了。感觉还是C++好用点。至少还有提供现成的画画函数{/hx}。

顶一下先，然后坐坐沙发。哦呵呵~~~{/tp}

雪流星 · 发表于 2008-4-25 21:11:42

回帖回得那麽快{/gg}

八云紫 · 发表于 2008-4-25 21:34:14

目前没事做，让脑袋休息一下，所以就回的快了。{/hx}

也许是玩《东方风神录》练出来的快反应吧。哦呵呵~~~{/tp}

小幽的马甲 · 发表于 2008-4-26 21:14:34

从截图上来看，好像在边边角角的地方都有点出头……
好像最工整的就是那个矩形和正方形，不过左上也缺了1像素……
好吧我没测试过，我在抽风……

雪流星 · 发表于 2008-4-27 06:25:27

以下引用小幽的马甲于2008-4-26 13:14:34的发言：
从截图上来看，好像在边边角角的地方都有点出头……
好像最工整的就是那个矩形和正方形，不过左上也缺了1像素……
好吧我没测试过，我在抽风……

看来有必要修改一下画线脚本

小lim · 发表于 2008-4-27 15:26:05

提示: 作者被禁止或删除内容自动屏蔽

沉影不器 · 发表于 2008-4-27 19:48:52

提示: 作者被禁止或删除内容自动屏蔽

雪流星 · 发表于 2008-4-27 22:06:19

事实上椭圆和圆的公式是一样的
class Circle < Ellipse
只不过椭圆有 a b 两个参数和两个焦点
圆则是a == b 并且两个焦点重叠

看看怎麽画吧
先把正多边行画出来
还要修改画线後加减1像素的bug
修改BUG估计不难，大概是将首尾两点连接时的做边稍微修改一下就行了

柳之一 · 发表于 2008-5-1 04:42:33

class Bitmap
# 描绘圆
def draw_circle(a, b, r, color)
min = (-r / Math.sqrt(2)).round
max = ( r / Math.sqrt(2)).round
for x in min..max
y = Math.sqrt(r**2 - x**2)
set_pixel(x+a, y+b, color)
set_pixel(x+a, -y+b, color)
end
for y in min..max
x = Math.sqrt(r**2 - y**2)
set_pixel(x+a, y+b, color)
set_pixel(-x+a, y+b, color)
end
end
end

复制代码

class Bitmap
# 描绘椭圆
# 在矩形(x, y, width, height)里，用色color(Color)描绘椭圆。
def draw_oval(x, y, width, height, color)
a = width / 2
b = height / 2
x += a
y += b
xmax = a * 4 / 5 #这里可以进行更改
xmin = -xmax
ymax = (Math.sqrt((1 - xmax**2 / a**2.to_f) * b**2)).round
ymin = -ymax
for mx in xmin..xmax
my = Math.sqrt((1 - mx**2 / a**2.to_f) * b**2)
set_pixel(mx+x, my+y, color)
set_pixel(mx+x, -my+y, color)
end
for my in ymin..ymax
mx = Math.sqrt((1 - my**2 / b**2.to_f) * a**2)
set_pixel(mx+x, my+y, color)
set_pixel(-mx+x, my+y, color)
end
end
end

复制代码

帐号		自动登录	找回密码
密码			注册会员

几何图形绘制脚本 v0.8

加入我们，或者，欢迎回来。

贵宾

第1届Title华丽大赛新人奖

第3届短篇游戏大赛主流游戏组冠军