gebi.h

来自「C实现的MUD,对大家基本入门网络游戏很有帮助!」· C头文件 代码 · 共 149 行

#include <ansi.h>

int valid_leave(object me, string dir)
{
       if (dir == "north") me->add_temp("mark/step",1);
       if (dir == "south") me->add_temp("mark/steps",1); 
       if (dir == "east") me->add_temp("mark/step",-1); 
       if (dir == "west") me->add_temp("mark/steps",-1); 
        
       if(me->query_temp("mark/steps") == -5 &&
          me->query_temp("mark/step") == 6){
            me->move("/d/baituo/shanlu");
            me->delete_temp("mark/steps");
            me->delete_temp("mark/step");
            tell_room(environment(me), me->name()+"拖着疲惫不堪的身子从戈壁沙漠走了过来。\n",  ({ me }));  
            return notify_fail("突然你眼前出现了一坐小山，形状宛如驼峰。\n");
            return 1;
            }       
           
       if(me->query_temp("mark/steps") == -12 ){
            me->move(__DIR__"senlin");
            me->delete_temp("mark/steps");
            me->delete_temp("mark/step");
            tell_room(environment(me), me->name()+"拖着疲惫不堪的身子从戈壁沙漠走了过来。\n",  ({ me }));  
            return notify_fail("突然你走出了大戈壁，来到一森林处。\n");
            return 1;
            }       
           
       if(me->query_temp("mark/step") == 11){
            me->move(__DIR__"gebi5");
            me->delete_temp("mark/steps");
            me->delete_temp("mark/step");
            return 1;
            }  
       if(me->query_temp("mark/steps") == 11){
            me->move(__DIR__"room-ji");
            me->delete_temp("mark/steps");
            me->delete_temp("mark/step");
            tell_room(environment(me), me->name()+"拖着疲惫不堪的身子从戈壁沙漠走了过来。\n",  ({ me }));  
            return notify_fail("啊，出来了！你终于走出大戈壁了！\n");
            return 1;
            }  

       if((me->query_temp("mark/step") == 7 && me->query_temp("gc_n")) ||
          (me->query_temp("mark/steps") == -7 && me->query_temp("gc_w")) ||
          (me->query_temp("mark/steps") == 7 && me->query_temp("gc_s")) ||
          (me->query_temp("mark/step") == -7 && me->query_temp("gc_e"))){
            me->move(__DIR__"luzhou");
            me->delete_temp("mark/steps");
            me->delete_temp("mark/step");
            me->delete_temp("gc_n");
            me->delete_temp("gc_s");
            me->delete_temp("gc_w");
            me->delete_temp("gc_e");
            tell_room(environment(me), me->name()+"拖着疲惫不堪的身子从戈壁沙漠走了过来。\n",  ({ me }));  
            return notify_fail("运气真好，你找到了一处沙漠绿洲！\n");
                        return 1;
            }
 
       if((me->query_temp("mark/step") == 7 && me->query_temp("mark/steps") == 3 && 
           me->query_temp("mark/step") == -3 && me->query_temp("gc1_n")) ||
          (me->query_temp("mark/steps") == -7 && me->query_temp("mark/step") == -3 &&
           me->query_temp("mark/step") == 3 && me->query_temp("gc1_w")) ||
          (me->query_temp("mark/steps") == 7 && me->query_temp("mark/step") == -3 &&
           me->query_temp("mark/steps") == -3 && me->query_temp("gc1_s")) ||
          (me->query_temp("mark/step") == -7 && me->query_temp("mark/step") == 3 &&
           me->query_temp("mark/steps") == 3 && me->query_temp("gc1_e"))){
            me->move(__DIR__"shulin");
            me->delete_temp("mark/steps");
            me->delete_temp("mark/step");
            me->delete_temp("gc1_n");
            me->delete_temp("gc1_s");
            me->delete_temp("gc1_w");
            me->delete_temp("gc1_e");
            tell_room(environment(me), me->name()+"拖着疲惫不堪的身子从戈壁沙漠走了过来。\n",  ({ me }));  
            return notify_fail("咦，你发现这里已经不是戈壁沙漠了！\n");
            return 1;
            }       
        return ::valid_leave(me, dir);
}

void init()
{
       object me, *ob, *inv, ob1;
       string msg, msg1;
       int i, j;
       me = this_player();
       ob = all_inventory(environment(me));
       msg = YEL"\n突然一股疾风刮到，带著一大片黄沙，只吹得众人满口满鼻都是沙土，在无边无际的大沙漠之中，
在那遮天铺地的大风沙下，便如大海洋中的一叶小舟一般，只能听天由命，全无半分自主之力。\n"NOR;
       msg1 = HIR"你觉得自己已经筋疲力尽了，身上的黄沙却越堆越厚……\n"NOR;

       if(ob1 = present("bai shoujuan", me)){
          write(WHT"你依照白手绢上的提示，很快便走出了大戈壁。\n"NOR);
          me->move(__DIR__"caoyuan");
          destruct(ob1);
          me->delete_temp("mark/steps");
          me->delete_temp("mark/step");
          tell_room(environment(me), me->name()+"神秘兮兮地从戈壁沙漠走了过来。\n",  ({ me }));  
          write("突然你一不留神，白手绢被风吹走了！\n");
          return;
          }  
       if(userp(me)){ 
         if(me->query_temp("li_meet") == 2){
              message_vision(msg, me); 
              tell_object(me, msg1);
              me->delete_temp("mark/steps");
              me->delete_temp("mark/step"); 
              me->unconcious();             
              me->move(__DIR__"shulin");
              tell_room(environment(me), "突然一阵轻风吹过，好象有人在你背后出现！\n", ({ me }));  
              return;
              }
         else if(me->query("water") < 20) 
              { 
              message_vision(msg, me);              
              for(i=0; i<sizeof(ob); i++) {
                  tell_object(ob[i], msg1);
                  inv = all_inventory(ob[i]);
                    for(j = 0; j < sizeof(inv); j++){
                      if(!inv[j]->query("unique")) continue;
                       destruct(inv[j]);
                      }
                  ob[i]->unconcious();
                  ob[i]->move(__DIR__"caoyuan"+(1+random(7)));
                  tell_room(environment(ob[i]), HIR"突然一阵狂风吹过，掉下一个人来！\n"NOR,  ({ ob[i] }));  
                  ob[i]->delete_temp("mark/steps");
                  ob[i]->delete_temp("mark/step");
                  ob[i]->delete_temp("gc_n");
                  ob[i]->delete_temp("gc_s");
                  ob[i]->delete_temp("gc_w");
                  ob[i]->delete_temp("gc_e");
                  ob[i]->delete_temp("gc1_n");
                  ob[i]->delete_temp("gc1_s");
                  ob[i]->delete_temp("gc1_w");
                  ob[i]->delete_temp("gc1_e");
                  }
              return;
              }
         else if(me->query_skill("dodge", 1) <= 150) { 
              me->add("jingli", -15);
              me->add("water", -10);
              }
         else {
              me->add("jingli", -5);
              me->add("water", -5);
              }
      }
}