分享发现 兑换框架 (例子)

尘幕 · 2018年03月20日 · 最后由 尘幕 回复于 2020年02月03日 · 965 次阅读
本帖已被设为精华帖!

这是由6K基础代码制作的比例兑换框架

这是我某个制作失败游戏的基础代码,各位可以随意使用 地址http://www.iwzyx.com/chapters/2832

=:MD.钱1=0;MD.钱2=0;MD.钱3=0;MD.钱4=0;MD.钱5=11;

=:MD.池=0;MD.池容量=0

[财富] =:if(MD.池==0) MD.池等级="(1)枯池(/1):";

=:if(MD.池==1) MD.池等级="(4)灵池(/4):";

=:if(MD.池==2) MD.池等级="(2)仙元池(/2):";

=:if(MD.池==3) MD.池等级="(3)本源池(/3):";

=:if(MD.池==4) MD.池等级="(5)本源晶池(/5):";

[|]

财富 (5)本源晶钻(/5)(b)1(/b) (2)仙灵宝石(/2)(b)2(/b) (4)灵金币(/4)(b)3(/b) 法银元(b)4(/b) (1)赤铜子(/1)(b)5(/b) (b)6(/b)(j)MD.池等级(/j)(j)MD.池容量(/j)(2)点(/2) 选:凵 >:game_jumpto('本源晶钻'); 选:凵 >:game_jumpto('仙灵宝石'); 选:凵 >:game_jumpto('灵金币'); 选:凵 >:game_jumpto('法银元'); 选:凵 >:game_jumpto('赤铜子'); 选: + >:game_jumpto('池');

[池] =:if(MD.池==0) MD.池等级="(1)枯池(/1)";

=:if(MD.池==1) MD.池等级="(4)灵池(/4)";

=:if(MD.池==2) MD.池等级="(2)仙元池(/2)";

=:if(MD.池==3) MD.池等级="(3)本源池(/3)";

=:if(MD.池==4) MD.池等级="(5)本源晶池(/5):";

=:if(MD.池==0) MD.池升级介绍="需要1(4)百(/4)个银元来开辟(4)灵池(/4)";

=:if(MD.池==1) MD.池升级介绍="需要1(2)千(/2)个(4)灵金币(/4)来开辟(2)仙元池(/2)";

=:if(MD.池==2) MD.池升级介绍="需要1(2)千(/2)个(2)仙灵宝石(/2)来开辟(3)本源池(/3)";

=:if(MD.池==3) MD.池升级介绍=" 需要个(5)本源晶钻(/5)来开辟(5)本源晶池(/5)";

=:if(MD.池==4) MD.池升级介绍=" ";

[|]

(j)MD.池等级(/j) (j)MD.池容量(/j)(2)点(/2) (b)1(/b) (j)MD.池升级介绍(/j) (b)2(/b)(b)3(/b)(b)4(/b)(b)5(/b) 选: 蓄池 >:MD.池容量+=MD.钱1+MD.钱2*100000+MD.钱3*Math.pow(10,8)+MD.钱4*Math.pow(10,12)+MD.钱5*Math.pow(10,17);MD.钱1=MD.钱1-MD.钱1;MD.钱2=MD.钱2-MD.钱2;MD.钱3=MD.钱3-MD.钱3;MD.钱4=MD.钱4-MD.钱4;MD.钱5=MD.钱5-MD.钱5; game_jumpto('池'); 选: 升灵池 >:if(MD.钱2>=100)(MD.钱2-=100,MD.池+=1),game_createmsg("灵!", "3", "left", 1); game_jumpto('池'); <:if ( MD.池==1 ) curBtn = null;if ( MD.池==2 ) curBtn = null;if ( MD.池==3 ) curBtn = null;if ( MD.池==4 ) curBtn = null; 选: 升仙池 >:if(MD.钱3>=1000)(MD.钱3-=1000,MD.池+=1),game_createmsg("仙!", "3", "left", 1),game_createmsg("仙!!", "3", "left", 1); game_jumpto('池'); <:if ( MD.池==0 ) curBtn = null;if ( MD.池==2 ) curBtn = null;if ( MD.池==3 ) curBtn = null;if ( MD.池==4 ) curBtn = null; 选: 升源池 >:if(MD.钱4>=1000)(MD.钱4-=1000,MD.池+=1),game_createmsg("源!!", "3", "right", 1),game_createmsg("源!!", "3", "left", 1); game_jumpto('池'); <:if ( MD.池==0 ) curBtn = null;if ( MD.池==1 ) curBtn = null;if ( MD.池==3 ) curBtn = null;if ( MD.池==4 ) curBtn = null; 选: 升源晶池 >:if(MD.钱5>=10)(MD.钱5-=10,MD.池+=1),game_createmsg("本源!!!", "3", "left", 1),game_createmsg("本源!!!", "3", "right", 1),game_createmsg("本源!!!", "3", "left", 1);game_jumpto('池'); <:if ( MD.池==0 ) curBtn = null;if ( MD.池==1 ) curBtn = null;if ( MD.池==2 ) curBtn = null;if ( MD.池==4 ) curBtn = null; 选: 返回 >:game_jumpto('财富');

