Jump to content
  • 0

R>Santa Poring Summoner

Budots

Asked by Budots,

 Share

Question

Budots Poring

Budots

Posted
  • Group:  Members
  • Topic Count:  69
  • Topics Per Day:  0.02
  • Content Count:  200
  • Reputation:   1
  • Joined:  09/25/13
  • Last Seen:  
Posted

Hi Guys,

 

Since Christmas is fast approaching,

 

i would like to request a Simple Summoner script,

 

- Summons 100 Santa Poring

- Randomly around Prontera Town

- 70 Normal Santa Porings = drops 1 9524 per monster // 9524 <--- item id

- 30 Special Santa Porings = drops 1 Proof of Donation per monster

- Runs every 2 hours

- Announces when summoning starts

- Announces how many Special Santa Porings left.

 

 

THANKS IN ADVANCE AND A MERRY MERRY CHRISTMAS /ho /ho /ho

 


bump

Link to comment
Share on other sites

12 answers to this question

Recommended Posts

AnnieRuru Drops

AnnieRuru

Posted
  • Group:  Members
  • Topic Count:  18
  • Topics Per Day:  0.00
  • Content Count:  2044
  • Reputation:   682
  • Joined:  10/09/12
  • Last Seen:  
Posted 

-	script	asdf	-1,{

OnMinute00:

if ( gettime(3) % 2 ) end;

announce "summoning start", bc_all;

killmonster "prontera", strnpcinfo(0)+"::Onnormal";

killmonster "prontera", strnpcinfo(0)+"::Onspecial";

.count = 30;

monster "prontera", 0,0, "--ja--", 1062,70, strnpcinfo(0)+"::Onnormal";

monster "prontera", 0,0, "--ja--", 1062,30, strnpcinfo(0)+"::Onspecial";

end;

Onnormal:

getitem 9524, 1;

end;

Onspecial:

getitem 7179, 1;

.count--;

if ( .count )

announce "special poring left "+ .count, bc_map;

else

announce "all special poring killed", bc_map;

end;

}

Link to comment
Share on other sites
Tepoo Poring

Tepoo

Posted
  • Group:  Members
  • Topic Count:  16
  • Topics Per Day:  0.00
  • Content Count:  104
  • Reputation:   4
  • Joined:  02/06/12
  • Last Seen:  
Posted

Thats Pretty Nice Annie,

 

i dont need it but you showed me some new tricks for writing npcs.

thanks you very much :-)

Link to comment
Share on other sites
Budots Poring

Budots

Posted
  • Group:  Members
  • Topic Count:  69
  • Topics Per Day:  0.02
  • Content Count:  200
  • Reputation:   1
  • Joined:  09/25/13
  • Last Seen:  
  • Author
Posted 
-	script	asdf	-1,{
OnMinute00:
	if ( gettime(3) % 2 ) end;
	announce "summoning start", bc_all;
	killmonster "prontera", strnpcinfo(0)+"::Onnormal";
	killmonster "prontera", strnpcinfo(0)+"::Onspecial";
	.count = 30;
	monster "prontera", 0,0, "--ja--", 1062,70, strnpcinfo(0)+"::Onnormal";
	monster "prontera", 0,0, "--ja--", 1062,30, strnpcinfo(0)+"::Onspecial";
	end;
Onnormal:
	getitem 9524, 1;
	end;
Onspecial:
	getitem 7179, 1;
	.count--;
	if ( .count )
		announce "special poring left "+ .count, bc_map;
	else
		announce "all special poring killed", bc_map;
	end;
}

Thanks Annie /lv

Link to comment
Share on other sites
Kami675 Poring

Kami675

Posted
  • Group:  Members
  • Topic Count:  34
  • Topics Per Day:  0.01
  • Content Count:  90
  • Reputation:   1
  • Joined:  10/17/13
  • Last Seen:  
Posted (edited) 
-	script	asdf	-1,{
OnMinute00:
	if ( gettime(3) % 2 ) end;
	announce "summoning start", bc_all;
	killmonster "prontera", strnpcinfo(0)+"::Onnormal";
	killmonster "prontera", strnpcinfo(0)+"::Onspecial";
	.count = 30;
	monster "prontera", 0,0, "--ja--", 1062,70, strnpcinfo(0)+"::Onnormal";
	monster "prontera", 0,0, "--ja--", 1062,30, strnpcinfo(0)+"::Onspecial";
	end;
Onnormal:
	getitem 9524, 1;
	end;
Onspecial:
	getitem 7179, 1;
	.count--;
	if ( .count )
		announce "special poring left "+ .count, bc_map;
	else
		announce "all special poring killed", bc_map;
	end;
}

