Jump to content

cook1e

Members
  • Posts

    129
  • Joined

  • Last visited

  • Days Won

    4

Posts posted by cook1e

  1. prontera,150,150,3 script pack 99,{
      .@unique_id$ = get_unique_id();
      mes "[Pack]";
      if(.@unique_id$) {
    	  mes "You already received this.";
    	  close;
      }
      mes "Do you want to receive your pack right now?";
      next;
        switch(select("Yes, please:No, Thanks!")) {
            case 1:
    			close2;
    			getitem 607,3;
    			.@unique_id$ = 1;
    			end;
            case 2:
                close;
    	}
    }

    I just added the unique_id check from gepard, you can add check for char or account to make it more secure.

  2. *hateffect(<Hat Effect ID>,<State>);
    
    This will set a Hat Effect onto the player. The state field allows you to
    enable (true) or disable (false) the effect on the player.
    The Hat Effect constants can be found in 'src/map/script_constants.hpp' starting
    with HAT_EF_*.
    
    Requires client 2015-05-13aRagEXE or newer.

    You should specify exactly what you want.... but here is the script command for hateffect.

  3. //===== brAthena =============================================
    //= Pac Poring
    //===== By: ==================================================
    //= Thor
    //===== Versão: ==============================================
    //= 2.0
    //===== Compativél com: ======================================
    //= brAthena
    //===== Descrição: ===========================================
    //
    // = 1.2: um nome fixo errado de NPC
    // = 1.3: Substituição de mobs ID
    // = 2.0: Alterado Nome do NPC para "Jelloping" Limpeza nos script
    //        e corrigido bugs que me informaram por e-mail!
    //
    //===== Comentários Adicionais: =================================
    //
    // Você é livre para modificá-lo como quiser! sem remover os
    // direitos do criador!
    //
    //================================================ ============
    //
    ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
    ////////////////////////////////////////////////////// Implantação ////////////////////////////////////////////////////
    ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
    //
    // * Em mob_db2, adicione: 
    //
    // 2506,DROPS,Aprendiz,Aprendiz,3,55,0,4,3,1,10,13,0,0,1,3,3,0,12,15,10,12,1,3,23,0x83,400,1372,672,480,0,0,0,0,0,0,0,0,909,7500,1602,80,938,500,512,1100,713,1700,512,800,620,20,0,0,0,0,0,0
    //
    // * Em mob_avail, adicione: 
    //
    // 2506,0,1,1,0,1201,0,0,0,0,0,0
    // 
    // * Em maps_athena.conf, adicione:
    // 
    // map: poring_s01
    // map: poring_s02
    // map: poring_s03
    // 
    // * Em map_index.txt, adicione:
    // 
    // poring_s01
    // poring_s02
    // poring_s03
    // 
    // * Em fogparametertable.txt, adicione:
    //
    // poring_s02.rsw#
    // 0.2#
    // 0.8#
    // 0x22ffccff#
    // 0.5#
    // poring_s01.rsw#
    // 0.23#
    // 0.9#
    // 0xffffffff#
    // 0.3#
    // poring_s03.rsw#
    // 0.1#
    // 0.1#
    // 0xffAA7755#
    // 0.1#
    //
    // * Em mapnametable.txt, adicione:
    //
    // poring_s01.rsw#PacPoring #
    // poring_s02.rsw#PacPoring #
    // poring_s03.rsw#PacPoring #
    //
    ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
    ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
    ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
    
    
    poring_s01,21,224,4	script	Jelloping#pacporing	909,{
    if (getgmlevel() >= .pacpopogmlevel) {
    	mes "^BF0073[Jelloping]^000000";
    	mes "O que você faz?";
    	next;
    	menu "Modo Player",-,"Resetar Ranking",L_reset;
    	}
    mes "^BF0073[Jelloping]^000000";
    mes "O Jellopy gigantes! O Jellopy gigantes em toda parte!";
    next;
    mes "^BF0073[Jelloping]^000000";
    mes "Eu não sei o que eu daria para voltar para aquele lugar ... Se apenas não havia todos estes monstros ...";
    next;
    menu "Regras",L_regles,"Ranking",L_scores,"Prêmios",L_reward,"Sair",L_leave;
    close;
    
    ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
    ///////////////////////////////////////////////////// Configuração ////////////////////////////////////////////////////
    ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
    OnInit:
    set [email protected],100; // Base de velocidade para mover multidões (que automaticamente aumenta em 3% por nível)
    set .pacpopogmlevel,60; // O nível mínimo para acessar o menu GM.
    set [email protected],7539; // ID do objeto para trocar os contras de résompenses (padrão: Poring Coin: 1, ganhou em cada nível)
    set [email protected]$,"Poring Coin"; // Nome do objeto
    set .pacpopotradeNum,3; // Numeros de [email protected] necessários para trocar uma recompensa
    set .recomp[1],0; // ID do primeiro prêmio
    set .recomp$[1],""; // nome do prêmio
    set .recomp[2],0; // ID do segundo prêmio
    set .recomp$[2],""; // etc...
    set .recomp[3],0;
    set .recomp$[3],"";
    set .recomp[4],0;
    set .recomp$[4],"";
    set .recomp[5],0;
    set .recomp$[5],"";
    set .recomp[6],0;
    set .recomp$[6],"";
    set .recomp[7],0;
    set .recomp$[7],"";
    set .recomp[8],0;
    set .recomp$[8],"";
    set .recomp[9],0;
    set .recomp$[9],"";
    set .recomp[10],0;
    set .recomp$[10],"";
    
    end;
    ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
    ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
    ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
    
    L_leave:
    warp "prt_fild08",158,325;
    end;
    
    L_reward:
    mes "^BF0073[Jelloping]^000000";
    mes "Eu posso compartilhar alguns contras recompensas "+.pacpopotradeNum+" "+[email protected]$+"s, você pode ganhar em cada passagem de nível.";
    mes "Que recompensa você quer?";
    next;
    switch(select(.recomp$[1],.recomp$[2],.recomp$[3],.recomp$[4],.recomp$[5],.recomp$[6],.recomp$[7],.recomp$[8],.recomp$[9],.recomp$[10],Cancelar)) {
    case 11:
    	mes "^BF0073[Jelloping]^000000";
    	mes "Como quiser!";
    	close;
    default:
    	mes "^BF0073[Jelloping]^000000";
    	if ( countitem([email protected]) < .pacpopotradeNum ) {
    		mes "Ah, me desculpe, mas você não tem o suficiente "+[email protected]$+"s. e "+.pacpopotradeNum+" pela recompensa!";
    		close;
    		}
    	mes "E isto é para você!";
    	getitem .recomp[@menu],1;
    	delitem [email protected],.pacpopotradeNum;
    	}
    close;
    
    L_regles:
    mes "^BF0073[Jelloping]^000000";
    mes "O objectivo é simples: basta engolir os mais gigantes Jellopies possível, evitando os Aprendizes que querem matá-lo, a única maneira de escapar deles é a engolir um dos bônus que te faz invencível.";
    next;
    mes "^BF0073[Jelloping]^000000";
    mes "A Cada Jellopy vale 1 pointo.";
    mes "Se você conseguir matar um Aprendiz, você ganha 5 pontos extra.";
    mes "Complete um nível por nível de 20 pontos.";
    mes "Em cada novo nível, o número de pontos atribuídos por aumentos Jellopy até 1.";
    next;
    mes "^BF0073[Jelloping]^000000";
    mes "E agora, sua vez agora!";
    close;
    
    L_scores:
    mes "^BF0073[Recordes]^000000";
    mes "Posição 1: "+$pacpopoNom1$+" com "+$pacpopoRecord1+" pontos.";
    mes "Posição 2: "+$pacpopoNom2$+" com "+$pacpopoRecord2+" pontos.";
    mes "Posição 3: "+$pacpopoNom3$+" com "+$pacpopoRecord3+" pontos.";
    mes "Posição 4: "+$pacpopoNom4$+" com "+$pacpopoRecord4+" pontos.";
    mes "Posição 5: "+$pacpopoNom5$+" com "+$pacpopoRecord5+" pontos.";
    close;
    
    L_reset:
    next;
    menu "Redefinir os últimos 4 lugares",L_reset3,"Restar tudo",-;
    set $pacpopoNom1$, "Pessoa";
    set $pacpopoRecord1,0;
    L_reset3:
    set $pacpopoNom2$, "Pessoa";
    set $pacpopoRecord2,0;
    set $pacpopoNom3$, "Pessoa";
    set $pacpopoRecord3,0;
    set $pacpopoNom4$, "Pessoa";
    set $pacpopoRecord4,0;
    set $pacpopoNom5$, "Pessoa";
    set $pacpopoRecord5,0;
    close;
    
    OnTimer180000:
    if (![email protected]) {
    	stopnpctimer;
    	end;
    	}
    if ([email protected] <= .PacPoringCount) {
    	areaannounce [email protected]$,76,24,161,132,"Parece que você está dormindo...",bc_blue;
    	donpcevent "Stomring#pacporingConfig::OnEnable";
    	stopnpctimer;
    	end;
    	}
    set .PacPoringCount,[email protected];
    OnCommenceTimer:
    initnpctimer;
    end;
    
    }
    
    poring_s01,17,223,4	script	Stomring#pacporingConfig	909,{
    end;
    
    L_meilleurScore:
    mapannounce [email protected]$,"Parabéns ao "+strcharinfo(0)+" que acaba de bater um recorde!",bc_all;
    set .@i,5;
    L_meilleurScoreLoop:
    if (getarg(0)==.@i) {
    	set getd("$pacpopoRecord"+.@i),[email protected];
    	set getd("$pacpopoNom"+.@i+"$"),strcharinfo(0);
    	return;
    	}
    else {
    	set getd("$pacpopoRecord"+.@i),getd("$pacpopoRecord"+(.@i-1));
    	set getd("$pacpopoNom"+.@i+"$"),getd("$pacpopoNom"+(.@i-1)+"$");
    	}
    if (.@i==1) return;
    set .@i,.@i-1;
    goto L_meilleurScoreLoop;
    
    OnCestFini:
    set [email protected], 0;
    donpcevent "::Onbooumpacpopo";
    OnCestFini2:
    if (!isloggedin([email protected])) goto OnEnable;
    attachrid([email protected]);
    set [email protected],[email protected]+[email protected];
    areaannounce [email protected]$,76,24,161,132,"Sua pontuação é de "+[email protected]+" pontos!",bc_blue;
    if ([email protected]>$pacpopoRecord1) callsub L_meilleurScore,1;
    else if ([email protected]>$pacpopoRecord2) callsub L_meilleurScore,2;
    else if ([email protected]>$pacpopoRecord3) callsub L_meilleurScore,3;
    else if ([email protected]>$pacpopoRecord4) callsub L_meilleurScore,4;
    else if ([email protected]>$pacpopoRecord5) callsub L_meilleurScore,5;
    OnEnable:
    donpcevent "::OnPacPoringEnable";
    goto OnEnableNext;
    
    OnInit:
    areawarp [email protected]$,76,24,161,132,"poring_s01",18,217;
    setarray [email protected][1],144,158,119,80,93,144;
    setarray [email protected][1],118,77,80,77,39,39;
    waitingroom "PacPoring - Sala de Espera",10,"Stomring#pacporingConfig::OnWaitStart",1;
    donpcevent "::OnPacPoringEnable";
    goto OnEnableNext2;
    
    OnEnableNextWin:
    set [email protected], 0;
    set .@tempscore,20*[email protected];
    set [email protected],[email protected]+.@tempscore;
    areaannounce [email protected]$,76,24,161,132,"Parabéns, você comeu o último Jellopy (+"+.@tempscore+" pontos)!",bc_blue;
    if (!isloggedin([email protected])) {
    	donpcevent "Stomring#pacporingConfig::OnEnable";
    	end;
    	}
    attachrid([email protected]);
    // recompensa inserir aqui
    getitem [email protected],1;
    sleep 1000;
    set [email protected],[email protected]+1;
    set .@j,[email protected]%3;
    if (!.@j) set .@j,3;
    set [email protected]$,"poring_s0"+.@j;
    set [email protected],[email protected]+1;
    set [email protected],[email protected]-(([email protected]*3)/100);
    if ([email protected]<25) set [email protected],25;
    set [email protected],[email protected]+[email protected];
    set [email protected], 0;
    areaannounce [email protected]$,76,24,161,132,"[ Nível "+[email protected]+" ]",bc_blue;
    sleep2 3000;
    if ([email protected]%3==1) set .@k$,"";
    if ([email protected]%3==2) set .@k$,"2";
    if ([email protected]%3==0) set .@k$,"3";
    donpcevent "#pacporingbonus1"+.@k$+"::OnEnable";
    donpcevent "#pacporingbonus2"+.@k$+"::OnEnable";
    donpcevent "#pacporingbonus3"+.@k$+"::OnEnable";
    donpcevent "::OnEnableNonopac";
    if (!isloggedin([email protected])) {
    	donpcevent "Stomring#pacporingConfig::OnEnable";
    	end;
    	}
    attachrid([email protected]);
    warp [email protected]$,118,119;
    set [email protected], 1;
    if ([email protected]==3) set [email protected],0;
    set [email protected],[email protected]+1;
    switch([email protected]) {
    case 1:
    	donpcevent "::OnPacPoringEnable";
    	break;
    case 2:
    	donpcevent "::On2PacPoringEnable";
    	break;
    case 3:
    	donpcevent "::On3PacPoringEnable";
    	break;
    
    	}
    end;
    
    OnRunAway:
    donpcevent "::OnEnableNonopac";
    end;
    
    OnEnableNext:
    sleep 5000;
    OnEnableNextWin2:
    if (isloggedin([email protected])) {
    	attachrid([email protected]);
    	atcommand "@speed 150";
    	undisguise;
    	if (!hp) atcommand "@alive";
    	}
    OnEnableNext2:
    donpcevent "::OnEnableNonopac";
    set [email protected], 0;
    set [email protected], 0;
    set [email protected], 0;
    set [email protected],0;
    set [email protected],1;
    set [email protected]$,"poring_s01";
    set [email protected],1;
    set [email protected],[email protected];
    donpcevent "#pacporingbonus0::OnBonusOver";
    areawarp [email protected]$,76,24,161,132,"poring_s01",18,217;
    initnpctimer;
    end;
    
    OnTimer10000:
    initnpctimer;
    if (getwaitingroomstate(0) && ![email protected]) goto L_warp;
    end;
    
    OnWaitStart:
    if ([email protected]) end;
    L_warp:
    set [email protected],1;
    donpcevent "::OnEnablePacBonus";
    donpcevent "::OnEnableNonopac";
    set [email protected], 1;
    set [email protected], 1;
    set [email protected], 0;
    donpcevent "::OnPacPoringEnable";
    warpwaitingpc "poring_s01",118,119,1;
    set [email protected],[email protected][0];
    attachrid([email protected][0]);
    set [email protected]$,rid2name([email protected][0]);
    misceffect 52;
    disguise 1002;
    atcommand "@speed 90";
    doevent "Jelloping#pacporing::OnCommenceTimer";
    end;
    
    }
    
    poring_s01,144,118,1	script	Aprendiz::pacporing1	2506,1,1,{
    end;
    
    OnTouch:
    if (![email protected]) {
    	stopnpctimer;
    	end;
    	}
    if ([email protected]) {
    	emotion 21,1;
    	misceffect 20;
    	disablenpc strnpcinfo(3);
    	set [email protected],[email protected]+5;
    	stopnpctimer;
    	sleep 30000;
    	enablenpc strnpcinfo(3);
    	movenpc strnpcinfo(3),getd(".x"+strnpcinfo(3)),getd(".y"+strnpcinfo(3));
    	npcspeed [email protected];
    	initnpctimer;
    	}
    else donpcevent "Stomring#pacporingConfig::OnCestFini";
    end;
    
    OnInit:
    getmapxy(getd(".m$"+strnpcinfo(3)),getd(".x"+strnpcinfo(3)),getd(".y"+strnpcinfo(3)),BL_NPC);
    end;
    
    OnEnableNonopac:
    getmapxy(.@m$,.@x,.@x,BL_NPC);
    if ( [email protected]$ != .@m$ ) end;
    enablenpc strnpcinfo(3);
    movenpc strnpcinfo(3),getd(".x"+strnpcinfo(3)),getd(".y"+strnpcinfo(3));
    npcspeed [email protected];
    initnpctimer;
    end;
    
    OnTimer500:
    if (![email protected]) {
    	stopnpctimer;
    	end;
    	}
    if ([email protected]) goto L_invincible;
    getmapxy(.@maplocation$,.@Xlocation,.@Ylocation,BL_PC,rid2name([email protected]));
    npcwalkto .@Xlocation,.@Ylocation;
    initnpctimer;
    end;
    
    L_invincible:
    // O jogador é invencível,(que se movem aleatoriamente)
    getmapxy(.@maplocation$,.@Xlocation,.@Ylocation,BL_NPC);
    set .@Xlocation2,rand(5);
    set .@Ylocation2,rand(5);
    set .@Xlocation,.@Xlocation+.@Xlocation2;
    set .@Ylocation,.@Ylocation+.@Ylocation2;
    if (checkcell(.@maplocation$,.@Xlocation,.@Ylocation,cell_walkable)) goto L_invincible;
    npcwalkto .@Xlocation,.@Ylocation;
    initnpctimer;
    end;
    
    Onbooumpacpopo:
    misceffect 1;
    stopnpctimer;
    if (!isloggedin([email protected])) end;
    attachrid([email protected]);
    getmapxy(.@m$,.@x,.@y,BL_NPC);
    npcskilleffect 5,0,.@x,.@y;
    percentheal -100,0;
    heal -1,0;
    emotion 32,1;
    end;
    
    }
    
    poring_s01,158,77,1	duplicate(pacporing1)	Aprendiz::pacporing2	2506,1,1
    poring_s01,119,80,1	duplicate(pacporing1)	Aprendiz::pacporing3	2506,1,1
    poring_s01,80,77,1	duplicate(pacporing1)	Aprendiz::pacporing4	2506,1,1
    poring_s01,93,39,1	duplicate(pacporing1)	Aprendiz::pacporing5	2506,1,1
    poring_s01,144,39,1	duplicate(pacporing1)	Aprendiz::pacporing6	2506,1,1
    
    poring_s02,144,118,1	duplicate(pacporing1)	Fantasma::pacporing12	1186,1,1
    poring_s02,158,77,1	duplicate(pacporing1)	Fantasma::pacporing22	1186,1,1
    poring_s02,119,80,1	duplicate(pacporing1)	Fantasma::pacporing32	1186,1,1
    poring_s02,80,77,1	duplicate(pacporing1)	Fantasma::pacporing42	1186,1,1
    poring_s02,93,39,1	duplicate(pacporing1)	Fantasma::pacporing52	1186,1,1
    poring_s02,144,39,1	duplicate(pacporing1)	Fantasma::pacporing62	1186,1,1
    
    poring_s03,144,118,1	duplicate(pacporing1)	Kasa::pacporing13	1833,1,1
    poring_s03,158,77,1	duplicate(pacporing1)	Kasa::pacporing23	1833,1,1
    poring_s03,119,80,1	duplicate(pacporing1)	Kasa::pacporing33	1833,1,1
    poring_s03,80,77,1	duplicate(pacporing1)	Kasa::pacporing43	1833,1,1
    poring_s03,93,39,1	duplicate(pacporing1)	Kasa::pacporing53	1833,1,1
    poring_s03,144,39,1	duplicate(pacporing1)	Kasa::pacporing63	1833,1,1
    
    poring_s01,1,1,1	script	#pacporingbonus0	-1,{
    end;
    
    OnBonus:
    if (![email protected]) end;
    initnpctimer;
    if ([email protected]) {
    	areaannounce [email protected]$,76,24,161,132,"Bônus! Agora você está invencível por mais 10 segundos!",bc_blue;
    	end;
    	}
    areaannounce [email protected]$,76,24,161,132,"Bônus! Agora você está invencível por 10 segundos!",bc_blue;
    set [email protected], 1;
    if (!isloggedin([email protected])) end;
    attachrid([email protected]);
    misceffect 35;
    end;
    
    OnTimer9000:
    areaannounce [email protected]$,76,24,161,132,"Atenção! Voltar ao normal em 1 segundo!",bc_blue;
    end;
    
    OnTimer10000:
    if (isloggedin([email protected])) {
    	attachrid([email protected]);
    	disguise 1002;
    	misceffect 52;
    	soundeffect "poring_die.wav",0;
    	}
    OnBonusOver:
    set [email protected], 0;
    stopnpctimer;
    end;
    
    }
    
    poring_s01,137,78,1	script	#pacporingbonus1	1951,2,2,{
    end;
    
    OnTouch:
    disguise 1582;
    donpcevent "#pacporingbonus0::OnBonus";
    disablenpc strnpcinfo(3);
    end;
    
    OnEnablePacBonus:
    enablenpc strnpcinfo(3);
    end;
    }
    
    poring_s01,100,78,1	duplicate(#pacporingbonus1)	#pacporingbonus2	1951,2,2
    poring_s01,119,38,1	duplicate(#pacporingbonus1)	#pacporingbonus3	1951,2,2
    
    poring_s02,137,78,1	duplicate(#pacporingbonus1)	#pacporingbonus12	1951,2,2
    poring_s02,100,78,1	duplicate(#pacporingbonus1)	#pacporingbonus22	1951,2,2
    poring_s02,119,38,1	duplicate(#pacporingbonus1)	#pacporingbonus32	1951,2,2
    
    poring_s03,137,78,1	duplicate(#pacporingbonus1)	#pacporingbonus13	1951,2,2
    poring_s03,100,78,1	duplicate(#pacporingbonus1)	#pacporingbonus23	1951,2,2
    poring_s03,119,38,1	duplicate(#pacporingbonus1)	#pacporingbonus33	1951,2,2
    
    
    poring_s01,1,1,1	script	#pacporing0	-1,3,3,{
    end;
    
    OnTouch:
    if (![email protected]) end;
    misceffect 52;
    soundeffect "siroma_move.wav",0;
    set [email protected],[email protected]+1*[email protected];
    if ([email protected] == 103*[email protected]) doevent "Stomring#pacporingConfig::OnEnableNextWin";
    emotion 3,1;
    OnPacPoringDisable:
    disablenpc strnpcinfo(3);
    end;
    
    OnPacPoringEnable:
    enablenpc strnpcinfo(3);
    end;
    
    }
    
    poring_s01,104,26,1	duplicate(#pacporing0)	#pacporing1	1952,2,2
    poring_s01,109,26,1	duplicate(#pacporing0)	#pacporing2	1952,2,2
    poring_s01,115,26,1	duplicate(#pacporing0)	#pacporing3	1952,2,2
    poring_s01,121,26,1	duplicate(#pacporing0)	#pacporing4	1952,2,2
    poring_s01,127,26,1	duplicate(#pacporing0)	#pacporing5	1952,2,2
    poring_s01,133,26,1	duplicate(#pacporing0)	#pacporing6	1952,2,2
    poring_s01,104,51,1	duplicate(#pacporing0)	#pacporing7	1952,2,2
    poring_s01,109,51,1	duplicate(#pacporing0)	#pacporing8	1952,2,2
    poring_s01,115,51,1	duplicate(#pacporing0)	#pacporing9	1952,2,2
    poring_s01,121,51,1	duplicate(#pacporing0)	#pacporing10	1952,2,2
    poring_s01,127,51,1	duplicate(#pacporing0)	#pacporing11	1952,2,2
    poring_s01,133,51,1	duplicate(#pacporing0)	#pacporing12	1952,2,2
    poring_s01,104,45,1	duplicate(#pacporing0)	#pacporing13	1952,2,2
    poring_s01,104,39,1	duplicate(#pacporing0)	#pacporing14	1952,2,2
    poring_s01,104,33,1	duplicate(#pacporing0)	#pacporing15	1952,2,2
    poring_s01,133,45,1	duplicate(#pacporing0)	#pacporing16	1952,2,2
    poring_s01,133,39,1	duplicate(#pacporing0)	#pacporing17	1952,2,2
    poring_s01,133,33,1	duplicate(#pacporing0)	#pacporing18	1952,2,2
    poring_s01,104,106,1	duplicate(#pacporing0)	#pacporing19	1952,2,2
    poring_s01,109,106,1	duplicate(#pacporing0)	#pacporing20	1952,2,2
    poring_s01,115,106,1	duplicate(#pacporing0)	#pacporing21	1952,2,2
    poring_s01,121,106,1	duplicate(#pacporing0)	#pacporing22	1952,2,2
    poring_s01,127,106,1	duplicate(#pacporing0)	#pacporing23	1952,2,2
    poring_s01,133,106,1	duplicate(#pacporing0)	#pacporing24	1952,2,2
    poring_s01,104,131,1	duplicate(#pacporing0)	#pacporing25	1952,2,2
    poring_s01,109,131,1	duplicate(#pacporing0)	#pacporing26	1952,2,2
    poring_s01,115,131,1	duplicate(#pacporing0)	#pacporing27	1952,2,2
    poring_s01,121,131,1	duplicate(#pacporing0)	#pacporing28	1952,2,2
    poring_s01,127,131,1	duplicate(#pacporing0)	#pacporing29	1952,2,2
    poring_s01,133,131,1	duplicate(#pacporing0)	#pacporing30	1952,2,2
    poring_s01,104,125,1	duplicate(#pacporing0)	#pacporing31	1952,2,2
    poring_s01,104,119,1	duplicate(#pacporing0)	#pacporing32	1952,2,2
    poring_s01,104,113,1	duplicate(#pacporing0)	#pacporing33	1952,2,2
    poring_s01,133,125,1	duplicate(#pacporing0)	#pacporing34	1952,2,2
    poring_s01,133,119,1	duplicate(#pacporing0)	#pacporing35	1952,2,2
    poring_s01,133,113,1	duplicate(#pacporing0)	#pacporing36	1952,2,2
    poring_s01,84,62,1	duplicate(#pacporing0)	#pacporing37	1952,2,2
    poring_s01,91,62,1	duplicate(#pacporing0)	#pacporing38	1952,2,2
    poring_s01,97,62,1	duplicate(#pacporing0)	#pacporing39	1952,2,2
    poring_s01,104,62,1	duplicate(#pacporing0)	#pacporing40	1952,2,2
    poring_s01,111,62,1	duplicate(#pacporing0)	#pacporing41	1952,2,2
    poring_s01,118,62,1	duplicate(#pacporing0)	#pacporing42	1952,2,2
    poring_s01,130,62,1	duplicate(#pacporing0)	#pacporing43	1952,2,2
    poring_s01,136,62,1	duplicate(#pacporing0)	#pacporing44	1952,2,2
    poring_s01,142,62,1	duplicate(#pacporing0)	#pacporing45	1952,2,2
    poring_s01,148,62,1	duplicate(#pacporing0)	#pacporing46	1952,2,2
    poring_s01,153,62,1	duplicate(#pacporing0)	#pacporing47	1952,2,2
    poring_s01,119,95,1	duplicate(#pacporing0)	#pacporing48	1952,2,2
    poring_s01,125,95,1	duplicate(#pacporing0)	#pacporing49	1952,2,2
    poring_s01,132,95,1	duplicate(#pacporing0)	#pacporing50	1952,2,2
    poring_s01,139,95,1	duplicate(#pacporing0)	#pacporing51	1952,2,2
    poring_s01,146,95,1	duplicate(#pacporing0)	#pacporing52	1952,2,2
    poring_s01,153,95,1	duplicate(#pacporing0)	#pacporing53	1952,2,2
    poring_s01,84,95,1	duplicate(#pacporing0)	#pacporing54	1952,2,2
    poring_s01,90,95,1	duplicate(#pacporing0)	#pacporing55	1952,2,2
    poring_s01,96,95,1	duplicate(#pacporing0)	#pacporing56	1952,2,2
    poring_s01,102,95,1	duplicate(#pacporing0)	#pacporing57	1952,2,2
    poring_s01,107,95,1	duplicate(#pacporing0)	#pacporing58	1952,2,2
    poring_s01,118,68,1	duplicate(#pacporing0)	#pacporing59	1952,2,2
    poring_s01,118,74,1	duplicate(#pacporing0)	#pacporing60	1952,2,2
    poring_s01,119,83,1	duplicate(#pacporing0)	#pacporing61	1952,2,2
    poring_s01,119,89,1	duplicate(#pacporing0)	#pacporing62	1952,2,2
    poring_s01,153,68,1	duplicate(#pacporing0)	#pacporing63	1952,2,2
    poring_s01,153,74,1	duplicate(#pacporing0)	#pacporing64	1952,2,2
    poring_s01,153,83,1	duplicate(#pacporing0)	#pacporing65	1952,2,2
    poring_s01,153,89,1	duplicate(#pacporing0)	#pacporing66	1952,2,2
    poring_s01,84,68,1	duplicate(#pacporing0)	#pacporing67	1952,2,2
    poring_s01,84,74,1	duplicate(#pacporing0)	#pacporing68	1952,2,2
    poring_s01,84,83,1	duplicate(#pacporing0)	#pacporing69	1952,2,2
    poring_s01,84,89,1	duplicate(#pacporing0)	#pacporing70	1952,2,2
    poring_s01,143,56,1	duplicate(#pacporing0)	#pacporing71	1952,2,2
    poring_s01,143,51,1	duplicate(#pacporing0)	#pacporing72	1952,2,2
    poring_s01,143,46,1	duplicate(#pacporing0)	#pacporing73	1952,2,2
    poring_s01,118,46,1	duplicate(#pacporing0)	#pacporing74	1952,2,2
    poring_s01,98,39,1	duplicate(#pacporing0)	#pacporing75	1952,2,2
    poring_s01,93,46,1	duplicate(#pacporing0)	#pacporing76	1952,2,2
    poring_s01,93,51,1	duplicate(#pacporing0)	#pacporing77	1952,2,2
    poring_s01,93,56,1	duplicate(#pacporing0)	#pacporing78	1952,2,2
    poring_s01,95,73,1	duplicate(#pacporing0)	#pacporing79	1952,2,2
    poring_s01,101,73,1	duplicate(#pacporing0)	#pacporing80	1952,2,2
    poring_s01,106,73,1	duplicate(#pacporing0)	#pacporing81	1952,2,2
    poring_s01,106,78,1	duplicate(#pacporing0)	#pacporing82	1952,2,2
    poring_s01,106,84,1	duplicate(#pacporing0)	#pacporing83	1952,2,2
    poring_s01,95,78,1	duplicate(#pacporing0)	#pacporing84	1952,2,2
    poring_s01,95,84,1	duplicate(#pacporing0)	#pacporing85	1952,2,2
    poring_s01,101,84,1	duplicate(#pacporing0)	#pacporing86	1952,2,2
    poring_s01,131,73,1	duplicate(#pacporing0)	#pacporing87	1952,2,2
    poring_s01,137,73,1	duplicate(#pacporing0)	#pacporing88	1952,2,2
    poring_s01,142,73,1	duplicate(#pacporing0)	#pacporing89	1952,2,2
    poring_s01,142,78,1	duplicate(#pacporing0)	#pacporing90	1952,2,2
    poring_s01,142,84,1	duplicate(#pacporing0)	#pacporing91	1952,2,2
    poring_s01,131,78,1	duplicate(#pacporing0)	#pacporing92	1952,2,2
    poring_s01,131,84,1	duplicate(#pacporing0)	#pacporing93	1952,2,2
    poring_s01,137,84,1	duplicate(#pacporing0)	#pacporing94	1952,2,2
    poring_s01,138,39,1	duplicate(#pacporing0)	#pacporing95	1952,2,2
    poring_s01,94,101,1	duplicate(#pacporing0)	#pacporing96	1952,2,2
    poring_s01,94,106,1	duplicate(#pacporing0)	#pacporing97	1952,2,2
    poring_s01,94,111,1	duplicate(#pacporing0)	#pacporing98	1952,2,2
    poring_s01,98,118,1	duplicate(#pacporing0)	#pacporing99	1952,2,2
    poring_s01,139,118,1	duplicate(#pacporing0)	#pacporing100	1952,2,2
    poring_s01,143,101,1	duplicate(#pacporing0)	#pacporing101	1952,2,2
    poring_s01,143,105,1	duplicate(#pacporing0)	#pacporing102	1952,2,2
    poring_s01,143,111,1	duplicate(#pacporing0)	#pacporing103	1952,2,2
    
    poring_s02,104,26,1	duplicate(#pacporing0)	#2pacporing1	1954,2,2
    poring_s02,109,26,1	duplicate(#pacporing0)	#2pacporing2	1954,2,2
    poring_s02,115,26,1	duplicate(#pacporing0)	#2pacporing3	1954,2,2
    poring_s02,121,26,1	duplicate(#pacporing0)	#2pacporing4	1954,2,2
    poring_s02,127,26,1	duplicate(#pacporing0)	#2pacporing5	1954,2,2
    poring_s02,133,26,1	duplicate(#pacporing0)	#2pacporing6	1954,2,2
    poring_s02,104,51,1	duplicate(#pacporing0)	#2pacporing7	1954,2,2
    poring_s02,109,51,1	duplicate(#pacporing0)	#2pacporing8	1954,2,2
    poring_s02,115,51,1	duplicate(#pacporing0)	#2pacporing9	1954,2,2
    poring_s02,121,51,1	duplicate(#pacporing0)	#2pacporing10	1954,2,2
    poring_s02,127,51,1	duplicate(#pacporing0)	#2pacporing11	1954,2,2
    poring_s02,133,51,1	duplicate(#pacporing0)	#2pacporing12	1954,2,2
    poring_s02,104,45,1	duplicate(#pacporing0)	#2pacporing13	1954,2,2
    poring_s02,104,39,1	duplicate(#pacporing0)	#2pacporing14	1954,2,2
    poring_s02,104,33,1	duplicate(#pacporing0)	#2pacporing15	1954,2,2
    poring_s02,133,45,1	duplicate(#pacporing0)	#2pacporing16	1954,2,2
    poring_s02,133,39,1	duplicate(#pacporing0)	#2pacporing17	1954,2,2
    poring_s02,133,33,1	duplicate(#pacporing0)	#2pacporing18	1954,2,2
    poring_s02,104,106,1	duplicate(#pacporing0)	#2pacporing19	1954,2,2
    poring_s02,109,106,1	duplicate(#pacporing0)	#2pacporing20	1954,2,2
    poring_s02,115,106,1	duplicate(#pacporing0)	#2pacporing21	1954,2,2
    poring_s02,121,106,1	duplicate(#pacporing0)	#2pacporing22	1954,2,2
    poring_s02,127,106,1	duplicate(#pacporing0)	#2pacporing23	1954,2,2
    poring_s02,133,106,1	duplicate(#pacporing0)	#2pacporing24	1954,2,2
    poring_s02,104,131,1	duplicate(#pacporing0)	#2pacporing25	1954,2,2
    poring_s02,109,131,1	duplicate(#pacporing0)	#2pacporing26	1954,2,2
    poring_s02,115,131,1	duplicate(#pacporing0)	#2pacporing27	1954,2,2
    poring_s02,121,131,1	duplicate(#pacporing0)	#2pacporing28	1954,2,2
    poring_s02,127,131,1	duplicate(#pacporing0)	#2pacporing29	1954,2,2
    poring_s02,133,131,1	duplicate(#pacporing0)	#2pacporing30	1954,2,2
    poring_s02,104,125,1	duplicate(#pacporing0)	#2pacporing31	1954,2,2
    poring_s02,104,119,1	duplicate(#pacporing0)	#2pacporing32	1954,2,2
    poring_s02,104,113,1	duplicate(#pacporing0)	#2pacporing33	1954,2,2
    poring_s02,133,125,1	duplicate(#pacporing0)	#2pacporing34	1954,2,2
    poring_s02,133,119,1	duplicate(#pacporing0)	#2pacporing35	1954,2,2
    poring_s02,133,113,1	duplicate(#pacporing0)	#2pacporing36	1954,2,2
    poring_s02,84,62,1	duplicate(#pacporing0)	#2pacporing37	1954,2,2
    poring_s02,91,62,1	duplicate(#pacporing0)	#2pacporing38	1954,2,2
    poring_s02,97,62,1	duplicate(#pacporing0)	#2pacporing39	1954,2,2
    poring_s02,104,62,1	duplicate(#pacporing0)	#2pacporing40	1954,2,2
    poring_s02,111,62,1	duplicate(#pacporing0)	#2pacporing41	1954,2,2
    poring_s02,118,62,1	duplicate(#pacporing0)	#2pacporing42	1954,2,2
    poring_s02,130,62,1	duplicate(#pacporing0)	#2pacporing43	1954,2,2
    poring_s02,136,62,1	duplicate(#pacporing0)	#2pacporing44	1954,2,2
    poring_s02,142,62,1	duplicate(#pacporing0)	#2pacporing45	1954,2,2
    poring_s02,148,62,1	duplicate(#pacporing0)	#2pacporing46	1954,2,2
    poring_s02,153,62,1	duplicate(#pacporing0)	#2pacporing47	1954,2,2
    poring_s02,119,95,1	duplicate(#pacporing0)	#2pacporing48	1954,2,2
    poring_s02,125,95,1	duplicate(#pacporing0)	#2pacporing49	1954,2,2
    poring_s02,132,95,1	duplicate(#pacporing0)	#2pacporing50	1954,2,2
    poring_s02,139,95,1	duplicate(#pacporing0)	#2pacporing51	1954,2,2
    poring_s02,146,95,1	duplicate(#pacporing0)	#2pacporing52	1954,2,2
    poring_s02,153,95,1	duplicate(#pacporing0)	#2pacporing53	1954,2,2
    poring_s02,84,95,1	duplicate(#pacporing0)	#2pacporing54	1954,2,2
    poring_s02,90,95,1	duplicate(#pacporing0)	#2pacporing55	1954,2,2
    poring_s02,96,95,1	duplicate(#pacporing0)	#2pacporing56	1954,2,2
    poring_s02,102,95,1	duplicate(#pacporing0)	#2pacporing57	1954,2,2
    poring_s02,107,95,1	duplicate(#pacporing0)	#2pacporing58	1954,2,2
    poring_s02,118,68,1	duplicate(#pacporing0)	#2pacporing59	1954,2,2
    poring_s02,118,74,1	duplicate(#pacporing0)	#2pacporing60	1954,2,2
    poring_s02,119,83,1	duplicate(#pacporing0)	#2pacporing61	1954,2,2
    poring_s02,119,89,1	duplicate(#pacporing0)	#2pacporing62	1954,2,2
    poring_s02,153,68,1	duplicate(#pacporing0)	#2pacporing63	1954,2,2
    poring_s02,153,74,1	duplicate(#pacporing0)	#2pacporing64	1954,2,2
    poring_s02,153,83,1	duplicate(#pacporing0)	#2pacporing65	1954,2,2
    poring_s02,153,89,1	duplicate(#pacporing0)	#2pacporing66	1954,2,2
    poring_s02,84,68,1	duplicate(#pacporing0)	#2pacporing67	1954,2,2
    poring_s02,84,74,1	duplicate(#pacporing0)	#2pacporing68	1954,2,2
    poring_s02,84,83,1	duplicate(#pacporing0)	#2pacporing69	1954,2,2
    poring_s02,84,89,1	duplicate(#pacporing0)	#2pacporing70	1954,2,2
    poring_s02,143,56,1	duplicate(#pacporing0)	#2pacporing71	1954,2,2
    poring_s02,143,51,1	duplicate(#pacporing0)	#2pacporing72	1954,2,2
    poring_s02,143,46,1	duplicate(#pacporing0)	#2pacporing73	1954,2,2
    poring_s02,118,46,1	duplicate(#pacporing0)	#2pacporing74	1954,2,2
    poring_s02,98,39,1	duplicate(#pacporing0)	#2pacporing75	1954,2,2
    poring_s02,93,46,1	duplicate(#pacporing0)	#2pacporing76	1954,2,2
    poring_s02,93,51,1	duplicate(#pacporing0)	#2pacporing77	1954,2,2
    poring_s02,93,56,1	duplicate(#pacporing0)	#2pacporing78	1954,2,2
    poring_s02,95,73,1	duplicate(#pacporing0)	#2pacporing79	1954,2,2
    poring_s02,101,73,1	duplicate(#pacporing0)	#2pacporing80	1954,2,2
    poring_s02,106,73,1	duplicate(#pacporing0)	#2pacporing81	1954,2,2
    poring_s02,106,78,1	duplicate(#pacporing0)	#2pacporing82	1954,2,2
    poring_s02,106,84,1	duplicate(#pacporing0)	#2pacporing83	1954,2,2
    poring_s02,95,78,1	duplicate(#pacporing0)	#2pacporing84	1954,2,2
    poring_s02,95,84,1	duplicate(#pacporing0)	#2pacporing85	1954,2,2
    poring_s02,101,84,1	duplicate(#pacporing0)	#2pacporing86	1954,2,2
    poring_s02,131,73,1	duplicate(#pacporing0)	#2pacporing87	1954,2,2
    poring_s02,137,73,1	duplicate(#pacporing0)	#2pacporing88	1954,2,2
    poring_s02,142,73,1	duplicate(#pacporing0)	#2pacporing89	1954,2,2
    poring_s02,142,78,1	duplicate(#pacporing0)	#2pacporing90	1954,2,2
    poring_s02,142,84,1	duplicate(#pacporing0)	#2pacporing91	1954,2,2
    poring_s02,131,78,1	duplicate(#pacporing0)	#2pacporing92	1954,2,2
    poring_s02,131,84,1	duplicate(#pacporing0)	#2pacporing93	1954,2,2
    poring_s02,137,84,1	duplicate(#pacporing0)	#2pacporing94	1954,2,2
    poring_s02,138,39,1	duplicate(#pacporing0)	#2pacporing95	1954,2,2
    poring_s02,94,101,1	duplicate(#pacporing0)	#2pacporing96	1954,2,2
    poring_s02,94,106,1	duplicate(#pacporing0)	#2pacporing97	1954,2,2
    poring_s02,94,111,1	duplicate(#pacporing0)	#2pacporing98	1954,2,2
    poring_s02,98,118,1	duplicate(#pacporing0)	#2pacporing99	1954,2,2
    poring_s02,139,118,1	duplicate(#pacporing0)	#2pacporing100	1954,2,2
    poring_s02,143,101,1	duplicate(#pacporing0)	#2pacporing101	1954,2,2
    poring_s02,143,105,1	duplicate(#pacporing0)	#2pacporing102	1954,2,2
    poring_s02,143,111,1	duplicate(#pacporing0)	#2pacporing103	1954,2,2
    
    poring_s03,104,26,1	duplicate(#pacporing0)	#3pacporing1	1953,2,2
    poring_s03,109,26,1	duplicate(#pacporing0)	#3pacporing2	1953,2,2
    poring_s03,115,26,1	duplicate(#pacporing0)	#3pacporing3	1953,2,2
    poring_s03,121,26,1	duplicate(#pacporing0)	#3pacporing4	1953,2,2
    poring_s03,127,26,1	duplicate(#pacporing0)	#3pacporing5	1953,2,2
    poring_s03,133,26,1	duplicate(#pacporing0)	#3pacporing6	1953,2,2
    poring_s03,104,51,1	duplicate(#pacporing0)	#3pacporing7	1953,2,2
    poring_s03,109,51,1	duplicate(#pacporing0)	#3pacporing8	1953,2,2
    poring_s03,115,51,1	duplicate(#pacporing0)	#3pacporing9	1953,2,2
    poring_s03,121,51,1	duplicate(#pacporing0)	#3pacporing10	1953,2,2
    poring_s03,127,51,1	duplicate(#pacporing0)	#3pacporing11	1953,2,2
    poring_s03,133,51,1	duplicate(#pacporing0)	#3pacporing12	1953,2,2
    poring_s03,104,45,1	duplicate(#pacporing0)	#3pacporing13	1953,2,2
    poring_s03,104,39,1	duplicate(#pacporing0)	#3pacporing14	1953,2,2
    poring_s03,104,33,1	duplicate(#pacporing0)	#3pacporing15	1953,2,2
    poring_s03,133,45,1	duplicate(#pacporing0)	#3pacporing16	1953,2,2
    poring_s03,133,39,1	duplicate(#pacporing0)	#3pacporing17	1953,2,2
    poring_s03,133,33,1	duplicate(#pacporing0)	#3pacporing18	1953,2,2
    poring_s03,104,106,1	duplicate(#pacporing0)	#3pacporing19	1953,2,2
    poring_s03,109,106,1	duplicate(#pacporing0)	#3pacporing20	1953,2,2
    poring_s03,115,106,1	duplicate(#pacporing0)	#3pacporing21	1953,2,2
    poring_s03,121,106,1	duplicate(#pacporing0)	#3pacporing22	1953,2,2
    poring_s03,127,106,1	duplicate(#pacporing0)	#3pacporing23	1953,2,2
    poring_s03,133,106,1	duplicate(#pacporing0)	#3pacporing24	1953,2,2
    poring_s03,104,131,1	duplicate(#pacporing0)	#3pacporing25	1953,2,2
    poring_s03,109,131,1	duplicate(#pacporing0)	#3pacporing26	1953,2,2
    poring_s03,115,131,1	duplicate(#pacporing0)	#3pacporing27	1953,2,2
    poring_s03,121,131,1	duplicate(#pacporing0)	#3pacporing28	1953,2,2
    poring_s03,127,131,1	duplicate(#pacporing0)	#3pacporing29	1953,2,2
    poring_s03,133,131,1	duplicate(#pacporing0)	#3pacporing30	1953,2,2
    poring_s03,104,125,1	duplicate(#pacporing0)	#3pacporing31	1953,2,2
    poring_s03,104,119,1	duplicate(#pacporing0)	#3pacporing32	1953,2,2
    poring_s03,104,113,1	duplicate(#pacporing0)	#3pacporing33	1953,2,2
    poring_s03,133,125,1	duplicate(#pacporing0)	#3pacporing34	1953,2,2
    poring_s03,133,119,1	duplicate(#pacporing0)	#3pacporing35	1953,2,2
    poring_s03,133,113,1	duplicate(#pacporing0)	#3pacporing36	1953,2,2
    poring_s03,84,62,1	duplicate(#pacporing0)	#3pacporing37	1953,2,2
    poring_s03,91,62,1	duplicate(#pacporing0)	#3pacporing38	1953,2,2
    poring_s03,97,62,1	duplicate(#pacporing0)	#3pacporing39	1953,2,2
    poring_s03,104,62,1	duplicate(#pacporing0)	#3pacporing40	1953,2,2
    poring_s03,111,62,1	duplicate(#pacporing0)	#3pacporing41	1953,2,2
    poring_s03,118,62,1	duplicate(#pacporing0)	#3pacporing42	1953,2,2
    poring_s03,130,62,1	duplicate(#pacporing0)	#3pacporing43	1953,2,2
    poring_s03,136,62,1	duplicate(#pacporing0)	#3pacporing44	1953,2,2
    poring_s03,142,62,1	duplicate(#pacporing0)	#3pacporing45	1953,2,2
    poring_s03,148,62,1	duplicate(#pacporing0)	#3pacporing46	1953,2,2
    poring_s03,153,62,1	duplicate(#pacporing0)	#3pacporing47	1953,2,2
    poring_s03,119,95,1	duplicate(#pacporing0)	#3pacporing48	1953,2,2
    poring_s03,125,95,1	duplicate(#pacporing0)	#3pacporing49	1953,2,2
    poring_s03,132,95,1	duplicate(#pacporing0)	#3pacporing50	1953,2,2
    poring_s03,139,95,1	duplicate(#pacporing0)	#3pacporing51	1953,2,2
    poring_s03,146,95,1	duplicate(#pacporing0)	#3pacporing52	1953,2,2
    poring_s03,153,95,1	duplicate(#pacporing0)	#3pacporing53	1953,2,2
    poring_s03,84,95,1	duplicate(#pacporing0)	#3pacporing54	1953,2,2
    poring_s03,90,95,1	duplicate(#pacporing0)	#3pacporing55	1953,2,2
    poring_s03,96,95,1	duplicate(#pacporing0)	#3pacporing56	1953,2,2
    poring_s03,102,95,1	duplicate(#pacporing0)	#3pacporing57	1953,2,2
    poring_s03,107,95,1	duplicate(#pacporing0)	#3pacporing58	1953,2,2
    poring_s03,118,68,1	duplicate(#pacporing0)	#3pacporing59	1953,2,2
    poring_s03,118,74,1	duplicate(#pacporing0)	#3pacporing60	1953,2,2
    poring_s03,119,83,1	duplicate(#pacporing0)	#3pacporing61	1953,2,2
    poring_s03,119,89,1	duplicate(#pacporing0)	#3pacporing62	1953,2,2
    poring_s03,153,68,1	duplicate(#pacporing0)	#3pacporing63	1953,2,2
    poring_s03,153,74,1	duplicate(#pacporing0)	#3pacporing64	1953,2,2
    poring_s03,153,83,1	duplicate(#pacporing0)	#3pacporing65	1953,2,2
    poring_s03,153,89,1	duplicate(#pacporing0)	#3pacporing66	1953,2,2
    poring_s03,84,68,1	duplicate(#pacporing0)	#3pacporing67	1953,2,2
    poring_s03,84,74,1	duplicate(#pacporing0)	#3pacporing68	1953,2,2
    poring_s03,84,83,1	duplicate(#pacporing0)	#3pacporing69	1953,2,2
    poring_s03,84,89,1	duplicate(#pacporing0)	#3pacporing70	1953,2,2
    poring_s03,143,56,1	duplicate(#pacporing0)	#3pacporing71	1953,2,2
    poring_s03,143,51,1	duplicate(#pacporing0)	#3pacporing72	1953,2,2
    poring_s03,143,46,1	duplicate(#pacporing0)	#3pacporing73	1953,2,2
    poring_s03,118,46,1	duplicate(#pacporing0)	#3pacporing74	1953,2,2
    poring_s03,98,39,1	duplicate(#pacporing0)	#3pacporing75	1953,2,2
    poring_s03,93,46,1	duplicate(#pacporing0)	#3pacporing76	1953,2,2
    poring_s03,93,51,1	duplicate(#pacporing0)	#3pacporing77	1953,2,2
    poring_s03,93,56,1	duplicate(#pacporing0)	#3pacporing78	1953,2,2
    poring_s03,95,73,1	duplicate(#pacporing0)	#3pacporing79	1953,2,2
    poring_s03,101,73,1	duplicate(#pacporing0)	#3pacporing80	1953,2,2
    poring_s03,106,73,1	duplicate(#pacporing0)	#3pacporing81	1953,2,2
    poring_s03,106,78,1	duplicate(#pacporing0)	#3pacporing82	1953,2,2
    poring_s03,106,84,1	duplicate(#pacporing0)	#3pacporing83	1953,2,2
    poring_s03,95,78,1	duplicate(#pacporing0)	#3pacporing84	1953,2,2
    poring_s03,95,84,1	duplicate(#pacporing0)	#3pacporing85	1953,2,2
    poring_s03,101,84,1	duplicate(#pacporing0)	#3pacporing86	1953,2,2
    poring_s03,131,73,1	duplicate(#pacporing0)	#3pacporing87	1953,2,2
    poring_s03,137,73,1	duplicate(#pacporing0)	#3pacporing88	1953,2,2
    poring_s03,142,73,1	duplicate(#pacporing0)	#3pacporing89	1953,2,2
    poring_s03,142,78,1	duplicate(#pacporing0)	#3pacporing90	1953,2,2
    poring_s03,142,84,1	duplicate(#pacporing0)	#3pacporing91	1953,2,2
    poring_s03,131,78,1	duplicate(#pacporing0)	#3pacporing92	1953,2,2
    poring_s03,131,84,1	duplicate(#pacporing0)	#3pacporing93	1953,2,2
    poring_s03,137,84,1	duplicate(#pacporing0)	#3pacporing94	1953,2,2
    poring_s03,138,39,1	duplicate(#pacporing0)	#3pacporing95	1953,2,2
    poring_s03,94,101,1	duplicate(#pacporing0)	#3pacporing96	1953,2,2
    poring_s03,94,106,1	duplicate(#pacporing0)	#3pacporing97	1953,2,2
    poring_s03,94,111,1	duplicate(#pacporing0)	#3pacporing98	1953,2,2
    poring_s03,98,118,1	duplicate(#pacporing0)	#3pacporing99	1953,2,2
    poring_s03,139,118,1	duplicate(#pacporing0)	#3pacporing100	1953,2,2
    poring_s03,143,101,1	duplicate(#pacporing0)	#3pacporing101	1953,2,2
    poring_s03,143,105,1	duplicate(#pacporing0)	#3pacporing102	1953,2,2
    poring_s03,143,111,1	duplicate(#pacporing0)	#3pacporing103	1953,2,2
    
    poring_s01	mapflag	nopenalty
    poring_s01	mapflag	nowarpto
    poring_s01	mapflag	noteleport
    poring_s01	mapflag	nosave
    poring_s01	mapflag	pvp	off
    poring_s01	mapflag	noreturn
    poring_s01	mapflag	nopenalty
    poring_s01	mapflag	noskill
    poring_s01	mapflag	nobranch
    poring_s01	mapflag	noicewall
    poring_s01	mapflag	leaves
    
    poring_s02	mapflag	nopenalty
    poring_s02	mapflag	nowarpto
    poring_s02	mapflag	noteleport
    poring_s02	mapflag	nosave
    poring_s02	mapflag	pvp	off
    poring_s02	mapflag	noreturn
    poring_s02	mapflag	nopenalty
    poring_s02	mapflag	noskill
    poring_s02	mapflag	nobranch
    poring_s02	mapflag	noicewall
    poring_s02	mapflag	clouds
    
    poring_s03	mapflag	nopenalty
    poring_s03	mapflag	nowarpto
    poring_s03	mapflag	noteleport
    poring_s03	mapflag	nosave
    poring_s03	mapflag	pvp	off
    poring_s03	mapflag	noreturn
    poring_s03	mapflag	nopenalty
    poring_s03	mapflag	noskill
    poring_s03	mapflag	nobranch
    poring_s03	mapflag	noicewall
    poring_s03	mapflag	fog
    
    
    prt_fild08,158,325,1	script	Boing#pacporing	909,{
    mes "^BF0073[Boing]^000000";
    mes "Jellopies de gigantes! Cheio de Jellopies gigantes! Eu achei o paraíso dos Porings!";
    next;
    mes "^BF0073[Boing]^000000";
    mes "Mas há também monstros ... Monstros em toda parte! Iniciante, com grandes dentes afiados todos! Mesmo fantasmas!";
    next;
    mes "^BF0073[Boing]^000000";
    mes "Ah ... Se apenas um grande aventureiro como você pode ajudar-nos...";
    next;
    menu "Ficar aqui",L_rester,"Ir para PacPoring",-;
    warp "poring_s01",18,217;
    end;
    
    L_rester:
    mes "^BF0073[Boing]^000000";
    mes "Meu jellopies... *snif*";
    close;
    
    OnTimer20000:
    getmapxy(.@m$,.@x,.@y,BL_NPC);
    set .@x,.@x+rand(0,6)-3;
    set .@y,.@y+rand(0,6)-3;
    if (!checkcell(.@m$,.@x,.@y,cell_chkpass)) goto OnTimer20000;
    npcwalkto .@x,.@y;
    if (!rand(15)) npctalk "Boing! Boing!";
    OnInit:
    initnpctimer;
    end;
    
    }

     

  4. mob_db.yml

      - Id: 3750
        AegisName: C_EMPERIUM
        Name: Emperium
        Level: 90
        Hp: 700
        Attack: 66
        Attack2: 13
        Defense: 64
        MagicDefense: 50
        Agi: 17
        Vit: 80
        Int: 50
        Dex: 26
        Luk: 20
        AttackRange: 1
        SkillRange: 10
        ChaseRange: 12
        Size: Small
        Race: Angel
        RaceGroups:
          Gvg: true
        Element: Holy
        ElementLevel: 1
        WalkSpeed: 300
        AttackDelay: 1288
        AttackMotion: 288
        DamageMotion: 384
        Class: Boss
        Modes:
          IgnoreMagic: true
          IgnoreMelee: true
          IgnoreMisc: true
          IgnoreRanged: true

    mob_avail.yml

      - Mob: C_EMPERIUM
        Sprite: EMPELIUM


    Una vez agregado esto cambia el ID del emperium en tu script de emperium breaker. ID: 3750

  5. function Go {
    	if(countitem(40004) < 1) {
    		mes "To use my service you need " +getitemname(40004);
    		close;
    	}
    	delitem 40004,1;
    	set lastwarp$, getarg(0);
    	set lastwarpx, getarg(1,0);
    	set lastwarpy, getarg(2,0);
    	warp getarg(0),getarg(1,0),getarg(2,0);
    	end;
    }

    If you add it here you don't have to add it on every warp label.

    • Upvote 1
  6. -	script	restrict_gm	-1,{
    OnPCLoadMapEvent:
    	if(getgroupid() == 4) {
    		for(.@i = 0; .@i < getarraysize(.map_list$); ++.@i) {
    			getmapxy(.@map$,.@x,.@y,BL_PC);
    			if(.@map$ == .map_list$[.@i]) {
    				dispbottom "You are not allowed in this map.";
    				if(.savepoint)
    					warp "SavePoint",0,0;
    				else
    					warp "prontera",155,180;
    				end;
    			}
    		}
    	}
    end;
    	
    OnInit:
    	.savepoint = true; // set to false if you don't want to warp gms to savepoint
    	setarray .map_list$, "map1", "map2"; // add maps you don't want your gms to warp
    	end;
    }
    
    map1	mapflag	loadevent
    map2	mapflag	loadevent
    
    // P.S: Every map you add in array .map_list$ needs a mapflag loadevent to work.

     

    • Love 1
  7. prontera,145,158,5    script    NFT Zone    757,{
    	mes "Would you like to go to to the NFT Zone?";
    	switch(select("Yes[^FF0000"+getmapusers("guild_vs5.gat")+"^000000]:No"))
    	{
    		case 1:
    			if(Class == 0 && BaseLevel <= 10)
    				warp "guild_vs5" ,50,50;
    			else
    				mes "I'm sorry but you need to be a Novice in order to enter this room.";
    			end;
    
    		case 2:
    			close;
    	}
    
    OnInit:
    	waitingroom "NFT Zone",0;
    	end;
    }
    guild_vs5	mapflag	nopenalty
    
    // Mob Spawn
    guild_vs5,0,0,0,0    monster    Gcash Plant    1750,300,0,0,0
    
    // Exit
    guild_vs5,49,49,5    script    Exit#1    790,{
    	warp "prontera",155,181;
    	end;
    OnInit:
    	waitingroom "Prontera",0,0;
    	end;
    }

     

     

    Didn't notice you also wanted to delete half of players items on die, here is the full script.

    prontera,145,158,5	script	NFT Zone	757,{
    	mes "Would you like to go to to the NFT Zone?";
    	switch(select("Yes[^FF0000"+getmapusers("guild_vs5.gat")+"^000000]:No"))
    	{
    		clear;
    		case 1:
    			if(Class == 0 && BaseLevel <= 10)
    				warp "guild_vs5" ,50,50;
    			else
    				mes "I'm sorry but you need to be a Novice in order to enter this room.";
    			end;
    
    		case 2:
    			close;
    	}
    end;
    	
    OnPCDieEvent:
    	for(.@i = 0; .@i < getarraysize(.map_list$); ++.@i) {
    		getmapxy(.@map$,.@x,.@y,BL_PC);
    		if(.@map$ == .map_list$[.@i]) {
    			if(Class == 0) {
    				getinventorylist;
    				for(.@i = 0;  .@i < @inventorylist_count; ++.@i) {
    					delitem @inventorylist_id[.@i],@inventorylist_amount[.@i]/2;
    				}
    			}
    		}
    	}
    end;
    	
    
    OnInit:
    	setarray .map_list$, "guild_vs5"; // List of maps items will be deleted
    	waitingroom "NFT Zone",0;
    	end;
    }
    guild_vs5	mapflag	nopenalty
    
    // Mob Spawn
    guild_vs5,0,0,0,0	monster	Gcash Plant	1750,300,0,0,0
    
    // Exit
    guild_vs5,49,49,5	script	Exit#1	790,{
    	warp "prontera",155,181;
    	end;
    OnInit:
    	waitingroom "Prontera",0,0;
    	end;
    }
  8. //===== rAthena Script ======================================= 
    //= Warper
    //===== Description: ========================================= 
    //= A complete - but very condensed - warper script.
    //===== Additional Comments: =================================
    //= 1.0 Initial script By [Euphy].
    //= 1.1 Added missing duplicates and fixed coordinates.
    //=     Some coordinates written by [Tekno-Kanix] and [ToastOfDoom].
    //= 1.2 Added new episodes and simplified functions.
    //= 1.3 Added Renewal checks and Instances menu.
    //=     Aligned coordinates with @go.
    //= 1.4 Added new Guild Dungeons.
    //= 1.4a Slight edits.
    //= 1.4b Added Wolfchev's Laboratory warp.
    //= 1.5 Added Lasagna ,Para Market ,WOE TE ,Instances and settings [sader1992].
    //= 1.5a Fix Bifrost Tower
    //============================================================
    
    -	script	Warper	-1,{
    function Go; function Disp; function Pick; function Restrict;
    
    // --------------------------------------------------
    //	Main Menu:
    // --------------------------------------------------
    
    menu	"Last Warp ^777777["+lastwarp$+"]^000000",-,
        	" ~ Towns",Towns,
        	" ~ Fields",Fields,
        	" ~ Dungeons",Dungeons,
        	" ~ Guild Castles",Castles,
        	" ~ Guild Dungeons",Guild_Dungeons,
        	" ~ Instances",Instances,
        	" ~ Special Areas",Special;
    
    	if (lastwarp$ == "")
    		message strcharinfo(0),"You haven't warped anywhere yet.";
    	else {
    		if(countitem(40004) < 1) {
    			mes "To use my service you need " +getitemname(40004);
    			close;
    		}
    		warp lastwarp$,lastwarpx,lastwarpy;
    	}
    	end;
    
    // ------------------- Functions -------------------
    // * Go("<map>",<x>,<y>);
    //	~ Warps directly to a map.
    //
    // * Disp("<Menu Option>",<first option>,<last option>);
    // * Pick("<map_prefix>"{,<index offset>});
    //	~ Dynamic menu and map selection (auto-numbered).
    //	~ Fields and Dungeons must use Disp and Pick Functions.
    //
    // * Disp("<Option 1>:<Option 2>:<etc.>");
    // * Pick("","<map1>","<map2>","<etc.>");
    //	~ Manual menu and map selection (listed).
    //
    // * Restrict("<RE | Pre-RE>"{,<menu option numbers>});
    //	~ Only allows map for Renewal or Pre-Renewal modes.
    //     If menu option numbers are given, only those maps
    //     will be restricted (i.e. not for "Go").
    //
    // Other notes:
    //   ~ Array @c[] holds all (x,y) coordinates.
    //   ~ Use @c[2] EXCEPT when maps begin dynamically
    //	  at 0: use @c[0] and Pick() offset 1.
    // --------------------------------------------------
    
    function Go {
    	if(countitem(40004) < 1) {
    		mes "To use my service you need " +getitemname(40004);
    		close;
    	}
    	set lastwarp$, getarg(0);
    	set lastwarpx, getarg(1,0);
    	set lastwarpy, getarg(2,0);
    	warp getarg(0),getarg(1,0),getarg(2,0);
    	end;
    }
    function Disp {
    	if (getargcount() < 3)
    		set @menu$, getarg(0);
    	else {
    		set @menu$,"";
    		for (set [email protected],getarg(1); [email protected]<=getarg(2); set [email protected],[email protected]+1)
    			set @menu$, @menu$+getarg(0)+" "[email protected]+":";
    	}
    	return;
    }
    function Pick {
    	set [email protected]_block,@warp_block;
    	set @warp_block,0;
    	if((@f && .OnlyFirstFld) || (@d && .OnlyFirstDun)){
    		set [email protected],1;
    		if([email protected]_block){
    			while([email protected]_block & (1<<[email protected])){
    				[email protected] += 1;
    			}
    		}
    	}else{
    		set [email protected], select(@menu$);
    	}
    	if (getarg(0) == "") {
    		set [email protected], [email protected];
    		set [email protected]$, getarg([email protected]);
    	} else {
    		set [email protected], [email protected](1,0);
    		set [email protected]$, getarg(0)+(([email protected]<10)?"0":"")[email protected];
    	}
    	if ([email protected]_block & (1<<[email protected])) {
    		message strcharinfo(0),"This map is not enabled in "+((checkre(0))?"":"Pre-")+"Renewal.";
    		end;
    	}
    	set [email protected], @c[[email protected]*2];
    	set [email protected], @c[[email protected]*2+1];
    	deletearray @c[0],getarraysize(@c);
    	@f = false; @d = false;
    	Go([email protected]$,[email protected],[email protected]);
    }
    function Restrict {
    	if ((getarg(0) == "RE" && !checkre(0)) || (getarg(0) == "Pre-RE" && checkre(0))) {
    		if (getarg(1,0)) {
    			set @warp_block,0;
    			for (set [email protected],1; [email protected]<getargcount(); set [email protected],[email protected]+1)
    				set @warp_block, @warp_block | (1<<getarg([email protected]));
    		} else {
    			message strcharinfo(0),"This map is not enabled in "+((checkre(0))?"":"Pre-")+"Renewal.";
    			end;
    		}
    	}
    	return;
    }
    
    // --------------------------------------------------
    	Towns:
    // --------------------------------------------------
    menu	"Prontera",T1, "Alberta",T2, "Aldebaran",T3, "Amatsu",T4, "Ayothaya",T5,
        	"Brasilis",T6, "Comodo",T7, "Dewata",T8, "Eclage",T9, "Einbech",T10, 
        	"Einbroch",T11, "El Dicastes",T12, "Geffen",T13, "Kunlun",T14, "Hugel",T15,
        	"Izlude",T16, "Jawaii",T17, "Lasagna",T18, "Lighthalzen",T19, "Luoyang",T20,
    		"Lutie",T21, "Malangdo",T22, "Malaya",T23, "Manuk",T24,
    		"Midgarts Expedition Camp",T25, "Mora",T26, "Morocc",T27, "Moscovia",T28,
    		"Nameless Island",T29, "Niflheim",T30, "Payon",T31, "Rachel",T32, "Splendide",T33,
    		"Thor Camp",T34, "Umbala",T35, "Veins",T36, "Juno",T37;
    
    T1: 
    	if (countitem(40004) < 0) { message strcharinfo(0),"You need 1 Warp Ticket to warp here."; close; }
    	else { delitem 40004,1; Go("prontera",155,180); }
    	
    	
    T2: Go("alberta",28,234);
    T3: Go("aldebaran",140,131);
    T4: Go("amatsu",198,84);
    T5: Go("ayothaya",208,166);
    T6: Restrict("RE");
    	Go("brasilis",196,217);
    T7: Go("comodo",209,143);
    T8: Restrict("RE");
    	Go("dewata",200,180);
    T9: Restrict("RE");
    	Go("ecl_in01",48,53);
    T10: Go("einbech",63,35);
    T11: Go("einbroch",64,200);
    T12: Restrict("RE");
    	 Go("dicastes01",198,187);
    T13: Go("geffen",119,59);
    T14: Go("gonryun",160,120);
    T15: Go("hugel",96,145);
    T16: Go("izlude",128,(checkre(3)?146:114));
    T17: Go("jawaii",251,132);
    T18: Restrict("RE");
    	 Go("lasagna",193,182);
    T19: Go("lighthalzen",158,92);
    T20: Go("louyang",217,100);
    T21: Go("xmas",147,134);
    T22: Restrict("RE");
    	 Go("malangdo",140,114);
    T23: Restrict("RE");
    	 Go("malaya",231,200);
    T24: Go("manuk",282,138);
    T25: Go("mid_camp",210,288);
    T26: Restrict("RE");
    	 Go("mora",55,146);
    T27: Go("morocc",156,93);
    T28: Go("moscovia",223,184);
    T29: Go("nameless_n",256,215);
    T30: Go("niflheim",202,174);
    T31: Go("payon",179,100);
    T32: Go("rachel",130,110);
    T33: Go("splendide",201,147);
    T34: Go("thor_camp",246,68);
    T35: Go("umbala",97,153);
    T36: Go("veins",216,123);
    T37: Go("yuno",157,51);
    
    // --------------------------------------------------
    	Fields:
    // --------------------------------------------------
    @f = true;
    menu	"Amatsu Fields",F1, "Ayothaya Fields",F2, "Bifrost Fields", F3,
        	"Brasilis Fields",F4, "Comodo Fields",F5, "Dewata Fields",F6,
        	"Eclage Fields",F7, "Einbroch Fields",F8, "El Dicastes Fields",F9,
        	"Geffen Fields",F10, "Kunlun Fields",F11, "Hugel Fields",F12,
    		"Lasagna Fields",F13, "Lighthalzen Fields",F14, "Luoyang Field",F15, 
    		"Lutie Field",F16, "Malaya Fields",F17, "Manuk Fields",F18, 
    		"Mjolnir Fields",F19, "Moscovia Fields",F20, "Niflheim Fields",F21, 
    		"Payon Forests",F22, "Prontera Fields",F23, "Rachel Fields",F24, 
    		"Sograt Deserts",F25, "Splendide Fields",F26, "Umbala Fields",F27, 
    		"Veins Fields",F28, "Juno Fields",F29;
    
    F1: setarray @c[2],190,197;
    	Disp("Amatsu Field",1,1); Pick("ama_fild");
    F2: setarray @c[2],173,134,212,150;
    	Disp("Ayothaya Field",1,2); Pick("ayo_fild");
    F3: Restrict("RE");
    	setarray @c[2],193,220,220,187;
    	Disp("Bifrost Field",1,2); Pick("bif_fild");
    F4: Restrict("RE");
    	setarray @c[2],74,32;
    	Disp("Brasilis Field",1,1); Pick("bra_fild");
    F5: Restrict("Pre-RE",5);
    	setarray @c[2],180,178,231,160,191,172,228,194,224,203,190,223,234,177,194,175,172,172;
    	Disp("Comodo Field",1,9); Pick("cmd_fild");
    F6: Restrict("RE");
    	setarray @c[2],371,212;
    	Disp("Dewata Field",1,1); Pick("dew_fild");
    F7: Restrict("RE");
    	setarray @c[2],97,314;
    	Disp("Eclage Field",1,1); Pick("ecl_fild");
    F8: Restrict("Pre-RE",2,10);
    	setarray @c[2],142,225,182,141,187,228,185,173,216,173,195,148,272,220,173,214,207,174,196,200;
    	Disp("Einbroch Field",1,10); Pick("ein_fild");
    F9: Restrict("RE");
    	setarray @c[2],143,132,143,217;
    	Disp("El Dicastes Field",1,2); Pick("dic_fild");
    F10: Restrict("Pre-RE",13,15);
    	 setarray @c[0],46,199,213,204,195,212,257,192,188,171,166,263,248,158,195,191,186,183,221,117,178,218,136,328,240,181,235,235,211,185;
    	 Disp("Geffen Field",0,14); Pick("gef_fild",1);
    F11: setarray @c[2],220,227;
    	 Disp("Kunlun Field",1,1); Pick("gon_fild");
    F12: Restrict("Pre-RE",3,7);
    	 setarray @c[2],268,101,222,193,232,185,252,189,196,106,216,220,227,197;
    	 Disp("Hugel Field",1,7); Pick("hu_fild");
    F13: Restrict("RE");
    	 setarray @c[2],344,371,20,98;
    	 Disp("Lasagna Field",1,2); Pick("lasa_fild");	 
    F14: setarray @c[2],240,179,185,235,240,226;
    	 Disp("Lighthalzen Field",1,3); Pick("lhz_fild");
    F15: setarray @c[2],229,187;
    	 Disp("Luoyang Field",1,1); Pick("lou_fild");
    F16: setarray @c[2],115,145;
    	 Disp("Lutie Field",1,1); Pick("xmas_fild");
    F17: Restrict("RE");
    	 setarray @c[2],40,272,207,180;
    	 Disp("Malaya Field",1,2); Pick("ma_fild");
    F18: setarray @c[2],35,236,35,262,84,365;
    	 Disp("Manuk Field",1,3); Pick("man_fild");
    F19: setarray @c[2],204,120,175,193,208,213,179,180,181,240,195,270,235,202,188,215,205,144,245,223,180,206,196,208;
    	 Disp("Mjolnir Field",1,12); Pick("mjolnir_");
    F20: setarray @c[2],82,104,131,147;
    	 Disp("Moscovia Field",1,2); Pick("mosk_fild");
    F21: setarray @c[2],215,229,167,234;
    	 Disp("Niflheim Field",1,2); Pick("nif_fild");
    F22: Restrict("Pre-RE",5,11);
    	 setarray @c[2],158,206,151,219,205,148,186,247,134,204,193,235,200,177,137,189,201,224,160,205,194,150;
    	 Disp("Payon Forest",1,11); Pick("pay_fild");
    F23: setarray @c[0],208,227,190,206,240,206,190,143,307,252,239,213,185,188,193,194,187,218,210,183,195,149,198,164;
    	 Disp("Prontera Field",0,11); Pick("prt_fild",1);
    F24: Restrict("Pre-RE",2,7,9,10,11,13);
    	 setarray @c[2],192,162,235,166,202,206,202,208,225,202,202,214,263,196,217,201,87,121,277,181,221,185,175,200,174,197;
    	 Disp("Rachel Field",1,13); Pick("ra_fild");
    F25: if(.Satan_Morocc){
    	 setarray @c[2],219,205,177,206,194,182,224,170,198,216,156,187,185,263,206,228,208,238,209,223,85,97,207,202,31,195,38,195;
    	 Disp("Sograt Desert 1:Sograt Desert 2:Sograt Desert 3:Sograt Desert 7:Sograt Desert 11:Sograt Desert 12:Sograt Desert 13:Sograt Desert 16:Sograt Desert 17:Sograt Desert 18:Sograt Desert 19:Sograt Desert 20:Sograt Desert 21:Sograt Desert 22");
    	 Pick("","moc_fild01","moc_fild02","moc_fild03","moc_fild07","moc_fild11","moc_fild12","moc_fild13","moc_fild16","moc_fild17","moc_fild18","moc_fild19","moc_fild20","moc_fild21","moc_fild22");
    	 }else{
    	 setarray @c[2],219,205,177,206,194,182,146,297,204,197,275,302,224,170,139,123,101,110,341,39,198,216,156,187,185,263,223,222,170,257,206,228,208,238,209,223,85,97;
    	 Disp("Sograt Desert",1,19); Pick("moc_fild");
    	 }
    F26: setarray @c[2],175,186,236,184,188,204;
    	 Disp("Splendide Field",1,3); Pick("spl_fild");
    F27: setarray @c[2],217,206,223,221,237,215,202,197;
    	 Disp("Umbala Field",1,4); Pick("um_fild");
    F28: Restrict("Pre-RE",5);
    	 setarray @c[2],186,175,196,370,222,45,51,250,202,324,150,223,149,307;
    	 Disp("Veins Field",1,7); Pick("ve_fild");
    F29: Restrict("Pre-RE",5,10);
    	 setarray @c[2],189,224,192,207,221,157,226,199,223,177,187,232,231,174,196,203,183,214,200,124,195,226,210,304;
    	 Disp("Juno Field",1,12); Pick("yuno_fild");
    
    // --------------------------------------------------
    	Dungeons:
    // --------------------------------------------------
    @d = true;
    menu	"Abyss Lakes",D1, "Amatsu Dungeon",D2, "Anthell",D3,
        	"Ayothaya Dungeon",D4, "Beach Dungeon",D5, "Bifrost Tower",D42,
        	"Bio Labs",D6, "Brasilis Dungeon",D7, "Byalan Dungeon",D8, "Clock Tower",D9,
        	"Coal Mines",D10, "Culvert",D11, "Cursed Abbey",D12, "Dewata Dungeon",D13,
        	"Einbroch Dungeon",D14, "Gefenia",D15, "Geffen Dungeon",D16,
        	"Glast Heim",D17, "Kunlun Dungeon",D18, "Hidden Dungeon",D19,
        	"Ice Dungeon",D20, "Juperos",D21, "Kiel Dungeon",D22, "Lasagna Dungeon",D23,
    		"Luoyang Dungeon",D24, "Magma Dungeon",D25, "Malangdo Dungeon",D26,
    		"Moscovia Dungeon",D27, "Nidhogg's Dungeon",D28, "Odin Temple",D29,
    		"Orc Dungeon",D30, "Payon Dungeon",D31, "Pyramids",D32, "Rachel Sanctuary",D33,
        	"Scaraba Hole",D34, "Sphinx",D35, "Sunken Ship",D36, "Thanatos Tower",D37,
        	"Thor Volcano",D38, "Toy Factory",D39, "Turtle Dungeon",D40, "Umbala Dungeon",D41;
    
    D1: setarray @c[2],261,272,275,270,116,27;
    	Disp("Abyss Lakes",1,3); Pick("abyss_");
    D2: setarray @c[2],228,11,34,41,119,14;
    	Disp("Amatsu Dungeon",1,3); Pick("ama_dun");
    D3: setarray @c[2],35,262,168,170;
    	Disp("Anthell",1,2); Pick("anthell");
    D4: setarray @c[2],275,19,24,26;
    	Disp("Ancient Shrine Maze:Inside Ancient Shrine"); Pick("ayo_dun");
    D5: setarray @c[2],266,67,255,244,23,260;
    	Disp("Beach Dungeon",1,3); Pick("","beach_dun","beach_dun2","beach_dun3");
    D6: Restrict("RE",4);
    	setarray @c[2],150,288,150,18,140,134,244,52;
    	Disp("Bio Lab",1,4); Pick("lhz_dun");
    D7: Restrict("RE");
    	setarray @c[2],87,47,262,262;
    	Disp("Brasilis Dungeon",1,2); Pick("bra_dun");
    D8: Restrict("RE",6);
    	setarray @c[0],168,168,253,252,236,204,32,63,26,27,141,187;
    	Disp("Byalan Dungeon",1,6); Pick("iz_dun",1);
    D9: setarray @c[2],199,159,148,283,65,147,56,155,297,25,127,169,277,178,268,74;
    	Disp("Clock Tower 1:Clock Tower 2:Clock Tower 3:Clock Tower 4:Basement 1:Basement 2:Basement 3:Basement 4");
    	Pick("","c_tower1","c_tower2","c_tower3","c_tower4","alde_dun01","alde_dun02","alde_dun03","alde_dun04");
    D10: setarray @c[2],52,17,381,343,302,262;
    	 Disp("Coal Mines",1,3); Pick("mjo_dun");
    D11: setarray @c[2],131,247,19,19,180,169,100,92;
    	 Disp("Culvert",1,4); Pick("","prt_sewb1","prt_sewb2","prt_sewb3","prt_sewb4");
    D12: setarray @c[2],51,14,150,11,120,10;
    	 Disp("Cursed Abbey",1,3); Pick("abbey");
    D13: Restrict("RE");
    	 setarray @c[2],285,160,299,29;
    	 Disp("Dewata Dungeon",1,2); Pick("dew_dun");
    D14: setarray @c[2],22,14,292,290;
    	 Disp("Einbroch Dungeon",1,2); Pick("ein_dun");
    D15: setarray @c[2],40,103,203,34,266,168,130,272;
    	 Disp("Gefenia",1,4); Pick("gefenia",0);
    D16: setarray @c[0],104,99,115,236,106,132,203,200;
    	 Disp("Geffen Dungeon",1,4); Pick("gef_dun",1);
    D17: setarray @c[2],370,304,199,29,104,25,150,15,157,287,147,15,258,255,108,291,171,283,68,277,156,7,12,7,133,271,224,274,14,70,150,14;
    	 Disp("Entrance:Castle 1:Castle 2:Chivalry 1:Chivalry 2:Churchyard:Culvert 1:Culvert 2:Culvert 3:Culvert 4:St. Abbey:Staircase Dungeon:Underground Cave 1:Underground Cave 2:Underground Prison 1:Underground Prison 2");
    	 Pick("","glast_01","gl_cas01","gl_cas02","gl_knt01","gl_knt02","gl_chyard","gl_sew01","gl_sew02","gl_sew03","gl_sew04","gl_church","gl_step","gl_dun01","gl_dun02","gl_prison","gl_prison1");
    D18: setarray @c[2],153,53,28,113,68,16;
    	 Disp("Kunlun Dungeon",1,3); Pick("gon_dun");
    D19: setarray @c[2],176,7,93,20,23,8;
    	 Disp("Hidden Dungeon",1,3); Pick("prt_maze");
    D20: setarray @c[2],157,14,151,155,149,22,33,158;
    	 Disp("Ice Dungeon",1,4); Pick("ice_dun");
    D21: setarray @c[2],140,51,53,247,37,63,150,285;
    	 Disp("Entrance:Juperos 1:Juperos 2:Core");
    	 Pick("","jupe_cave","juperos_01","juperos_02","jupe_core");
    D22: setarray @c[2],28,226,41,198;
    	 Disp("Kiel Dungeon",1,2); Pick("kh_dun");
    D23: Restrict("RE");
    	 setarray @c[2],24,143,22,171,190,18;
    	 Disp("Lasagna Dungeon",1,3); Pick("lasa_dun");
    D24: setarray @c[2],218,196,282,20,165,38;
    	 Disp("The Royal Tomb:Inside the Royal Tomb:Suei Long Gon"); Pick("lou_dun");
    D25: setarray @c[2],126,68,47,30;
    	 Disp("Magma Dungeon",1,2); Pick("mag_dun");
    D26: Restrict("RE");
    	 setarray @c[2],33,230;
    	 Disp("Malangdo Dungeon",1,1); Pick("mal_dun");
    D27: setarray @c[2],189,48,165,30,32,135;
    	 Disp("Moscovia Dungeon",1,3); Pick("mosk_dun");
    D28: setarray @c[2],61,239,60,271;
    	 Disp("Nidhogg's Dungeon",1,2); Pick("nyd_dun");
    D29: setarray @c[2],298,167,224,149,266,280;
    	 Disp("Odin Temple",1,3); Pick("odin_tem");
    D30: setarray @c[2],32,170,21,185;
    	 Disp("Orc Dungeon",1,2); Pick("orcsdun");
    D31: setarray @c[0],21,183,19,33,19,63,155,159,201,204;
    	 Disp("Payon Dungeon",1,5); Pick("pay_dun",1);
    D32: Restrict("RE",7,8);
    	 setarray @c[2],192,9,10,192,100,92,181,11,94,96,192,8,94,96,192,8;
    	 Disp("Pyramids 1:Pyramids 2:Pyramids 3:Pyramids 4:Basement 1:Basement 2:Basement 1 - Nightmare Mode:Basement 2 - Nightmare Mode");
    	 Pick("","moc_pryd01","moc_pryd02","moc_pryd03","moc_pryd04","moc_pryd05","moc_pryd06","moc_prydn1","moc_prydn2");
    D33: setarray @c[2],140,11,32,21,8,149,204,218,150,9;
    	 Disp("Rachel Sanctuary",1,5); Pick("ra_san");
    D34: Restrict("RE");
    	 setarray @c[2],364,44,101,141;
    	 Disp("Scaraba Hole",1,2); Pick("dic_dun");
    D35: setarray @c[2],288,9,149,81,210,54,10,222,100,99;
    	 Disp("Sphinx",1,5); Pick("","in_sphinx1","in_sphinx2","in_sphinx3","in_sphinx4","in_sphinx5");
    D36: setarray @c[2],69,24,102,27;
    	 Disp("Sunken Ship",1,2); Pick("treasure");
    D37: setarray @c[2],150,39,150,136,220,158,59,143,62,11,89,221,35,166,93,148,29,107,159,138,19,20,130,52;
    	 Disp("Thanatos Tower",1,12); Pick("tha_t");
    D38: setarray @c[2],21,228,75,205,34,272;
    	 Disp("Thor Volcano",1,3); Pick("thor_v");
    D39: setarray @c[2],205,15,129,133;
    	 Disp("Toy Factory",1,2); Pick("xmas_dun");
    D40: setarray @c[2],154,49,148,261,132,189,100,192;
    	 Disp("Entrance:Turtle Dungeon 1:Turtle Dungeon 2:Turtle Dungeon 3"); Pick("tur_dun");
    D41: Restrict("Pre-RE",1,2);
    	 setarray @c[2],42,31,48,30,204,78;
    	 Disp("Carpenter's Shop in the Tree:Passage to a Foreign World:Hvergermil's Fountain");
    	 Pick("","um_dun01","um_dun02","yggdrasil01");
    D42: Restrict("RE");
    	 setarray @c[2],57,13,64,88,45,14,26,23;
    	 Disp("Bifrost Tower",1,4); Pick("ecl_tdun");
    
    // --------------------------------------------------
    	Castles:
    // --------------------------------------------------
    menu	"[FE] Aldebaran Castles",C1, "[FE] Geffen Castles",C2, "[FE] Payon Castles",C3,
        	"[FE] Prontera Castles",C4, "[SE] Arunafeltz Castles",C5, "[SE] Schwarzwald Castles",C6,
    		"[TE] Aldebaran Castles",C7, "[TE] Prontera Castles",C8;
    
    C1: setarray @c[2],48,83,95,249,142,85,239,242,264,90;
    	Disp("Neuschwanstein:Hohenschwangau:Nuenberg:Wuerzburg:Rothenburg");
    	Pick("","alde_gld","alde_gld","alde_gld","alde_gld","alde_gld");
    C2: setarray @c[2],214,75,308,240,143,240,193,278,305,87;
    	Disp("Repherion:Eeyolbriggar:Yesnelph:Bergel:Mersetzdeitz");
    	Pick("","gef_fild13","gef_fild13","gef_fild13","gef_fild13","gef_fild13");
    C3: setarray @c[2],121,233,295,116,317,293,140,160,204,266;
    	Disp("Bright Arbor:Scarlet Palace:Holy Shadow:Sacred Altar:Bamboo Grove Hill");
    	Pick("","pay_gld","pay_gld","pay_gld","pay_gld","pay_gld");
    C4: setarray @c[2],134,65,240,128,153,137,111,240,208,240;
    	Disp("Kriemhild:Swanhild:Fadhgridh:Skoegul:Gondul");
    	Pick("","prt_gld","prt_gld","prt_gld","prt_gld","prt_gld");
    C5: setarray @c[2],158,272,83,47,68,155,299,345,292,107;
    	Disp("Mardol:Cyr:Horn:Gefn:Banadis");
    	Pick("","aru_gld","aru_gld","aru_gld","aru_gld","aru_gld");
    C6: setarray @c[2],293,100,288,252,97,196,137,90,71,315;
    	Disp("Himinn:Andlangr:Viblainn:Hljod:Skidbladnir");
    	Pick("","sch_gld","sch_gld","sch_gld","sch_gld","sch_gld");
    C7: Restrict("RE");
    	setarray @c[2],48,83,95,249,142,85,239,242,264,90;
    	Disp("Kafragarten 1:Kafragarten 2:Kafragarten 3:Kafragarten 4:Kafragarten 5");
    	Pick("","te_alde_gld","te_alde_gld","te_alde_gld","te_alde_gld","te_alde_gld");
    C8: Restrict("RE");
    	setarray @c[2],134,65,240,128,153,137,111,240,208,240;
    	Disp("Gloria 1:Gloria 2:Gloria 3:Gloria 4:Gloria 5");
    	Pick("","te_prt_gld","te_prt_gld","te_prt_gld","te_prt_gld","te_prt_gld");
    	
    // --------------------------------------------------
    	Guild_Dungeons:
    // --------------------------------------------------
    menu	"Baldur",G1, "Luina",G2, "Valkyrie",G3, "Britoniah",G4,
        	"Arunafeltz",G5, "Schwarzwald",G6, "Kafragarten",G7,
    		"Gloria",G8;
    
    G1: Restrict("RE",2,3);
    	setarray @c[2],119,93,119,93,120,130;
    	Disp("Baldur F1:Baldur F2:Hall of Abyss");
    	Pick("","gld_dun01","gld_dun01_2","gld2_pay");
    G2: Restrict("RE",2,3);
    	setarray @c[2],39,161,39,161,147,155;
    	Disp("Luina F1:Luina F2:Hall of Abyss");
    	Pick("","gld_dun02","gld_dun02_2","gld2_ald");
    G3: Restrict("RE",2,3);
    	setarray @c[2],50,44,50,44,140,132;
    	Disp("Valkyrie F1:Valkyrie F2:Hall of Abyss");
    	Pick("","gld_dun03","gld_dun03_2","gld2_prt");
    G4: Restrict("RE",2,3);
    	setarray @c[2],116,45,116,45,152,118;
    	Disp("Britoniah F1:Britoniah F2:Hall of Abyss");
    	Pick("","gld_dun04","gld_dun04_2","gld2_gef");
    G5: Go("arug_dun01",199,195);
    G6: Go("schg_dun01",200,124);
    G7: Restrict("RE");
    	Go("teg_dun01",42,36);
    G8: Restrict("RE");
    	Go("teg_dun02",26,160);
    
    // --------------------------------------------------
    	Instances:
    // --------------------------------------------------
    menu	"Bakonawa Lake",I1, "Bangungot Hospital 2F",I2, "Buwaya Cave",I3,
    		"Devil Tower",I4, "Eclage Interior",I5, "Endless Tower",I6,
    		"Faceworms Nest",I7, "Geffen Magic Tournament",I8, "Ghost Palace",I9,
    		"Hazy Forest",I10, "Horror Toy Factory",I11, "Malangdo Culvert",I12,
    		"Nidhoggur's Nest",I13, "Octopus Cave",I14, "Old Glast Heim",I15,
    		"Orc's Memory",I16, "Sarah and Fenrir",I17, "Sara Memory",I18,
    		"Sealed Shrine",I19, "Wolfchev's Laboratory",I20;
    
    I1: Restrict("RE");
    	Go("ma_scene01",172,175);
    I2: Restrict("RE");
    	Go("ma_dun01",151,8);
    I3: Restrict("RE");
    	Go("ma_fild02",316,317);
    I4: Restrict("RE");
    	Go("dali02",137,115);
    I5: Restrict("RE");
    	Go("ecl_hub01",129,12);
    I6: Go("e_tower",72,112);
    I7: Restrict("RE");
    	Go("dali",85,64);
    I8: Restrict("RE");
    	Go("dali",94,141);
    I9: Restrict("RE");
    	Go("dali02",46,128);
    I10: Restrict("RE");
    	Go("bif_fild01",161,334);
    I11: Restrict("RE");
    	Go("xmas",234,298);
    I12: Restrict("RE");
    	Go("mal_in01",164,21);
    I13: Go("nyd_dun02",95,193);
    I14: Restrict("RE");
    	Go("mal_dun01",152,230);
    I15: Restrict("RE");
    	Go("glast_01",204,268);
    I16: Go("gef_fild10",240,198);
    I17: Restrict("RE");
    	Go("dali02",92,141);
    I18: Restrict("RE");
    	Go("dali",133,108);
    I19: Go("monk_test",306,143);
    I20: Restrict("RE");
    	Go("lhz_dun04",148,269);
    
    // --------------------------------------------------
    	Special:
    // --------------------------------------------------
    menu	"Auction Hall",S1, "Battlegrounds",S2, "Casino",S3, "Dimensional Rift",S4,
    		"Eden Group Headquarters",S5, "Kunlun Arena",S6, "Izlude Arena",S7, 
    		"Monster Race Arena",S8, "Para Market",S9, "Turbo Track",S10;
    
    S1: Go("auction_01",22,68);
    S2: Go("bat_room",154,150);
    S3: Go("cmd_in02",179,129);
    S4: Restrict("RE");
    	Go("dali",113,82);	
    S5: Restrict("RE");
    	Go("moc_para01",31,14);
    S6: Go("gon_test",48,10);
    S7: Go("arena_room",100,88);
    S8: Go("p_track01",62,41);
    S9: Restrict("RE");
    	Go("paramk",97,17);
    S10: Go("turbo_room",99,114);
    
    OnInit:
    	.Satan_Morocc = true;	//	false will enable moc_fild 4,5,6,8,9,10,14,15 while disable moc_fild 20,21,22 Default is true.
    	.OnlyFirstFld = false;	//	true will teleport to the first level of the Fields  Default is false.
    	.OnlyFirstDun = false;	//	true will teleport to the first level of the Dungeons  Default is false.
    }
    
    // --------------------------------------------------
    //	Duplicates:
    // --------------------------------------------------
    neko_isle,77,122,4	duplicate(Warper)	Warper#mora	811
    //alb2trea,57,70,6	duplicate(Warper)	Warper#tre	811
    //alberta,28,240,4	duplicate(Warper)	Warper#alb	811
    //aldebaran,145,118,4	duplicate(Warper)	Warper#alde	811
    //amatsu,203,87,4	duplicate(Warper)	Warper#ama	811
    //ayothaya,209,169,6	duplicate(Warper)	Warper#ayo	811
    //comodo,194,158,4	duplicate(Warper)	Warper#com	811
    //einbech,59,38,6	duplicate(Warper)	Warper#einbe	811
    //einbroch,69,202,4	duplicate(Warper)	Warper#einbr	811
    //gef_fild10,71,339,4	duplicate(Warper)	Warper#orc	811
    //geffen,124,72,4	duplicate(Warper)	Warper#gef	811
    //glast_01,372,308,4	duplicate(Warper)	Warper#glh	811
    //gonryun,162,122,4	duplicate(Warper)	Warper#gon	811
    //hugel,101,151,4	duplicate(Warper)	Warper#hug	811
    //izlu2dun,110,92,4	duplicate(Warper)	Warper#izd	811
    //izlude,134,150,4	duplicate(Warper)	Warper#izl	811	//Pre-RE: (132,120)
    //jawaii,253,138,4	duplicate(Warper)	Warper#jaw	811
    //lighthalzen,162,102,4	duplicate(Warper)	Warper#lhz	811
    //louyang,208,103,6	duplicate(Warper)	Warper#lou	811
    //manuk,274,146,6	duplicate(Warper)	Warper#man	811
    //mid_camp,216,288,4	duplicate(Warper)	Warper#mid	811
    //mjolnir_02,85,364,4	duplicate(Warper)	Warper#mjo	811
    //moc_ruins,64,164,4	duplicate(Warper)	Warper#moc	811
    //morocc,159,97,4	duplicate(Warper)	Warper#mor	811
    //moscovia,229,191,4	duplicate(Warper)	Warper#mos	811
    //nameless_n,259,213,4	duplicate(Warper)	Warper#nam	811
    //niflheim,205,179,4	duplicate(Warper)	Warper#nif	811
    //pay_arche,42,134,4	duplicate(Warper)	Warper#arc	811
    //payon,182,108,4	duplicate(Warper)	Warper#pay	811
    //prontera,159,192,4	duplicate(Warper)	Warper#prt	811
    //prt_fild05,279,223,6	duplicate(Warper)	Warper#cul	811
    //rachel,135,116,4	duplicate(Warper)	Warper#rac	811
    //splendide,205,153,4	duplicate(Warper)	Warper#spl	811
    //thor_camp,249,76,4	duplicate(Warper)	Warper#thor	811
    //umbala,106,150,3	duplicate(Warper)	Warper#umb	811
    //veins,214,123,4	duplicate(Warper)	Warper#ve	811
    //xmas,150,136,6	duplicate(Warper)	Warper#xmas	811
    //yuno,162,47,4	duplicate(Warper)	Warper#yuno	811
    
    // --------------------------------------------------
    //	Duplicates (Renewal):
    // --------------------------------------------------
    //brasilis,201,222,4	duplicate(Warper)	Warper#bra	811
    //dewata,204,186,6	duplicate(Warper)	Warper#dew	811
    //dicastes01,194,194,6	duplicate(Warper)	Warper#dic	811
    //ecl_in01,51,60,4	duplicate(Warper)	Warper#ecl	811
    //lasagna,196,187,4	duplicate(Warper)	Warper#las	811
    //malangdo,134,117,6	duplicate(Warper)	Warper#mal	811
    //malaya,231,204,4	duplicate(Warper)	Warper#ma	811

     

  9. Group ID 2, Name Support have permisison all_commands: true and others Group ID inherits the permissions and commands from Support.

    For example Group ID 3 is inheriting all the commands and permissions from Group ID 2, Support.

     

    {
    	id: 3
    	name: "Script Manager"
    	inherit: ( "Support" )
    	level: 1
    	commands: {
    		tonpc: true
    		hidenpc: true
    		shownpc: true
    		loadnpc: true
    		unloadnpc: true
    		npcmove: true
    		addwarp: true
    	}
    	log_commands: true
    	permissions: {
    		any_warp: true
    	}
    },

     

    • Upvote 1
×
×
  • Create New...

Important Information

By using this site, you agree to our Terms of Use and Privacy Policy.