[本源晶钻]

=:if(MD.池<=2) MD.晶钻介绍=" 兑换需要(3)本源池(/3)";if(MD.池>2) MD.晶钻介绍=" ";

[|]

(5)本源晶钻(/5) (5)混沌生灵(/5)所拥有的(5)至尊物质(/5) (5)信息不详(/5) 价值:(5)十万万亿(/5) (5)现有本源晶钻:(j)MD.钱5(/j)颗(/5) (j)MD.晶钻介绍(/j) 兑:(b)1(/b)(b)2(/b)(b)3(/b) (b)6(/b)(j)MD.池等级(/j)(j)MD.池容量(/j)(2)点(/2) 选:1晶钻 >:if(MD.池容量>=Math.pow(10,17))(MD.池容量-=Math.pow(10,17),MD.钱5+=1);game_jumpto('本源晶钻'); <:if ( MD.池==0 ) curBtn = null;if ( MD.池==1 ) curBtn = null;if ( MD.池==2 ) curBtn = null; 选:百晶钻 >:if(MD.池容量>=Math.pow(10,19))(MD.池容量-=Math.pow(10,19),MD.钱5+=100);game_jumpto('本源晶钻'); <:if ( MD.池==0 ) curBtn = null;if ( MD.池==1 ) curBtn = null;if ( MD.池==2 ) curBtn = null;if ( MD.池==3 ) curBtn = null; 选:万晶钻 >:if(MD.池容量>=Math.pow(10,21))(MD.池容量-=Math.pow(10,21),MD.钱5+=10000);game_jumpto('本源晶钻'); <:if ( MD.池==0 ) curBtn = null;if ( MD.池==1 ) curBtn = null;if ( MD.池==2 ) curBtn = null;if ( MD.池==3 ) curBtn = null; 选:返回 >:game_jumpto('财富');

[仙灵宝石]

=:if(MD.池<=1) MD.宝石介绍=" 兑换需要(2)仙元池(/2)";if(MD.池>1) MD.宝石介绍=" ";

[|]

(2)仙灵宝石(/2) (3)大道级至尊(/3)所用的(3)顶级财富(/3) (3)道级交易(/3) 价值:(3)一万亿(/3) (3)现有仙灵宝石:(j)MD.钱4(/j)枚(/3) (j)MD.宝石介绍(/j) 兑:(b)1(/b)(b)2(/b)(b)3(/b) (b)6(/b)(j)MD.池等级(/j)(j)MD.池容量(/j)(2)点(/2) 选:1宝石 >:if(MD.池容量>=Math.pow(10,12))(MD.池容量-=Math.pow(10,12),MD.钱4+=1);game_jumpto('仙灵宝石'); <:if ( MD.池==0 ) curBtn = null;if ( MD.池==1 ) curBtn = null; 选:百宝石 >:if(MD.池容量>=Math.pow(10,14))(MD.池容量-=Math.pow(10,14),MD.钱4+=100);game_jumpto('仙灵宝石'); <:if ( MD.池==0 ) curBtn = null;if ( MD.池==1 ) curBtn = null; 选:万宝石 >:if(MD.池容量>=Math.pow(10,16))(MD.池容量-=Math.pow(10,16),MD.钱4+=10000);game_jumpto('仙灵宝石'); <:if ( MD.池==0 ) curBtn = null;if ( MD.池==1 ) curBtn = null;if ( MD.池==2 ) curBtn = null; 选:返回 >:game_jumpto('财富');

