It reminds me of the Pandora!

[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..

 

[JDTAY]

The dragon is still alive, in case anyone was wondering. Less than two hours ago on Discord, he fielded a question about when Pyras would be available for non-preorderers.

Spoiler: Pyra spoilers

He says it depends on a variety of factors he doesn't know about yet, like lead time for certain parts that are ordered in batches of 500, and how fast assembly goes, but estimated it would be at least six months after he starts filling preorders. And we still don't even know when he'll start filling preorders.