UID5338
帖子
精華
主題
積分51
現金
積極性
威望
違規
熱心
推廣次數
閱讀權限5
註冊時間2007-8-23
在線時間 小時
最後登錄1970-1-1
TA的每日心情 | 怒 2019-5-22 10:31 PM |
---|
簽到天數: 3 天 連續簽到: 2 天 [LV.2]偶爾看看I
|
本帖最後由 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;
- }
- }
- }
複製代碼 |
本帖子中包含更多資源
您需要 登錄 才可以下載或查看,沒有帳號?註冊
x
|