[灵金币]

=:if(MD.池<=0) MD.宝石介绍=" 兑换需要(4)灵池(/4)";if(MD.池>0) MD.宝石介绍=" ";

[|]

(4)灵金币(/4) (2)神魔级大能(/2)所用的(2)高级金钱(/2) (2)大能级交易(/2) 价值:(4)一亿(/4) (2)现有灵金币:(j)MD.钱3(/j)枚(/2) (j)MD.宝石介绍(/j) 兑:(b)1(/b)(b)2(/b)(b)3(/b) (b)6(/b)(j)MD.池等级(/j)(j)MD.池容量(/j)(2)点(/2) 选:1金币 >:if(MD.池容量>=Math.pow(10,8))(MD.池容量-=Math.pow(10,8),MD.钱3+=1);game_jumpto('灵金币'); <:if ( MD.池==0 ) curBtn = null; 选:百金币 >:if(MD.池容量>=Math.pow(10,10))(MD.池容量-=Math.pow(10,10),MD.钱3+=100);game_jumpto('灵金币'); <:if ( MD.池==0 ) curBtn = null; 选:万金币 >:if(MD.池容量>=Math.pow(10,12))(MD.池容量-=Math.pow(10,12),MD.钱3+=10000);game_jumpto('灵金币'); <:if ( MD.池==0 ) curBtn = null;if ( MD.池==1 ) curBtn = null; 选:返回 >:game_jumpto('财富');

[法银元] [|]

法银元 超凡强者所用的普通金钱 超凡交易 价值:十万 现有银元:(j)MD.钱2(/j)枚 兑:(b)1(/b)(b)2(/b)(b)3(/b) (b)6(/b)(j)MD.池等级(/j)(j)MD.池容量(/j)(2)点(/2) 选:1银元 >:if(MD.池容量>=Math.pow(10,5))(MD.池容量-=Math.pow(10,5),MD.钱2+=1);game_jumpto('法银元'); 选:百银元 >:if(MD.池容量>=Math.pow(10,7))(MD.池容量-=Math.pow(10,7),MD.钱2+=100);game_jumpto('法银元'); 选:万银元 >:if(MD.池容量>=Math.pow(10,9))(MD.池容量-=Math.pow(10,9),MD.钱2+=10000);game_jumpto('法银元'); <:if ( MD.池==0 ) curBtn = null; 选:返回 >:game_jumpto('财富');

[赤铜子] [|]

(1)赤铜子(/1) (1)凡人(/1)所用的(1)基础金钱(/1) (1)凡人交易(/1) 价值:(1)1(/1) (1)现有铜子:(j)MD.钱1(/j)枚(/1) 兑:(b)1(/b)(b)2(/b)(b)3(/b) (b)6(/b)(j)MD.池等级(/j)(j)MD.池容量(/j)(2)点(/2) 选:1铜子 >:if(MD.池容量>=1)(MD.池容量-=1,MD.钱1+=1);game_jumpto('赤铜子'); 选:百铜子 >:if(MD.池容量>=100)(MD.池容量-=100,MD.钱1+=100);game_jumpto('赤铜子'); 选:万铜子 >:if(MD.池容量>=10000)(MD.池容量-=10000,MD.钱1+=10000);game_jumpto('赤铜子'); 选:返回 >:game_jumpto('财富');

该例子的核心在于蓄池 它的意义就是中转站,调整数据 使数据多余的部分不浪费

共收到 3 条回复

蓄池的代码呢?

此贴作废,因排版问题,已无法修改,无法使用

需要 登录 后方可回复, 如果你还没有账号请点击这里 注册