viewing paste Unknown #21240 | Athena

Posted on the
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55
-       script  SetCakeWall     -1,{
OnInit:
                        setwall "1@cake", 89, 185, 7, 6, false, "cakewall";
}
prontera,155,150,4      script  Cakering Instance#a     89,{
        .@md_name$ = "Cakering Instance";
        .@instance = instance_create( .@md_name$, getcharid( 3 ), IOT_CHAR);
        if( .@instance < 0 ) {
                dispbottom "Instance Failed.";
                end;
        }
 
        dispbottom "^0000ff" + .@md_name$ + "^000000- Attempting to create Cakering Instance.";
        if( instance_attachmap("1@cake",.@instance) == "" ) {
//      if( !instance_attachmap( "yuno_fild02", .@instance, 1, "1@cake" ) ) {
                instance_destroy( .@instance );
                dispbottom "Failed to attach yuno_fild02 as a map!";
                end;
        }
        if( instance_attachmap("2@cake",.@instance) == "" ) {
//      if( !instance_attachmap( "kh_vila", .@instance, 1, "2@cake" ) ) {
                instance_destroy( .@instance );
                dispbottom "Failed to attach 2@cake as a map!";
                end;
        }
 
        dispbottom "^0000ff" + .@md_name$ + " attempt successful!";
        instance_set_timeout( 3600, 300, .@instance );
        instance_init( .@instance );
        warp instance_mapname( "1@cake", .@instance ), 92,189;
        .@warped = 1;
        callfunc("OnCakeStart",.@instance);
        sleep2 2000;
        if(.@warped == 1) {
        callfunc ("CakeLVL1");
//      warp instance_mapname( "1@cake", .@instance ), 92, 189;
}
function        script  OnCakeStart     {
if( getarg(0,-1) > 0 ) {
 warp instance_mapname("1@cake",getarg(0)),92,189;
}
}
function        script  CakeLVL1        {
        .mob = 40; //total number of mobs
        areamonster "1@cake",97,108,128,76,"Antler",1765,1,strnpcinfo(0)+"::OnCake1";
        areamonster "1@cake",97,108,128,76,"[TL] False Angel",1371,25,strnpcinfo(0)+"::OnCake1";
        areamonster "8@wcd",97,108,128,76,"[TL] Arch Angeling",1388,5,strnpcinfo(0)+"::OnCake1";
        end;
OnCake1:
        .mob1--;
        if ( !.mob1 ) {
        enablenpc "#NPCNAME"
function        script  CakeWarp1       {
 
Viewed 392 times, submitted by unknown.