firecape
This is the end...
This thread is basically for IRC scripts that make certain c&c tasks, such as html, a little bit easier.
Feel free to contribute your own as long as its not something flashy and actually useful!
This is one by me that will format any set into the proper html format. For example, if you enter
it will return:
correct sprite and all!
You can also just put a pokemon name into the main box, and it will return that Pokemon's htmled sprite link. This supports /dp/ and /bw/. Instructions are included in the actual script, but if you have any questions feel free to ask me on irc / post here. If you find any bugs post here as well, but posts containing "bugs" caused by improper usage will be deleted. Also, please note not all IRC clients support scripting. Mirc is probably the easiest one to use, so if you don't have it get it! Mac users are out of luck i'm afraid...
Here's the script:
Here's a script by Charmander to format sets for c&c straight from the PO export function:
Feel free to contribute your own as long as its not something flashy and actually useful!
This is one by me that will format any set into the proper html format. For example, if you enter
Code:
Jirachi @ Leftovers
Ability: Serene Grace
EVs: 252 HP / 40 Def / 216 SpD
Careful nature (+SpD, -SpA)
- Wish
- Iron Head
- Protect
- Toxic / Body Slam / U-turn / Fire Punch
HTML:
<p><img src="/download/sprites/bw/385.png" alt="Jirachi" /><br />
Jirachi @ Leftovers<br />
Ability: Serene Grace<br />
EVs: 252 HP / 40 Def / 216 SpD<br />
Careful nature (+SpD, -SpA)<br />
- Wish<br />
- Iron Head<br />
- Protect<br />
- Toxic / Body Slam / U-turn / Fire Punch</p>
You can also just put a pokemon name into the main box, and it will return that Pokemon's htmled sprite link. This supports /dp/ and /bw/. Instructions are included in the actual script, but if you have any questions feel free to ask me on irc / post here. If you find any bugs post here as well, but posts containing "bugs" caused by improper usage will be deleted. Also, please note not all IRC clients support scripting. Mirc is probably the easiest one to use, so if you don't have it get it! Mac users are out of luck i'm afraid...
Here's the script:
Code:
; Copy this into remote and press F11 to activate
; You need this text file (Notepad works well) http://pastebin.com/vHexnaRW in your Mirc directory (enter //run $mircdir, then drag and drop), and title it pokemonsprites
; C/P a set with the first line in the format "pokemon @ item" and watch!
alias F11 {
dialog -md html html
}
dialog html {
title "Set to HTML script by firecape"
size -1 -1 175 135
option dbu
text "Specify generation (bw/dp), will default to bw if left blank.", 4, 10 4 150 8, center
edit "", 3, 24 18 125 10
edit "", 1, 24 43 125 62, multi
text "Paste Here", 2, 61 30 50 9, center
button "Done", 6, 24 113 125 12, ok
}
on *:dialog:html:sclick:6: {
var %sprite.pokemon $gettok($did(html,1),1,32)
var %deoxysformes Deoxys-S Deoxys-N Deoxys-A
var %sprite.weird Rotom-W Rotom-H Rotom-S Rotom-F Rotom-C Giratina-O Shaymin-S
var %sprite.number $remove($read(pokemonsprites.txt, w, * $+ %sprite.pokemon $+ *), $+ %sprite.pokemon $+ )
var %sprite.number $round(%sprite.number)
if (%sprite.number >= 387 && %sprite.pokemon !isin %deoxysformes && %sprite.pokemon !isin %sprite.weird) {
inc %sprite.number 3 }
if (%sprite.number >= 414 && %sprite.pokemon != Wormadam-G && %sprite.pokemon != Wormadam-S && %sprite.pokemon !isin %sprite.weird) {
inc %sprite.number 2 }
if (%sprite.number >= 494 && %sprite.pokemon != Wormadam-G && %sprite.pokemon != Wormadam-S && %sprite.pokemon !isin %sprite.weird) {
inc %sprite.number 7 }
if (%sprite.number >= 563) {
inc %sprite.number 1 }
if (%sprite.number >= 568 && %sprite.pokemon != darmanitan && %sprite.pokemon != darmanitan-d) {
inc %sprite.number 1 }
if (%sprite.pokemon == genosect) {
inc %sprite.number 1 }
var %linkhtml <p><img src=" $+ $+(/download/sprites/,$iif($did(html,3) == dp,dp/,bw/),%sprite.number,.png) $+ " alt=" $+ $upper($left(%sprite.pokemon,1)) $+ $right(%sprite.pokemon,$calc($len(%sprite.pokemon)-1)) $+ " /><br />
echo -a %linkhtml
var %b 1
if ($gettok($did(html,1,2),1,32) $+ 1 == 1) { var %b 100 }
while ($did(html,1,$calc(%b + 1)) != $null) {
echo -a $did(html,1,%b) $+ <br />
inc %b }
echo -a $iif(%b == 100,$null,$did(html,1,%b) $+ </p>)
}
Code:
alias F12 {
dialog -md form form
}
dialog form {
title "Pokemon Online to C&C Formatter by Charmander"
size -1 -1 175 135
option dbu
edit "", 1, 24 43 125 62, multi
text "Paste Here", 2, 61 30 50 9, center
edit "", 3, 24 18 125 10
text "Set Name", 4, 61 4 50 8, center
button "Done", 5, 24 113 125 12, ok
}
on *:dialog:form:sclick:5: {
set -l %a echo -a
%a [SET]
%a name: $iif($did(form,3) == $null,$gettok($did(form,1,1),$calc($findtok($did(form,1,1),@,32) + 1) $+ -,32),$did(form,3))
set -l %b 1
while (%b <= 4) {
%a move %b $+ : $gettok($did(form,1,$calc(%b + 4)),2-,32)
inc %b
}
%a item: $gettok($did(form,1,1),$calc($findtok($did(form,1,1),@,32) + 1) $+ -,32)
%a ability: $gettok($did(form,1,2),2-,32)
%a nature: $gettok($did(form,1,4),1,32)
%a evs: $replacecs($gettok($did(form,1,3),2-,32),SAtk,SpA,SDef,SpD,Spd,Spe)
}