R-DAS FLIGHT #2 DETAILS
Flight #: 2
Date: 4th of November, 1999
R-DAS firmware: 2.3
R-DAS Recorded Altitude: 1242 feet (G-Whiz recorded altitude: 1222 feet - 20 feet difference / 1.61% difference)
Apogee - Charge Firing Delta-t: 0 seconds
Apogee - Charge Firing Delta-h: 0 feet (0 metres)
Descent Rate at Apogee Deployment: 0 feet per second (0 metres per second)
Total Time of Flight: 57 seconds
Apogee - Charge Firing h Variance: 0%
R-DAS Flight Mode: Recording only (charges fitted to evaluate RDAS performance)
Launch Vehicle Diameter: 4 inches
Launch Vehicle Length: 7 feet
Launch Vehicle Propulsion: Aerotech I-211W Fins: 4 clipped swept deltas (Aerofoiled)
Launch System: Rod Launch
Finish: Unfinished
Ejection Method: Motor ejection |  |  | | Comments The flight of Get Real was a text book launch, with the rocket flying a near perfectly straight ascent to apogee. At apogee, the rocket actually performed a tail slide, descending for a few feet tail first, before the single parachute was ejected. Unfortunately, at ejection, one of the fins on the heavy tail section, clipped the payload section, leaving a nasty gouge. Apart from this, the rocket descended normally, and lander safely. When the rocket was recovered though, the LED on the R-DAS to enable altitude to be displayed was permanently on, rather than flashing out the altitude. This issue dissappeared when the R-DAS was connected to a laptop PC for data download. | The Get Real Rocket. |
|
 |
|
#!/usr/bin/perl -w
use strict;
use CGI qw(:escape);
use CGI;
use lib qw(/home/rosborne/lib);
use Astro::Sunrise;
use Astro::MoonPhase;
use vars qw($query);
my $query = new CGI;
print $query->header();
#print "Content-type: text/html\n\n";
my $sec = 0;
my $mday = 0;
my $mon = 0;
my $year = 0;
my $wday = 0;
my $yday = 0;
my $isdst = 0;
my $tz = 0;
my $hr = 0;
my $min = 0;
my @days = ();
my @shortdays = ();
my @months = ();
my @shortmonths = ();
my $longyr = 0;
my @cnts;
my $filename;
my $found;
my $counts;
my $cnt;
my $page;
my $showcnt;
my $cnts;
my $blk;
my $sunrise;
my $sunset;
my ($MoonPhase,$MoonIllum,$MoonAge,$MoonDist,$MoonAng,$SunDist,$SunAng);
sub determine_date
{
@days = ("Sunday","Monday","Tuesday","Wednesday","Thursday","Friday","Saturday");
@shortdays = ("Sun","Mon","Tue","Wed","Thu","Fri","Sat");
@months = ("January","February","March","April","May","June","July","August","September","October","November", "December");
@shortmonths = ("Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec");
($sec,$min,$hr,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);
$longyr = $year + 1900;
if ($isdst == 1) {
$tz = "GMT";
} else {
$tz = "GMT";
}
}
sub display_date
{
print "$shortdays[$wday], $shortmonths[$mon] $mday, $longyr, ";
printf("%02d:%02d $tz\n", $hr, $min);
}
### Open File and Read All Data
open (FILE, "counts.txt");
@cnts = ;
close(FILE);
### Delete Old File Before ReWriting it with New Data
$filename = "counts.txt";
if (-e $filename) { unlink("$filename"); }
### Create and Open New File ReInput Old Data While Updating New
$found = 0;
open (NEWFILE,">counts.txt") || die $!;
foreach $cnts(@cnts) {
($page,$cnt,$blk) = split(/\|/, $cnts);
if ($page eq $ENV{'DOCUMENT_URI'}) {
$cnt++;
$showcnt = $cnt;
print NEWFILE "$page|$cnt| \n";
$found = 1;
}
else {
print NEWFILE "$cnts";
}
}
### First Time Counting the New Page
if ($found == 0) {
if ($ENV{'DOCUMENT_URI'} ne "") {
print NEWFILE "$ENV{'DOCUMENT_URI'}|1| \n";
$showcnt = 1;
}
}
&determine_date;
print "";
print "";
&display_date;
print "<\/STRONG><\/font>";
### Print the Count on the Page
print "";
print "($showcnt)";
print "<\/font>";
($sunrise, $sunset) = sunrise( $year, $mon, $mday, 0.1250, 51.3440, 0, 0 );
print "";
print " ", $sunrise;
print " ", $sunset;
print "<\/STRONG><\/font>";
($MoonPhase,$MoonIllum,$MoonAge,$MoonDist,$MoonAng,$SunDist,$SunAng) = &phase(time);
print "";
print " ";
printf("%02d\n", ($MoonPhase*100));
print "% ";
# print " Dist: ", $MoonDist;
print "<\/STRONG><\/font>";
print "<\/td><\/tr><\/table>";
|
home - space - research - links - contact me - colophon
Richard Osborne - 1995-2006 |
| |