Jump to content

dnkip2

Members
  • Posts

    5
  • Joined

  • Last visited

Profile Information

  • Gender
    Not Telling
  • Location
    PH
  • Server
    None

Recent Profile Visitors

742 profile views

dnkip2's Achievements

Poring

Poring (1/15)

0

Reputation

  1. dnkip2

    Resizing GRF

    thanks, i will search it out.
  2. I have a afk script, but it gives me point in 20 mins instead of 30 mins. anyone can refigure it out? - script hourlypoints FAKE_NPC,{ OnInit: announce "[30 Minutes Points System]: The system have been reloaded, please relog again to get more points.", bc_all; .point_name$ = "Free Cash"; .point_amt = 1; // Normal points gained. .dlimit = 43200; // Stop points if afk greater then in seconds. 600s = 10 minutes .enable = 1; .level = 0; .online_time = 1800; // One hour = 3600 seconds bindatcmd "ht", "hourlypoints::OnAtcommand", 0, 100; end; OnPCLoginEvent: if (BaseLevel >= .level) { #idle = 0; @backup_time = 0; if (!#acctick || #acctick > .online_time) #acctick = gettimetick(2) + .online_time; else #acctick += gettimetick(2); while(.enable) { @idle_time = checkidle(); if (checkvending() >= 1 || checkchatting() == 1 || @idle_time >= .dlimit) { #acctick += @idle_time; // Add idle time #idle = 1; dispbottom "The 30 minutes points event haulted because you were vending, chatting, or idle."; dispbottom "Please relog again."; } else { sleep2 1000; @backup_time = .@time_left = #acctick - gettimetick(2); if (.@time_left <= 0) { #CASHPOINTS += .point_amt; #acctick = gettimetick(2) + .online_time; dispbottom "Gained " + .point_amt + " " + .point_name$ + ". Total " + #CASHPOINTS + " Free Cash."; } else { .@time_left = .online_time - .@time_left; .@Time$ = ""; .@Minutes = .@time_left / 60; .@time_left -= (.@Minutes * 60); if (.@Minutes > 1) .@Time$ += .@Minutes + " minutes, "; else if (.@Minutes > 0) .@Time$ += .@Minutes + " minute, "; if (.@time_left > 1 || .@time_left == 0) .@Time$ += .@time_left + " seconds"; else if (.@time_left == 1) .@Time$ += .@time_left + " second"; if (.@Minutes == 15 && .@time_left == 0 || .@Minutes == 30 && .@time_left == 0 || .@Minutes == 45 && .@time_left == 0) dispbottom "You spend a total of [" + .@Time$ + "] playing."; } } if (#idle) break; } } end; OnPCLogoutEvent: // BackUP online time if (BaseLevel >= .level) { if (@backup_time) #acctick = @backup_time; } end; OnAtcommand: if (BaseLevel >= .level) { if (#idle) { .@Time$ = ""; .@Minutes = @idle_time / 60; .@time_left = @idle_time - (.@Minutes * 60); if (.@Minutes > 1) .@Time$ += .@Minutes + " minutes, "; else if (.@Minutes > 0) .@Time$ += .@Minutes + " minute, "; if (.@time_left > 1 || .@time_left == 0) .@Time$ += .@time_left + " seconds"; else if (.@time_left == 1) .@Time$ += .@time_left + " second"; dispbottom "You been idle for " + .@Time$ + ". Please relog again."; } else { .@time_left = @backup_time; .@Time$ = ""; .@Minutes = .@time_left / 60; .@time_left -= (.@Minutes * 60); if (.@Minutes > 1) .@Time$ += .@Minutes + " minutes, "; else if (.@Minutes > 0) .@Time$ += .@Minutes + " minute, "; if (.@time_left > 1 || .@time_left == 0) .@Time$ += .@time_left + " seconds"; else if (.@time_left == 1) .@Time$ += .@time_left + " second"; dispbottom "You have [" + .@Time$ + "] left in able to gain a cash points."; } } end; }
  3. Since my event script has no reward after the event. I want it to have a NPC giving reward to the players who join the event, perhaps i want it in the WOE too. This is my event script. poring_w02,99,194,3 script Events 793,{ if(getgmlevel() < 1 ) end; mes "Hello there GM " + strcharinfo(0) + " !"; next; set .menu$, select(.gm_menu$); switch(.menu$) { case 1: // Question & Answer next; mes "I will now create warps, announce, & warp you."; close2; warp "quiz_02",45,366; Announce "There will be a 'Question & Answer' Event Held!",bc_all | bc_blue; sleep2 5000; Announce "If you want to join, the warp will be open in Prontera. It will be open for 1 minute!",bc_all | bc_blue; sleep2 1000; enablenpc "quizevent"; initnpctimer; goto L_Timer; end; case 2: // Death by Dice next; mes "I will now create warps, announce, & warp you."; close2; warp "g_room1-1",55,91; Announce "There will be a 'Death by Dice' Event Held!",bc_all | bc_blue; sleep2 5000; Announce "If you want to join, the warp will be open in Prontera. It will be open for 1 minute!",bc_all | bc_blue; sleep2 1000; enablenpc "diceevent"; initnpctimer; goto L_Timer; end; case 3: // Bomb Porings?! next; mes "I will not create warps, announce, & warp you."; close2; warp "g_room1-1",237,270; Announce "There will be a 'Bomb Porings?!' Event Held!",bc_all | bc_blue; sleep2 5000; Announce "If you want to join, the warp will be open in Prontera. It will be open for 1 minute!",bc_all | bc_blue; sleep2 1000; enablenpc "bombevent"; initnpctimer; goto L_Timer; end; case 4: // Last Man Standing next; mes "I will now create warps, announce, & warp you."; close2; warp "g_room1-1",237,270; Announce "There will be a 'Last Man Standing' Event Held!",bc_all | bc_blue; sleep2 5000; Announce "If you want to join, the warp will be open in Prontera. It will be open for 1 minute!",bc_all | bc_blue; sleep2 1000; enablenpc "lmsevent"; initnpctimer; goto L_Timer; end; case 5: // Party vs Party next; mes "I will now create warps, announce, & warp you."; close2; warp "06guild_08",50,50; Announce "There will be a 'Party vs Party' Event Held!",bc_all | bc_blue; sleep2 5000; Announce "If you want to join, the warp will be open in Prontera. It will be open for 1 minute!",bc_all | bc_blue; sleep2 1000; enablenpc "pvpevent"; initnpctimer; goto L_Timer; end; case 6: // Go Pikachu! next; mes "I will now create warps, announce, & warp you."; close2; warp "quiz_02",249,365; Announce "There will be a 'Go Pikachu!' Event Held!",bc_all | bc_blue; sleep2 5000; Announce "If you want to join, the warp will be open in Prontera. It will be open for 1 minute!",bc_all | bc_blue; sleep2 1000; enablenpc "pikachuevent"; initnpctimer; goto L_Timer; end; case 7: // Tarot? next; mes "I will now create warps, announce, & warp you."; close2; warp "g_room1-1",230,368; Announce "There will be a 'Tarot?' Event Held!",bc_all | bc_blue; sleep2 5000; Announce "If you want to join, the warp will be open in Prontera. It will be open for 1 minute!",bc_all | bc_blue; sleep2 1000; enablenpc "tarotevent"; initnpctimer; goto L_Timer; end; } L_Timer: OnTimer00000: Announce "Timer has started!",bc_all; end; OnTimer30000: Announce "Thirty Seconds Have Passed By!",bc_all; sleep2 5000; Announce "Hurry to Prontera if you want to join!",bc_all; end; OnTimer40000: Announce "Twenty seconds left!",bc_all; end; OnTimer50000: Announce "Ten seconds left!",bc_all; end; OnTimer55000: Announce "5!",bc_all; sleep2 1000; Announce "4!",bc_all; sleep2 1000; Announce "3!",bc_all; sleep2 1000; Announce "2!",bc_all; sleep2 1000; Announce "1!",bc_all; sleep2 1000; Announce "0!",bc_all; sleep2 1000; disablenpc "quizevent"; disablenpc "diceevent"; disablenpc "bombevent"; disablenpc "lmsevent"; disablenpc "pvpevent"; disablenpc "pikachuevent"; disablenpc "tarotevent"; stopnpctimer; end; OnInit: setarray .gmevents$,"Question & Answer","Death by Dice","Bomb Porings?!","Last Man Standing","Party vs Party!","Go Pikachu!","Tarot?"; for ( set .@i, 0; .@i < getarraysize(.gmevents$); set .@i, .@i +1 ) set .gm_menu$, .gm_menu$ + (.gmevents$[.@i]) +":"; disablenpc "quizevent"; disablenpc "diceevent"; disablenpc "bombevent"; disablenpc "lmsevent"; disablenpc "pvpevent"; disablenpc "pikachuevent"; disablenpc "tarotevent"; end; } // ~~~~~~~~~~~~~~~~~~~~~~~~~~~~ // To -> Event Warps //== Question & Answer prontera,155,180,0 warp quizevent 2,2,quiz_02,45,366 //== Death by Dice prontera,155,180,0 warp diceevent 2,2,g_room1-1,55,91 //== Bomb Porings?! prontera,155,180,0 warp bombevent 2,2,g_room1-1,237,270 //== Player vs Player prontera,155,180,0 warp lmsevent 2,2,g_room1-1,237,270 //== Party vs Party prontera,155,180,0 warp pvpevent 2,2,06guild_08,50,50; //== Go Pikachu! prontera,155,180,0 warp pikachuevent 2,2,quiz_02,249,371 //== Tarot? prontera,155,180,0 warp tarotevent 2,2,g_room1-1,230,368 // ~~~~~~~~~~~~~~~~~~~~~~~~~~ // In-Event //== Question & Answer // "True" quiz_02,32,362,0 warp quizeventroom1 2,2,quiz_02,32,357 // "False" quiz_02,59,362,0 warp quizeventroom2 2,2,quiz_02,59,357 //== Death by Dice // Number 1~ g_room1-1,37,84,0 warp diceeventroom1 2,2,g_room1-1,38,73 // Number 2~ g_room1-1,49,84,0 warp diceeventroom2 2,2,g_room1-1,49,73 // Number 3~ g_room1-1,61,84,0 warp diceeventroom3 2,2,g_room1-1,61,73 // Number 4~ g_room1-1,73,84,0 warp diceeventroom4 2,2,g_room1-1,73,73 //== Bomb Poring // Bomb Spammer g_room1-1,236,276,4 script Spammer 793,{ if(getgmlevel() < 1) end; switch(select("Bomb Porings:Guardians:None")) { case 1: areamonster "g_room1-1",221,292,233,280,"Bomb Poring",1904,10,"Spammer::OnEvent"; areamonster "g_room1-1",221,261,233,273,"Bomb Poring",1904,10,"Spammer::OnEvent"; areamonster "g_room1-1",252,292,240,280,"Bomb Poring",1904,10,"Spammer::OnEvent"; areamonster "g_room1-1",252,261,240,273,"Bomb Poring",1904,10,"Spammer::OnEvent"; close; case 2: set .@randvar, rand(1,4); if(.@randvar == 1) { areamonster "g_room1-1",221,292,233,280,"Sword Guardian",1829,1,"Spammer::OnEvent"; } else if(.@randvar == 2) { areamonster "g_room1-1",221,261,233,273,"Sword Guardian",1829,1,"Spammer::OnEvent"; } else if(.@randvar == 3) { areamonster "g_room1-1",252,292,240,280,"Sword Guardian",1829,1,"Spammer::OnEvent"; } else if(.@randvar == 4) { areamonster "g_room1-1",252,261,240,273,"Sword Guardian",1829,1,"Spammer::OnEvent"; } close; case 3: close; } OnEvent: end; } //== Go Pikachu! - script Pokemon Field 793,{ OnInit: setcell "quiz_02",240,367,259,367,cell_walkable,0; setcell "quiz_02",240,367,240,364,cell_walkable,0; setcell "quiz_02",259,364,259,367,cell_walkable,0; end; } // "Win" quiz_02,236,364,0 warp pikachueventroom1 2,2,quiz_02,236,346 // "Lose" quiz_02,263,364,0 warp pikachueventroom2 2,2,quiz_02,263,346 // == Mapflags // <Add Here> Eventstarter.txt
×
×
  • Create New...