mud_sanc 板


LINE

都最後一天了看起来应没其他人要写我就直接发了。 程式位置: /u/d/dragondoll/question/q2.c 程式行数: 算这干嘛? 执行结果: 略 这题大概花了我看两节生理共笔的时间完成。 有些地方写的有点不满意,不过我也不想多花时间改了。 另,原则上不多做题目要求以外的容错判定。 inherit ROOM; void create() { ::create(); seteuid(getuid()); set("light",1); set("short","Test2"); set("long",@PLAIN PLAIN ); } void init() { add_action("test41","test2"); } mixed show_rearrange(mixed fa2) { int i,j; string msg=""; for(i=0;i<sizeof(fa2);i++) { for(j=0;j<sizeof(fa2[i]);j++) { if(j==4) { if(fa2[i][j]==" 爆!"){ msg = msg + HIR + fa2[i][j]+NOR; fa2[i][j]= HIR + fa2[i][j]+NOR;} else if(fa2[i][j]==" HOT"){ msg = msg + HIW + fa2[i][j]+NOR; fa2[i][j]= HIW + fa2[i][j]+NOR;} else msg = msg + fa2[i][j]; } else msg = msg + fa2[i][j]; } msg = msg + "\n"; } write(msg); return fa2; } int test41(string str) { string file,ss,msg; int i; mixed fa,fa2; file = read_file("/d/test2.txt"); fa = explode(file,"\n"); fa2=allocate(sizeof(fa)); msg = ""; for(i=0;i<sizeof(fa);i++) { ss = fa[i]; fa2[i]=allocate(6); fa2[i][0] = ss[0..9]; fa2[i][2] = ss[10..22]; fa2[i][1] = ss[23..27]; fa2[i][3] = ss[28..61]; fa2[i][4] = ss[62..66]; fa2[i][5] = ss[67..strlen(fa[i])-1]; //在这里只要改变数字的顺序就可以变 换显示了, 此处仅变换2, 3项 } fa2 = show_rearrange(fa2); fa2 = sort_array(fa2,"ig1",this_object()); write("依人气排序显示:\n"); show_rearrange(fa2); fa2 = sort_array(fa2,"ig2",this_object()); write("依类别排序显示:\n"); show_rearrange(fa2); fa2 = sort_array(fa2,"ig3",this_object()); write("依板名排序显示:\n"); show_rearrange(fa2); return 1; } int ig1(mixed a,mixed b) { int ax,bx; if(a[4]==HIR+" 爆!"+NOR)ax = 999; else if(a[4]==HIW+" HOT"+NOR)ax = 101; else ax=atoi(a[4]); if(b[4]==HIR+" 爆!"+NOR) bx = 999; else if(b[4]==HIW+" HOT"+NOR) bx = 101; else bx = atoi(b[4]); if(ax>bx)return 1; else if(ax<bx)return -1; else return 0; } int ig2(mixed a,mixed b) { if(a[1]=="类别 ")return -1; else if(b[1]=="类别 ")return 1; if(a[1]>b[1])return 1; else if(a[1]<b[1])return -1; else return 0; } int ig3(mixed a,mixed b) { string ax,bx; if(a[2]=="看 板 ")return -1; else if(b[2]=="看 板 ")return 1; ax = capitalize(a[2]); bx = capitalize(b[2]); if(ax>bx)return 1; else if(ax<bx)return -1; else return 0; } --



※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 123.194.152.155







like.gif 您可能会有兴趣的文章
icon.png[问题/行为] 猫晚上进房间会不会有憋尿问题
icon.pngRe: [闲聊] 选了错误的女孩成为魔法少女 XDDDDDDDDDD
icon.png[正妹] 瑞典 一张
icon.png[心得] EMS高领长版毛衣.墨小楼MC1002
icon.png[分享] 丹龙隔热纸GE55+33+22
icon.png[问题] 清洗洗衣机
icon.png[寻物] 窗台下的空间
icon.png[闲聊] 双极の女神1 木魔爵
icon.png[售车] 新竹 1997 march 1297cc 白色 四门
icon.png[讨论] 能从照片感受到摄影者心情吗
icon.png[狂贺] 贺贺贺贺 贺!岛村卯月!总选举NO.1
icon.png[难过] 羡慕白皮肤的女生
icon.png阅读文章
icon.png[黑特]
icon.png[问题] SBK S1安装於安全帽位置
icon.png[分享] 旧woo100绝版开箱!!
icon.pngRe: [无言] 关於小包卫生纸
icon.png[开箱] E5-2683V3 RX480Strix 快睿C1 简单测试
icon.png[心得] 苍の海贼龙 地狱 执行者16PT
icon.png[售车] 1999年Virage iO 1.8EXi
icon.png[心得] 挑战33 LV10 狮子座pt solo
icon.png[闲聊] 手把手教你不被桶之新手主购教学
icon.png[分享] Civic Type R 量产版官方照无预警流出
icon.png[售车] Golf 4 2.0 银色 自排
icon.png[出售] Graco提篮汽座(有底座)2000元诚可议
icon.png[问题] 请问补牙材质掉了还能再补吗?(台中半年内
icon.png[问题] 44th 单曲 生写竟然都给重复的啊啊!
icon.png[心得] 华南红卡/icash 核卡
icon.png[问题] 拔牙矫正这样正常吗
icon.png[赠送] 老莫高业 初业 102年版
icon.png[情报] 三大行动支付 本季掀战火
icon.png[宝宝] 博客来Amos水蜡笔5/1特价五折
icon.pngRe: [心得] 新鲜人一些面试分享
icon.png[心得] 苍の海贼龙 地狱 麒麟25PT
icon.pngRe: [闲聊] (君の名は。雷慎入) 君名二创漫画翻译
icon.pngRe: [闲聊] OGN中场影片:失踪人口局 (英文字幕)
icon.png[问题] 台湾大哥大4G讯号差
icon.png[出售] [全国]全新千寻侘草LED灯, 水草

请输入看板名称,例如:Boy-Girl站内搜寻

TOP