3125 發表於 2015-9-13 21:41:09

求解傳送腳本 怎加入類似這存地圖記錄這段

本帖最後由 3125 於 2015-9-13 09:42 PM 編輯

//------------ 快速傳送 ------------//
note:
      if( World_note_first == 0)
      {
                next;
                mes "【^33CC33MVP傳送人員^000000】";
                mes "尚未有傳送紀錄";
                close;
      }
      else
      {
                next;
                mes "【^33CC33MVP傳送人員^000000】";
                mes "您是否要傳送到";
                mes World_note_map$+" ?";
                menu
                "是",World_yes,
                "否",Bye;
      close;
      }
World_yes:
      warp World_note_map_set$,World_note_map_X,World_note_map_Y;      close;


//------------ 選擇加入我的最愛或是傳送 ------------//
AddorWarp:
      menu
                "^FF0000傳送" + .@tempMFMap$ + " ^000000",Warptomap,
                "^FF0000加入我的最愛^000000",AddFavorite,
                "^FF0000清除我的最愛^000000",MyFavoritesClear_World;
//------------------------傳送----------------------//
Warptomap:
      set      World_note_map_set$,.@WarpMap$;
      set      World_note_map$,.@tempMFMap$;
      set      World_note_first,1;
      set      World_note_map_X,.@WarpMapX;
      set      World_note_map_Y,.@WarpMapY;
      warp .@WarpMap$,.@WarpMapX,.@WarpMapY;
      close;
//-------------------加入我的最愛-------------------//
AddFavorite:
      Favorites_note(.@WarpMap$,.@tempMFMap$,      .@WarpMapX      ,      .@WarpMapY);
      goto Start;
      close;

MyFavorites:
                next;
                mes "【^33CC33MVP傳送人員^000000】";
                mes "請問您要傳送到哪裡呢?";
                select(Favorites_1$,Favorites_2$,Favorites_3$,"回最上層");
                switch(@menu)
                {
                        case 1:
                              goto WarpFavorites1;
                        case 2:
                              goto WarpFavorites2;
                        case 3:
                              goto WarpFavorites3;
                        case 4:
                              close2;
                              goto Start;
                }

WarpFavorites1:
      if( Favorites_1$ == "尚未新增" )
                goto ErrorChoose;
      warp Favorites_set_1$,Favorites_X_1,Favorites_Y_1;
      close;
WarpFavorites2:      
      if( Favorites_2$ == "尚未新增" )      
                goto ErrorChoose;
      warp Favorites_set_2$,Favorites_X_2,Favorites_Y_2;
      close;      
WarpFavorites3:               
      if( Favorites_3$ == "尚未新增" )
                goto ErrorChoose;
      warp Favorites_set_3$,Favorites_X_3,Favorites_Y_3;
      close;      
      
ErrorChoose:
      mes "【^33CC33MVP傳送人員^000000】";
      mes "尚未新增地圖";
      next;
      goto Start;
      
      
      
      
//------------ 刪除我的最愛 ------------//
MyFavoritesClear_World:
      next;
      mes "【^33CC33MVP傳送人員^000000】";
      mes "您是否要將我的最愛列表重置刪除?";
      select(Favorites_1$,Favorites_2$,Favorites_3$,"全部刪除","回最上層");
      switch(@menu)
      {
                case 1:
                        mes "【^33CC33MVP傳送人員^000000】";
                        mes "已刪除"+Favorites_1$;
                        set Favorites_set_1$,"尚未新增";
                        set Favorites_1$,"尚未新增";
                        next;
                        goto AddorWarp;
                case 2:
                        mes "【^33CC33MVP傳送人員^000000】";
                        mes "已刪除"+Favorites_1$;
                        set Favorites_set_2$,"尚未新增";
                        set Favorites_2$,"尚未新增";
                        next;
                        goto AddorWarp;
                case 3:
                        mes "【^33CC33MVP傳送人員^000000】";
                        mes "已刪除"+Favorites_1$;
                        set Favorites_set_3$,"尚未新增";
                        set Favorites_3$,"尚未新增";
                        next;
                        goto AddorWarp;
                case 4:
                        set Favorites_set_1$,"尚未新增";
                        set Favorites_1$,"尚未新增";               
                        set Favorites_set_2$,"尚未新增";
                        set Favorites_2$,"尚未新增";
                        set Favorites_set_3$,"尚未新增";
                        set Favorites_3$,"尚未新增";
                        goto Start;
                case 5:
                        close2;
                        goto Start;
                        
                }

OnInit:
      waitingroom "世界傳送服務員v3.0",0;
end;



function      Favorites_note      {      

      if(Favorites_set_1$ != getarg(0) && Favorites_set_2$ != getarg(0) )
      {
                if( Favorites_1$ == "尚未新增" )
                {
                        set Favorites_set_1$,getarg(0);
                        set Favorites_1$,getarg(1);
                        set Favorites_X_1,getarg(2);
                        set Favorites_Y_1,getarg(3);
                }
                else if( Favorites_2$ == "尚未新增")
                {
                        set Favorites_set_2$,getarg(0);
                        set Favorites_2$,getarg(1);
                        set Favorites_X_2,getarg(2);
                        set Favorites_Y_2,getarg(3);
                }
                else if( Favorites_3$ == "尚未新增" )
                {      
                        set Favorites_set_3$,getarg(0);
                        set Favorites_3$,getarg(1);
                        set Favorites_X_3,getarg(2);
                        set Favorites_Y_3,getarg(3);
                }
                else
                {
                        next;
                        mes "【^33CC33MVP傳送人員^000000】";
                        mes "我的最愛已滿,請移除後在重新新增。";
                        next;
                        return 0;
                }
                mes "【^33CC33MVP傳送人員^000000】";
                mes "已經儲存完成";
                next;
                return 0;
      }
      else
      {
                next;
                mes "【^33CC33MVP傳送人員^000000】";
                mes "重複登錄我的最愛,已存在列表中";
                next;
                return 0;
      }
}


}

dreamsambit@gma 發表於 2015-9-13 21:43:32

你說的是指哪段?
最愛地圖那段嗎?

3125 發表於 2015-9-13 22:00:56

dreamsambit@gma 發表於 2015-9-13 09:43 PM static/image/common/back.gif
你說的是指哪段?
最愛地圖那段嗎?

對 我要加入 這段 在我附件的新增文件記事本 請問要怎加入

Residue 發表於 2015-9-13 23:47:01

3125 發表於 2015-9-13 10:00 PM static/image/common/back.gif
對 我要加入 這段 在我附件的新增文件記事本 請問要怎加入

你是要加入這個 "我的最愛記憶傳送點的功能" 到你自己寫的腳本裡面嗎?

那你為何不直接用這個腳本就好?

你的腳本長什麼樣子功能是做什麼的都不知道要怎麼幫你加進去?

而且要加進去不就只是複製貼上而已嗎?

dreamsambit@gma 發表於 2015-9-14 00:56:12

3125 發表於 2015-9-13 10:00 PM static/image/common/back.gif
對 我要加入 這段 在我附件的新增文件記事本 請問要怎加入

要實現那種功能很簡單啊
找三個變數存數據就行了@@
頁: [1]
查看完整版本: 求解傳送腳本 怎加入類似這存地圖記錄這段