It reminds me of the Pandora!

[rSl]

happy b'day ed!

 

[matzesu]

Auch von mir alles gute zum Geburtstag ^^

 

[Djoga'Ro]

Allit Jute zum Jeburtstach, Michi!

 

[levi]

48617070792042697274686461792C204544

 

[paralabamba]

Bon anniversaire ED !

 

[ClockworkCoder]

お誕生日おめでとうございます。

 

[zedr0k]

Alles Gute zum Geburtstag auch aus Franken.

 

[bennr01]

Happy Birthday!

 

[Bosbeetle]

Gefeliciteerd met je verjaardag kwaadaardigedraak!

 

[RZR]

Let's add a bit of old school style...:

      write(6,*) 'Feliz cumpleaños @EvilDragon.'

209   write(6,*) 'Want some cake?: (1)Sure (2)Nah'
      read(5,*) ipr2
      if(ipr2.lt.1) then
        write(6,*) 'Error!'
        goto 209
      endif
      if(ipr2.gt.2) then
        write(6,*) 'Error!'
        goto 209
      endif

      if(ipr2.lt.2) then
        write(6,*) '                0   0'
        write(6,*) '                |   |'
        write(6,*) '            ____|___|____'
        write(6,*) '         0  |~ ~ ~ ~ ~ ~|   0'
        write(6,*) '         |  |           |   |'
        write(6,*) '      ___|__|___________|___|__'
        write(6,*) '      |/\/\/\/\/\/\/\/\/\/\/\/|'
        write(6,*) '  0   |       F e l i z       |   0'
        write(6,*) '  |   |/\/\/\/\/\/\/\/\/\/\/\/|   |'
        write(6,*) ' _|___|_______________________|___|__'
        write(6,*) '|/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/|'
        write(6,*) '|                                   |'
        write(6,*) '|        C u m p l e a ñ o s        |'
        write(6,*) '|                                   |'
        write(6,*) '| ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ |'
        write(6,*) '|                                   |'
        write(6,*) '|           @EvilDragon! ! !        |'
        write(6,*) '|                                   |'
        write(6,*) '|/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/|'
        write(6,*) '|___________________________________|'
      endif

      end

And... It lives...:

 

[FBnil]

48617070792042697274686461792C204544

$ perl -E 'say pack("H*","48617070792042697274686461792C204544")'
Happy Birthday, ED

 

[Arkay Firestar]

Happy birthday, ED!

 

[ptitSeb]

Happy birthday, joyeux anniversaire!

 

[Phosphate]

Happy Birthday ED!

 

[Silent-Hunter]

Let's add a bit of old school style...:

      write(6,*) 'Feliz cumpleaños @EvilDragon.'

209   write(6,*) 'Want some cake?: (1)Sure (2)Nah'
      read(5,*) ipr2
      if(ipr2.lt.1) then
        write(6,*) 'Error!'
        goto 209
      endif
      if(ipr2.gt.2) then
        write(6,*) 'Error!'
        goto 209
      endif

      if(ipr2.lt.2) then
        write(6,*) '                0   0'
        write(6,*) '                |   |'
        write(6,*) '            ____|___|____'
        write(6,*) '         0  |~ ~ ~ ~ ~ ~|   0'
        write(6,*) '         |  |           |   |'
        write(6,*) '      ___|__|___________|___|__'
        write(6,*) '      |/\/\/\/\/\/\/\/\/\/\/\/|'
        write(6,*) '  0   |       F e l i z       |   0'
        write(6,*) '  |   |/\/\/\/\/\/\/\/\/\/\/\/|   |'
        write(6,*) ' _|___|_______________________|___|__'
        write(6,*) '|/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/|'
        write(6,*) '|                                   |'
        write(6,*) '|        C u m p l e a ñ o s        |'
        write(6,*) '|                                   |'
        write(6,*) '| ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ |'
        write(6,*) '|                                   |'
        write(6,*) '|           @EvilDragon! ! !        |'
        write(6,*) '|                                   |'
        write(6,*) '|/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/|'
        write(6,*) '|___________________________________|'
      endif

      return

      end

And... It lives...:

View attachment 36594

Wait, you can do (5,*) and (6,*)? I did (*,*) for both read and write.

 

[Linux-SWAT]

Happy birthday !!!

 

[lordbobjones]

Happy Birthday!

 

[RZR]

Wait, you can do (5,*) and (6,*)? I did (*,*) for both read and write.

Standard FORTRAN reserves two UNIT numbers for I/O to user. They are:

UNIT = 5 for INPUT from the keyboard with the READ statement

UNIT = 6 for OUTPUT to the screen with the WRITE statement


Most versions of FORTRAN will also let you use the ASTERISK (*) for I/O to the TERMINAL. The asterisk can be used with both the READ and WRITE statements, thus there is no need to remember whether 5 or 6 is for input or output.

(5,*) and (6,*) is what you are supposed to do , but you can also do (*,*) in some cases:

If the compiler is using the default values for standard input and output, it's the same; if not, "*" is whatever environment variable was set. And you can't use "*" to output to files or input from them so I guess I got used to always putting a unit number back in the day... Anyway my FORTRAN is rusty as hell, but I always loved the ability of wreaking havoc with "goto"s, it's a lost art these days

 

[matzesu]

I wonder if the Boxes for the Pyra arrived in the Meantime,
Saw the Dragonbox Flix this morning about this Mini Notebook whit the "Joycon Controllers" , and wonder if the next Dragonboxflix episode may be about the Pyra...
Fortunly i found the Voucher Code this Weekend on my Dads Windows 8 Convertible, now its securely on my Stick, so im ready for Final Order...

 

[matzesu]

I just though i allready put this on my USB Stick, but seems like it was just on this Windows 8 Tablett and hopefully on my Own Thinkpad but i ditnt look at this.. I also though i put the Email whit the Voucher on a "Bill" Folder in Thunderbirth, but seems like i ditnt dit this..

Its also a bit confusing when you dont write on the TXT File i put the Code in that its the "Preeorder Code" , because i also have the "PreePreeOrderCode", but i think the Older Code is 290 € and the current code is 400 € worth..