well i edited ur script a lil bit and now it doesnt work...xD. What did I do wrong? :(

-    script    asdf    -1,{
OnMinute00:
    if ( gettime(3) % 4 ) end;
    announce "Xmas Event Has Started at xmas town!", bc_all;
    killmonster "xmas", strnpcinfo(0)+"::Onnormal";
    killmonster "xmas", strnpcinfo(0)+"::Onspecial";
    .count = 50;
    monster "xmas", 0,0, "--ja--", 1247,150, strnpcinfo(0)+"::Onnormal";
    monster "xmas", 0,0, "--ja--", 1247,50, strnpcinfo(0)+"::Onspecial";
    end;
Onnormal:
    getitem 7034, 1;
    end;
Onspecial:
    getitem 7176, 1;
    .count--;
    if ( .count )
        announce "special poring left "+ .count, bc_map;
    else
        announce "all special poring killed", bc_map;
    end;
}
Edited by Kami675
Link to comment
Share on other sites
AnnieRuru Drops

AnnieRuru

Posted
  • Group:  Members
  • Topic Count:  18
  • Topics Per Day:  0.00
  • Content Count:  2044
  • Reputation:   682
  • Joined:  10/09/12
  • Last Seen:  
Posted

perhaps you need to learn some script debugging

 

 

-	script	asdf	-1,{
OnMinute00:
OnWhisperGlobal:
//    if ( gettime(3) % 4 ) end;
    announce "Xmas Event Has Started at xmas town!", bc_all;
    killmonster "xmas", strnpcinfo(0)+"::Onnormal";
    killmonster "xmas", strnpcinfo(0)+"::Onspecial";
    .count = 50;
    monster "xmas", 0,0, "--ja--", 1247,150, strnpcinfo(0)+"::Onnormal";
    monster "xmas", 0,0, "--ja--", 1247,50, strnpcinfo(0)+"::Onspecial";
    end;
Onnormal:
    getitem 7034, 1;
    end;
Onspecial:
    getitem 7176, 1;
    .count--;
    if ( .count )
        announce "special poring left "+ .count, bc_map;
    else
        announce "all special poring killed", bc_map;
    end;
}
I tested it , it work fine

post-8685-0-26589800-1387898066_thumb.jpg

Link to comment
Share on other sites
Kami675 Poring

Kami675

Posted
  • Group:  Members
  • Topic Count:  34
  • Topics Per Day:  0.01
  • Content Count:  90
  • Reputation:   1
  • Joined:  10/17/13
  • Last Seen:  
Posted (edited)

perhaps you need to learn some script debugging

 

 

-	script	asdf	-1,{
OnMinute00:
OnWhisperGlobal:
//    if ( gettime(3) % 4 ) end;
    announce "Xmas Event Has Started at xmas town!", bc_all;
    killmonster "xmas", strnpcinfo(0)+"::Onnormal";
    killmonster "xmas", strnpcinfo(0)+"::Onspecial";
    .count = 50;
    monster "xmas", 0,0, "--ja--", 1247,150, strnpcinfo(0)+"::Onnormal";
    monster "xmas", 0,0, "--ja--", 1247,50, strnpcinfo(0)+"::Onspecial";
    end;
Onnormal:
    getitem 7034, 1;
    end;
Onspecial:
    getitem 7176, 1;
    .count--;
    if ( .count )
        announce "special poring left "+ .count, bc_map;
    else
        announce "all special poring killed", bc_map;
    end;
}
I tested it , it work fine

 

Sorry I just recently got an interest in ragnarok scripting so i'm starting from scratch xD.I'm getting this error atm

[Error]:
script error on /home/*******/trunk/npc/custom/Xmasevent.txt line 8
    parse_line: expect command, missing function name or calling undeclared function
     3 : OnWhisperGlobal:
     4 :     if ( gettime(3) % 4 ) end;
     5 :     announce "Xmas Event Has Started at xmas town!", bc_all;
     6 :     killmonster "xmas", strnpcinfo(0)+"::Onnormal";
     7 :     killmonster "xmas", strnpcinfo(0)+"::Onspecial";
*    8 :     '.'count = 50;
     9 :     monster "xmas", 0,0, "--ja--", 1247,150, strnpcinfo(0)+"::Onnormal";
    10 :     monster "xmas", 0,0, "--ja--", 1247,50, strnpcinfo(0)+"::Onspecial";
    11 :     end;
    12 : Onnormal:
    13 :     getitem 7034, 1;
Edited by Kami675
Link to comment
Share on other sites
AnnieRuru Drops

AnnieRuru

Posted
  • Group:  Members
  • Topic Count:  18
  • Topics Per Day:  0.00
  • Content Count:  2044
  • Reputation:   682
  • Joined:  10/09/12
  • Last Seen:  
Posted

hmm ... I usually don't teach newbies ...

but feel like want to make an exemption today

 

-	script	xmas_event	-1,{
OnMinute00:
OnWhisperGlobal:
//	if ( gettime(3) % 4 ) end;
	announce "Xmas Event Has Started at xmas town!", bc_all;
	killmonster "xmas", strnpcinfo(0)+"::Onnormal";
	killmonster "xmas", strnpcinfo(0)+"::Onspecial";
	set .count, 50;
	monster "xmas", 0,0, "--ja--", 1247,150, strnpcinfo(0)+"::Onnormal";
	monster "xmas", 0,0, "--ja--", 1247,50, strnpcinfo(0)+"::Onspecial";
	end;
Onnormal:
	getitem 7034, 1;
	end;
Onspecial:
	getitem 7176, 1;
	set .count, .count -1;
	if ( .count > 0 )
		announce "special poring left "+ .count, bc_map;
	else
		announce "all special poring killed", bc_map;
	end;
}
the reason my script not working in your emulator is probably because you are using very outdated emulator, maybe you are using eathena

http://rathena.org/board/topic/62395-r15982-script-engine-update/

 

 

... you know .. you reminded me that I also said something like "I want to learn scripting too!" back in 2006 ... feeling nostalgic...

...or maybe you just said something moved my heart lol

Link to comment
Share on other sites
Kami675 Poring

Kami675

Posted
  • Group:  Members
  • Topic Count:  34
  • Topics Per Day:  0.01
  • Content Count:  90
  • Reputation:   1
  • Joined:  10/17/13
  • Last Seen:  
Posted (edited)

hmm ... I usually don't teach newbies ...

but feel like want to make an exemption today

 

-	script	xmas_event	-1,{
OnMinute00:
OnWhisperGlobal:
//	if ( gettime(3) % 4 ) end;
	announce "Xmas Event Has Started at xmas town!", bc_all;
	killmonster "xmas", strnpcinfo(0)+"::Onnormal";
	killmonster "xmas", strnpcinfo(0)+"::Onspecial";
	set .count, 50;
	monster "xmas", 0,0, "--ja--", 1247,150, strnpcinfo(0)+"::Onnormal";
	monster "xmas", 0,0, "--ja--", 1247,50, strnpcinfo(0)+"::Onspecial";
	end;
Onnormal:
	getitem 7034, 1;
	end;
Onspecial:
	getitem 7176, 1;
	set .count, .count -1;
	if ( .count > 0 )
		announce "special poring left "+ .count, bc_map;
	else
		announce "all special poring killed", bc_map;
	end;
}
the reason my script not working in your emulator is probably because you are using very outdated emulator, maybe you are using eathena

http://rathena.org/board/topic/62395-r15982-script-engine-update/

 

 

... you know .. you reminded me that I also said something like "I want to learn scripting too!" back in 2006 ... feeling nostalgic...

...or maybe you just said something moved my heart lol

 

xD Yea i've been playing ragnarok for more than a decade it's sad that I just now want to learn scripting. I want to learn more about scripting before I go ahead and attempt to create a big server of my own. I really do appreciate the help I still have a long way to go though =/ lol. As for now i'm just testing the waters haha. Also, I am using an old emulator i'm using eAthena 15262M. As for the script how would I go about "downgrading" it to support eAthena?

Edited by Kami675
Link to comment
Share on other sites
AnnieRuru Drops

AnnieRuru

Posted
  • Group:  Members
  • Topic Count:  18
  • Topics Per Day:  0.00
  • Content Count:  2044
  • Reputation:   682
  • Joined:  10/09/12
  • Last Seen:  
Posted (edited)

15262... <.<

I don't think it even support strnpcinfo...

 

-	script	xmas_event	-1,{
OnMinute00:
OnWhisperGlobal:
//	if ( gettime(3) % 4 ) end;
	announce "Xmas Event Has Started at xmas town!", bc_all;
	killmonster "xmas", "xmas_event::Onnormal";
	killmonster "xmas", "xmas_event::Onspecial";
	set .count, 50;
	monster "xmas", 0,0, "--ja--", 1247,150, "xmas_event::Onnormal";
	monster "xmas", 0,0, "--ja--", 1247,50, "xmas_event::Onspecial";
	end;
Onnormal:
	getitem 7034, 1;
	end;
Onspecial:
	getitem 7176, 1;
	set .count, .count -1;
	if ( .count > 0 )
		announce "special poring left "+ .count, bc_map;
	else
		announce "all special poring killed", bc_map;
	end;
}
this should work in your *outdated* emulator

http://www.eathena.ws/board/index.php?showtopic=276056

... getting nostalgic ...

actually, scripting is just a part of it

you can also try mapping, or making palettes ...

these are some professions that you can contribute rathena

also, once you truly wish to master a profession, its a never ending process ...

after scripting for 7 years I still feel I haven't finish learning yet =/

Edited by AnnieRuru
Link to comment
Share on other sites
Kami675 Poring

Kami675

Posted
  • Group:  Members
  • Topic Count:  34
  • Topics Per Day:  0.01
  • Content Count:  90
  • Reputation:   1
  • Joined:  10/17/13
  • Last Seen:  
Posted

15262... <.<

I don't think it even support strnpcinfo...

 

-	script	xmas_event	-1,{
OnMinute00:
OnWhisperGlobal:
//	if ( gettime(3) % 4 ) end;
	announce "Xmas Event Has Started at xmas town!", bc_all;
	killmonster "xmas", strnpcinfo(0)+"::Onnormal";
	killmonster "xmas", strnpcinfo(0)+"::Onspecial";
	set .count, 50;
	monster "xmas", 0,0, "--ja--", 1247,150, "xmas_event::Onnormal";
	monster "xmas", 0,0, "--ja--", 1247,50, "xmas_event::Onspecial";
	end;
Onnormal:
	getitem 7034, 1;
	end;
Onspecial:
	getitem 7176, 1;
	set .count, .count -1;
	if ( .count > 0 )
		announce "special poring left "+ .count, bc_map;
	else
		announce "all special poring killed", bc_map;
	end;
}
this should work in your *outdated* emulator

http://www.eathena.ws/board/index.php?showtopic=276056

... getting nostalgic ...

actually, scripting is just a part of it

you can also try mapping, or making palettes ...

these are some professions that you can contribute rathena

 

WOW! Thanks a ton. lol I like your "if you learn to script straight away in a live server, its like a frog under a well" comment. I plan on as i said before test the waters and see what comes easiest to me(scripting/spriting/mapping/etc) ^_^. But as for the script doesn't the // disable that line? so //    if ( gettime(3) % 4 ) end;   Wouldn't the // disable that line? so it wouldnt occur every 4 hrs? should I remove the //?

Link to comment
Share on other sites
AnnieRuru Drops

AnnieRuru

Posted
  • Group:  Members
  • Topic Count:  18
  • Topics Per Day:  0.00
  • Content Count:  2044
  • Reputation:   682
  • Joined:  10/09/12
  • Last Seen:  
Posted

I usually ignore this kind of question ... but right now couldn't turn eyes away from this topic lol

https://github.com/rathena/rathena/blob/master/doc/script_commands.txt#L99

http://www.eathena.ws/board/index.php?showtopic=244209

http://rathena.org/board/topic/64418-script-editors-notepad-rathena-custom-syntax-highlight/

setup test server .. @reloadscript ... use latest rathena ... memorize script_commands.txt ... read wiki ..

the rest are common sense already

  • Upvote 1
Link to comment
Share on other sites
Kami675 Poring

Kami675

Posted
  • Group:  Members
  • Topic Count:  34
  • Topics Per Day:  0.01
  • Content Count:  90
  • Reputation:   1
  • Joined:  10/17/13
  • Last Seen:  
Posted

I usually ignore this kind of question ... but right now couldn't turn eyes away from this topic lol

https://github.com/rathena/rathena/blob/master/doc/script_commands.txt#L99

http://www.eathena.ws/board/index.php?showtopic=244209

http://rathena.org/board/topic/64418-script-editors-notepad-rathena-custom-syntax-highlight/

setup test server .. @reloadscript ... use latest rathena ... memorize script_commands.txt ... read wiki ..

the rest are common sense already

Ohhh ok derp >_< im sorry for the stupid question thanks for clearing it up. I really appreciate the help, thanks once again and to the creator of this topic(Budots) I apologize for the extension of this topic XD.

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
 Share
Go to question listing
×
×
  • Create New...