早上很忙。 一、/open/cmds/quest/quest_data/quest_data.c mob_record 已改好，进行测试，底下是 running 测试段 // 设定 questing("mob_record","set","laechan",({ob,"菲里德测试任务", "/u/l/laechan/area/felid/mob/lady1",30, "/u/l/laechan/area/felid/mob/older1",50})); // 读来看看会回传什麽 write(identify(questing("mob_record","query","laechan",({ob})))+"\n"); // 看一下实际设在玩家身上的东西 write("实际="+identify(ob->query_temp("mob_record"))+"\n"); // 模拟杀了一只 lady questing("mob_record","add","/u/l/laechan/area/felid/mob/lady1",({ob})); // 再读来看看会回传什麽 write(identify(questing("mob_record","query","laechan",({ob})))+"\n"); // 判断任务是否存在 write("任务存在判断回传值: "+ identify(questing("mob_record","check","laechan",({ob})))+"\n"); // 判断任务是否完成 write("任务是否完成回传值: "+ identify(questing("mob_record","finish","laechan",({ob})))+"\n"); 底下是执行结果 ========== 程式执行区 ========== 底下是 query 的结果，假设存成 tmps，则 tmps[0] 就是任务名称 而 tmps[1..n] 就是 ({"要杀的怪物的档名","预读的怪物名字",已杀,应杀 }) ({ "菲里德测试任务", ({ "/u/l/laechan/area/felid/mob/older1", "菲里德城民", 0, 50 }), ({ "/u/l/laechan/area/felid/mob/lady1", "王宫侍女", 0, 30 }) }) 而实际设在玩家身上的 mob_record 格式如下 以「任务标记」为 keyname，其底下有两种子 key "#name" 为固定名字的子 key，储存任务名字 其它的子 key 及内容就是 "要杀的怪物档名" : "##怪物名字##已杀/应杀", ([ "laechan":([ "/u/l/laechan/area/felid/mob/older1" : "##菲里德城民##0/50", "/u/l/laechan/area/felid/mob/lady1" : "##王宫侍女##0/30", "#name" : "菲里德测试任务" ]) ]) 底下是在模拟杀了一只怪後, 再以 query 读出内容 可以看到王宫侍女的已杀数量已从 0 变成 1 ({ "菲里德测试任务", ({ "/u/l/laechan/area/felid/mob/older1", "菲里德城民", 0, 50 }), ({ "/u/l/laechan/area/felid/mob/lady1", "王宫侍女", 1, 30 }), }) 任务存在判断回传值: 1 任务是否完成回传值: 0 ========== 程式执行区 ========== mob_record 的相关资料结构及呼叫语法如上，delete 同 check。 obj_record 也已改好，底下是 running 测试段 // 设定 questing("obj_record","set","laechan",({ob,"菲里德物品任务", "/u/l/laechan/area/felid/eq/earring1",1, "/u/l/laechan/area/felid/eq/brooch1",1})); // 读来看看会回传什麽 write(identify(questing("obj_record","query","laechan",({ob})))+"\n"); // 看一下实际设在玩家身上的东西 write("实际="+identify(ob->query_temp("obj_record"))+"\n"); // 模拟身上拿到了 earring 及 brooch clone_object("/u/l/laechan/area/felid/eq/earring1")->move(ob); clone_object("/u/l/laechan/area/felid/eq/brooch1")->move(ob); // 再读来看看会回传什麽 write(identify(questing("obj_record","query","laechan",({ob})))+"\n"); // 判断任务是否存在 write("任务存在判断回传值: "+ identify(questing("mob_record","check","laechan",({ob})))+"\n"); // 判断任务是否完成 write("任务是否完成回传值: "+ identify(questing("obj_record","finish","laechan",({ob})))+"\n"); 执行结果如下 ========== 程式执行区 ========== // 设好後以 query 语法读出来的东西如下, 类似 mob_record ({ "菲里德物品任务", ({ "/u/l/laechan/area/felid/eq/brooch1", "金玉胸针 ", 0, 1}), ({ "/u/l/laechan/area/felid/eq/earring1", "金玉耳饰 ", 0, 1 }), }) // 实际设在玩家身上的 obj_record 资料结构, 类似 mob_record ([ "laechan":([ "/u/l/laechan/area/felid/eq/brooch1" : "##金玉胸针 ##0/1", "#name" : "菲里德物品任务", "/u/l/laechan/area/felid/eq/earring1" : "##金玉耳饰 ##0/1", ]) ]) // 之後移了一个 brooch 及 earring 给玩家, 再 query // 从底下就可发现其已取得数量已经变成 1, 它是去跑 // foreach(obj in all_inventory(ppl)) 去实际取得的数量值 ({ "菲里德物品任务", ({ "/u/l/laechan/area/felid/eq/brooch1", "金玉胸针 ", 1, 1}), ({ "/u/l/laechan/area/felid/eq/earring1", "金玉耳饰 ", 1, 1 }), }) 任务存在判断回传值: 1 任务是否完成回传值: 1 ========== 程式执行区 ========== 二、/cmds/std/_quest.c 我写了一个 quest demo 语法，它会去侦测玩家有没有 mob_record 及 obj_record(不过侦测语法我写的不好) ，然後显示任务店的任务接取及达成情况，如下.. > quest demo quest demo: 你的任务店任务接取及完成状况如下... 杀怪任务: [菲里德杀死怪物任务] 王宫侍女 ( 0 / 30 只) 寻物任务: [菲里德搜集物品任务] 金玉耳饰 ( 0 / 5 个) 三、 --

※ 发信站: 批踢踢实业坊(ptt.cc) fixed. ※ 编辑: laechan 来自: 223.143.183.170 (05/11 16:36)