Okay, I just found out now that a spot is open for me in a class my mother is taking. Probably doesn't make any sense, right? Well, basically, my mother is taking a class on Perl programming. There are only two people in the class, and my mother says that the instructor has offered that I sit along and listen. I have been wanting to learn more programming, and I feel this would be a good chance. The class lasts from 8am to 5pm until Friday, so I'll be gone for then. I will likely be fairly inactive at night too, being that I am going to need to get some more sleep.
Anyway, I will be back and kicking come Saturday, so see you then.
__________________ Annoucments:
It seems as though I have disappeared again. Se ya soon, and please, use email (rehtaew@gmail.com). I'm 20 times more likely to read your message then over PM (and 30 times more likely to reply).
ZamFights Beta should come around Christmas, now.
Spoiler Alert:ZamFights Progress
Summary
ZamFights, a Pokemon Mass Multiplayer Online Role Playing Game, developed by Pokezam's Webmaster Freezewarp, continues its development into Alpha 7, where you can trade Pokemon with a global trade station like feature and battle other trainers. Several bugs were also fixed.
Alpha 9, now in development, will feature numerous events and locations to go to, that is up to Fuschia. It will also feature the new, interactive map, numerous minor features, and an altered look.
Alpha 9 should come around Thanksgiving, and Alpha 10, or the public Beta, should come around Christmas.
Alpha 8 Preview
I actually like the idea of a sixth generation Pokemon Emerald remix; few people think of the possibilities that one game has in full, colorful, barely pixaleted 3-D (in other words, think of a Play Station 2 or Xbox Original). The existing 3D we have with the DS is good, but the next generation of handheld consoles should give much more detail to the game - imagine being able to change your perspective to look into the sky while the stormcloud is slowly stretching across the region once Kyogre and Groudon have both been awoken. Imagine seeing the sky tower, and a green tail, to the left, and mirages to the right. For that matter, think of Mirage Island!
There are so many other moments for which we could experience in perspective-3D Pokemon Emerald; the battle frontier is one example, but just seeing the sun rise and set as the time passes in Dewford city would be awesome. Of course, my dreams may be more than one generation away; are there any Wii games that even would make this real?
Shiny Raichu's going to take over the world. At least he's young and likes to learn. He's going to get an AWESOME job and be set for the rest of his life.
It seems as though I have disappeared again. Se ya soon, and please, use email (rehtaew@gmail.com). I'm 20 times more likely to read your message then over PM (and 30 times more likely to reply).
ZamFights Beta should come around Christmas, now.
Spoiler Alert:ZamFights Progress
Summary
ZamFights, a Pokemon Mass Multiplayer Online Role Playing Game, developed by Pokezam's Webmaster Freezewarp, continues its development into Alpha 7, where you can trade Pokemon with a global trade station like feature and battle other trainers. Several bugs were also fixed.
Alpha 9, now in development, will feature numerous events and locations to go to, that is up to Fuschia. It will also feature the new, interactive map, numerous minor features, and an altered look.
Alpha 9 should come around Thanksgiving, and Alpha 10, or the public Beta, should come around Christmas.
Alpha 8 Preview
I actually like the idea of a sixth generation Pokemon Emerald remix; few people think of the possibilities that one game has in full, colorful, barely pixaleted 3-D (in other words, think of a Play Station 2 or Xbox Original). The existing 3D we have with the DS is good, but the next generation of handheld consoles should give much more detail to the game - imagine being able to change your perspective to look into the sky while the stormcloud is slowly stretching across the region once Kyogre and Groudon have both been awoken. Imagine seeing the sky tower, and a green tail, to the left, and mirages to the right. For that matter, think of Mirage Island!
There are so many other moments for which we could experience in perspective-3D Pokemon Emerald; the battle frontier is one example, but just seeing the sun rise and set as the time passes in Dewford city would be awesome. Of course, my dreams may be more than one generation away; are there any Wii games that even would make this real?
This one calculates the power of moves:
#!/usr/bin/perl
print "Thanks to Serebii.net for the formula. The random number is set to its average, 100.\n";
print "The formula I will use is Damage = (((2 * Level / 5 + 2) * Attack * Power / Defense) / 50 + 2) * STAB * Weak/Resis\n";
print "This script is still in testing. Don't rely on it, though do give your feedback.\n";
print "Please answer the following questions as instructed. We will try to correct you if you use incorrect formatting, but we will not always.\n";
until ($number) {
print "What is the level of your pokemon? Please enter a one or two digit number.\n";
chomp ($level = <STDIN>);
if ($level =~ /[a-zA-z]/) {
print "Please enter a one or two digit number.\n";
redo;
}
else {
$number = 1;
}
}
$number = 0;
until ($number) {
print "What is the Attack Stat of your pokemon. Make sure you enter the special attack if you are using a special move or the physical attack if it is a pysical move. Make sure you enter only the number.\n";
chomp ($attack = <STDIN>);
if ($attack =~ /[a-zA-z]/) {
print "Please enter only the number of your defense stat, no letters or special characters.\n";
redo;
}
else {
$number = 1;
}
}
$number = 0;
until ($number) {
print "What is the Defense Stat of the opposing pokemon. Make sure you enter the special defense if you are using a special move or the physical defense if it is a pysical move. Make sure you enter only the number.\n";
chomp ($defense = <STDIN>);
if ($defense =~ /[a-zA-z]/) {
print "Please enter only the number of your defense stat, no letters or special characters.\n";
redo;
}
else {
$number = 1;
}
}
$number = 0;
until ($number) {
print "What is the base damage of the attack your using?\n";
chomp ($base = <STDIN>);
if ($base =~ /[a-zA-z]/) {
print "Please enter only the number of the base damage of your attack, no letters or special characters.\n";
redo;
}
else {
$number = 1;
}
}
$number = 0;
$stabmenu = <<MENU;
Please enter one of the following. Be warned, our correction filter isn't as accurate here, so make sure you enter the data correctly.
1 No, they are not the same type.
1.5 Yes, they are the same type.
MENU
until ($number) {
print "Is the attack your using the same type as your pokemon.\n $stabmenu\n";
chomp ($stab = <STDIN>);
if ($stab =~ /[^(1.5|1)]/) {
print "Please enter 1 for no or 1.5 for yes.\n";
redo;
}
else {
$number = 1;
}
}
$number = 0;
$weakresismenu = <<MENU;
Please enter one of the following. Be warned, our correction filter is often wrong here, so make sure you enter the data correctly.
.25 This means that your attack will be only a quarter as strong.
.5 This means that your attack will be only half as strong.
1 This means your attack will not be changed.
2 This means your attack will be twice as strong.
4 This means your attack will be 4 times as strong.
MENU
until ($number) {
print "Compared to normal, how strong will your attack be because of weaknesses and resistances. \n $weakresismenu \n";
chomp ($weakresis = <STDIN>);
if ($weakresis =~ /[^(.25|.5|1|2|4)]/) {
print "Please enter one of the numbers. We may not catch you next time.\n";
redo;
}
else {
$number = 1;
}
}
$number = 0;
print "Here is the formula:\n";
print "Damage = (((2 * $level / 5 + 2) * $attack * $base / $defense) / 50 + 2) * $stab * $weakresis\n";
print "Here is the final result:\n";
$damage = (((2*$level/5+2)*$attack*$base/$defense)/50+2)*$stab*$weakresis;
print "$damage\n";
print "Something doesn't seem right? If you find any bugs or typos in this script please report them to me either by posting in the respective thread at the Pokezam Forums or by emailing me at ShinyRaichu [at] yahoo.com.";
This one converts the temperature:
#!/usr/bin/perl
until ($done) {
print "Enter a temperature to be converted. Make sure it has the C or F at the end so we know how to convery it.\n";
chomp ($a = <STDIN>);
unless ($a =~ /[0-9][fc]/i) {
print "Um... Was I not clear? Enter a temperature with an F or C at the end.\n";
redo;
}
else {
$done = 1;
$print = "Okay, just a moment \n \n \n \n \n \n";
}n
}
$done = 0;
$c = (chop ($a));
$fartocel = ($a-32)*5/9;
$celtofar = $a*9/5+32;
if ($c =~ /[Ff]/) {
$temp = $fartocel;
$name = Celsius;
}
else {
$temp = $celtofar;
$name = Fahrenheit;
}
print "Okay, I have figured out that the temperature you entered when converted to $name is $temp.\n";
This one is a fun little numbers script:
#!/usr/bin/perl
until ($num) {
print "Enter 3 numbers\n";
chomp ($a = <STDIN>);
if ($a =~ /[a-zA-Z]/) {
print "Consider going back to preschool. A number!\n";
redo;
}
else {
$num = 1;
print "Okay, two more please\n";
}
}
$num = 0;
until ($num) {
print "Enter two numbers\n";
chomp ($b = <STDIN>);
if ($b =~ /[a-zA-z]/) {
print "Okay, you know what a number is, so enter one\n";
redo;
}
else {
$num = 1;
print "Okay, just one more now.\n";
}
}
$num = 0;
until ($num) {
print "Enter a number.\n";
chomp ($c = <STDIN>);
if ($c =~ /[a-zA-Z]/) {
print "You entered a number the first two times. So enter one this time please.\n";
redo;
}
else {
$num = 1;
print "Thank you, now I got to tell you about them numbers. I ain't too good at math, so I guess I'll have that them there perl help you instead.\n";
}
}
$num = 0;
$sum = $a+$b+$c;
$prod = $a*$b*$c;
$av = $sum/3;
@a = ($a, $b, $c);
@b = sort @a;
$high = $b[0];
$mid = $b[1];
$low = $b[2];
print "The sum of what you entered is $sum\n";
print "The product of what you entered is $prod\n";
print "The highest number you entered is $high\n";
print "The lowest number you entered is $low\n";
print "The middle number you entered is $mid\n";
print "The average of your numbers is $av\n";
__________________ Annoucments:
It seems as though I have disappeared again. Se ya soon, and please, use email (rehtaew@gmail.com). I'm 20 times more likely to read your message then over PM (and 30 times more likely to reply).
ZamFights Beta should come around Christmas, now.
Spoiler Alert:ZamFights Progress
Summary
ZamFights, a Pokemon Mass Multiplayer Online Role Playing Game, developed by Pokezam's Webmaster Freezewarp, continues its development into Alpha 7, where you can trade Pokemon with a global trade station like feature and battle other trainers. Several bugs were also fixed.
Alpha 9, now in development, will feature numerous events and locations to go to, that is up to Fuschia. It will also feature the new, interactive map, numerous minor features, and an altered look.
Alpha 9 should come around Thanksgiving, and Alpha 10, or the public Beta, should come around Christmas.
Alpha 8 Preview
I actually like the idea of a sixth generation Pokemon Emerald remix; few people think of the possibilities that one game has in full, colorful, barely pixaleted 3-D (in other words, think of a Play Station 2 or Xbox Original). The existing 3D we have with the DS is good, but the next generation of handheld consoles should give much more detail to the game - imagine being able to change your perspective to look into the sky while the stormcloud is slowly stretching across the region once Kyogre and Groudon have both been awoken. Imagine seeing the sky tower, and a green tail, to the left, and mirages to the right. For that matter, think of Mirage Island!
There are so many other moments for which we could experience in perspective-3D Pokemon Emerald; the battle frontier is one example, but just seeing the sun rise and set as the time passes in Dewford city would be awesome. Of course, my dreams may be more than one generation away; are there any Wii games that even would make this real?
Omg...if you do take over the world, don't be Hitler!
SR can take over the world, just don't take over the moon--- That's My Domain!
But yeah, I wish you luck in your goals, SR. I know you're gonna be somthin someday-- you're so smart, and you're a good leader... keepin the forums stable is pretty tough...
__________________
"Hello Prey." Home <------> Social Group
Special Thanks to Akai for making the banners ^_^
Location: The Dark World, for Darkness is the leading power!
Age: 17
Posts: 1,028
OMG Perl looks so complicated! I think I'll stick with PHP... and I'll do those scripts too!
EDIT: Here's the damage calculator in PHP, made so that it can be used as a tool. You can adapt the function to make it into a script, as I will be doing for PokéBattlers.
PHP Code:
<?php // calculates damage from stats // Damage = (((2 * Level / 5 + 2) * Attack * Power / Defense) / 50 + 2) * STAB * Weak/Resis // Formula from Serebii.net // Script by Adam Haskell (C) 2008 function calcDamageFromGET( $returntype) { // process the equation // GET vars $lev = intval( $_GET['lev']); $atk = intval( $_GET['atk']); $pow = intval( $_GET['pow']); $def = intval( $_GET['def']); $stab = floatval( $_GET['stab']); $wr = floatval( $_GET['wr']);
// check values are correct $err = Array(); if( $lev <= 0 || $lev > 100) $err[]="Level out of bounds!"; if( $atk <= 0) $err[]="Attack out of bounds!"; if( $pow <= 0) $err[]="Power out of bounds!"; if( $def <= 0) $err[]="Defence out of bounds!"; if( $stab != 1 & $stab != 1.5) $err[]="STAB out of bounds!"; if( $wr != 0.25 && $wr != 0.5 && $wr != 1 && $wr != 2 && $wr != 4) $err[]="Weak/Res out of bounds!"; if( count( $err) != 0) { $errstr = "The following error(s) occured: <ul>"; foreach( $err as $e) $errstr.="<li>".$e."</li>"; $errstr .= "</ul>Check values"; trigger_error( $errstr, E_USER_WARNING); return false; }
// calculate formula and return $damage = (((2*$lev/5+2)*$atk*$pow/$def)/50+2)*$stab*$wr; return Array( "lev"=>$lev, "atk"=>$atk, "def"=>$def, "pow"=>$pow, "stab"=>$stab, "wr"=>$wr, "damage"=>$damage); }
btw SR, we could have a thread where we both do the same script, you in Perl and me in PHP, and see what they look like compared to each other. Just a thought, but it could be interesting.