多面板存储/基础操作系统~
只是一个基础操作系统而已。完全没有质量。
适合VJ新手练习用。
library MultiBoardDataSystem
constant function H2I takes handle h returns integer
return h
return 0
endfunction
//API==========================================================
struct MultiboardHash
static integer HashNum = 8190
static integer ConvertMBMove = 500
static integer ConvertXMove = 50//=MultiboardMaxCol
MultiboardHash head
MultiboardHash before
MultiboardHash next
integer key
integer value
static method Hash takes integer key returns integer
static method create takes integer key, integer value returns MultiboardHash
static method Get takes integer key returns MultiboardHash
method Delete takes nothing returns nothing
static method ConvertKey takes MultiBoard MB, integer x, integer y returns integer
endstruct
//Row,x行
//Col,y竖
//****
//****
//***&(3,4)(x=2,y=3)
struct MultiboardItem
static real InitWidth = 0.03
multiboarditem MBI
MultiboardHash Hash
MultiBoard MB
integer x
integer y
boolean showValue
boolean showIcon
string Value
string Icon
integer red
integer green
integer blue
integer alpha
real width
method SetStyle takes boolean showValue, boolean showIcon returns nothing
method SetValue takes string value returns nothing
method SetIcon takes string icon returns nothing
method SetValueColor takes integer red, integer green, integer blue, integer alpha returns nothing
method SetWidth takes real width returns nothing
static method create takes MultiBoard MB, integer x, integer y returns MultiboardItem
static method Get takes MultiBoard MB, integer x, integer y returns MultiboardItem
method Delete takes nothing returns nothing
method Clear takes nothing returns nothing
method Init takes nothing returns nothing
method Swap takes MultiboardItem other returns nothing
method CopyTo takes MultiboardItem other returns nothing
endstruct
struct MultiBoard
multiboard MB
MultiboardHash This
integer row
integer col
boolean show
boolean mini
string title
integer red
integer green
integer blue
integer alpha
static method ConvertKey takes multiboard mb returns integer
method Link takes nothing returns nothing
static method create takes multiboard mb, integer row, integer col returns MultiBoard
method Delete takes nothing returns nothing
static method Get takes multiboard mb returns MultiBoard
method Show takes boolean show returns nothing
method Mini takes boolean mini returns nothing
method SetTitle takes string title returns nothing
method SetColor takes integer red, integer green, integer blue, integer alpha returns nothing
method SetRow takes integer row returns nothing
method SetCol takes integer col returns nothing
method Clear takes nothing returns nothing
method Init takes nothing returns nothing
method Swap takes MultiBoard other returns nothing
method CopyTo takes MultiBoard other returns nothing
method SetAllItemsData takes boolean showValue, boolean showIcon, string value, string icon, integer red, integer green, integer blue, integer alpha, real width returns nothing
method SetAllStyle takes boolean showValue, boolean showIcon returns nothing
method SetAllValue takes string value returns nothing
method SetAllIcon takes string icon returns nothing
method SetAllColor takes integer red, integer green, integer blue, integer alpha returns nothing
method SetAllWidth takes real width returns nothing
endstruct
struct MultiboardRect
MultiBoard MB
integer x
integer y
integer row
integer col
MultiboardRect next
static method create takes MultiBoard MB, integer x, integer y, integer row, integer col returns MultiboardRect
method Swap takes MultiboardRect other returns nothing
method Clear takes nothing returns nothing
method Init takes nothing returns nothing
method CopyTo takes MultiboardRect other returns nothing
method SetAllItemsData takes boolean showValue, boolean showIcon, string value, string icon, integer red, integer green, integer blue, integer alpha, real width returns nothing
method SetAllStyle takes boolean showValue, boolean showIcon returns nothing
method SetAllValue takes string value returns nothing
method SetAllIcon takes string icon returns nothing
method SetAllColor takes integer red, integer green, integer blue, integer alpha returns nothing
method SetAllWidth takes real width returns nothing
endstruct
endlibrary 地图和代码。 vj真悲剧……
非常杯具 我一个都看不懂, 悲剧. 我只看到了开头用到return bug。。。
接着，后面对于刚入门J的我来说就迷茫了 换成1.24后所有vj都是悲剧，因为咱没支持1.24的pjass…… 引用第3楼eff于2009-10-11 19:30发表的:
非常杯具 http://bbs.islga.org/images/back.gif
?? 你永远不能战胜一个纯傻逼
因为他会把你的智商拉到和他一个水平上
然后用丰富的经验打败你
这个签名我很喜欢
页:
[1]