Think of something that you wish Authorware could do but it doesn't?  Let the our good friends at Macromedia know via the wishlist.

Please let us know if you find any of the materials on this site inappropriate or offensive. Please include the url and why the material should be reviewed.

Comments and questions about the site are also welcome. Please no Authorware questions, use the AWARE list.

Back

079 - Evolution of a Computer Programmer


High School / Junior High :
10 PRINT "HELLO WORLD"
20 END
First year in college :
program Hello (input, output)
begin
  writeln('Hello World.');
end;
Senior year in College :
(defun hello
  (print
    (cons 'Hello (list 'World.))))
New Profesional :
#include <stdio.h>
void main(void)
{
  char *message[] = ("Hello ", "World.");
  int i;

  for (i = 0; i < 2; ++i)
    printf ("%s", message[i]);
  printf ("\n");
}
Seasoned Professional :
#include <iostram.h>
#include <string.h>
class string
{
  private:
    int size;
    char *ptr;
  public:
    string () : size (0), ptr (new char('\0')){}
    string (const string &s) : size(s.size)
    {
      ptr = new char (size + 1);
      strcpy (ptr, s.ptr);
    }
    ~string()
    {
      delete [] ptr;
    }
    friend ostream &operator << (ostream &, const string &);
    string &operator = (const char*);
    };
    ostream &operator << (ostream &stream, const string &amps)
    {
      return (stream << s.ptr);
    }
    string &string::operator = (const char *chrs)
    {
      if (this != &chrs)
      {
        delete [] ptr;
        size = strlen (chrs);
        ptr = new char (size + 1);
        strcpy (ptr, chrs);
      }
      return (*this);
    }
    int main()
    {
      string str;
      str = "Hello World.";
      cout << str << endl;
      return(0);
    }
Apprentice Hacker :
#!/usr/local/bin/perl
$msg="Hello World.\n";
if ($#ARGV >= 0) {
  while (defined($arg=shift(@ARGV))) {
    $outfilename = $arg;
    open (FILE, ">" . $outfilename) || die "Can't write $arg: $!\n";
    print (FILE $msg);
    close (FILE) || die "Can't close $arg: $!\n";
  }
} else {
  print ($msg)
}
l;
Experienced Hacker :
#include <stdio.h>
#define S "Hello World.\n"
main() {exit (printf(S) == strlen(S) ? 0 : l);}
Seasoned Hacker :
% cc -o a.out -/src/misc/hw/hw.c
% a.out
Guru Hacker :
% cat
Hello World.
^D
New Manager :
10 PRINT "HELLO WORLD"
20 END
Middle Manager :
mail -s "Hello world." bob@b12
Bob, could you please write me a program
that prints "Hello World."?
I need it by tomorrow.
^D
Senior Manager :
% mail jim
I need a "Hello World." program by this afternoon.
Chief Executive :
% letter
letter: Command not found.
% mail
To: ^X ^F ^C
% help mail
help: Command not found.
% damn!
!: Event unrecognized
% logout

There are 0 reviews
Add your review

Back