Editing icons on posts

[campsawyer]

Here is the scarier part, does anyone remember the code in the description?

I used punch cards for my FORTRAN class back in 1982.

There you go, do you recognize the code?

[J6A]

When I was taking computer classes in high school (circa 1978), there was only one computer lab in the county, and we got bussed there once per week. We programmed in punch cards, in BASIC, IIRC. Even with all of the effort, it was the coolest thing ever to be able to say I could program.

[Dean_P]

Here is the scarier part, does anyone remember the code in the description?

I used punch cards for my FORTRAN class back in 1982.

I was the last class to use punch cards at our college. the quarter after I took FORTRAN, they ripped the card punch machines out and put in VAX terminals.

By the way, that looks like Basic... FORTRAN code starts in column 7 and that card started in column 1 (with what looks like a line number). Columns 1-5 were reserved for line numbers, 6 for a continuation marker...

[tlangston28]

Holy crap! that is BASIC - truly old school basic with line numbers and everything

That card is still in pretty good shape.

It looks like a loop initializing different two-dimensional array variables to zero
(The colons are code separators denoting the "end of the line" or concatenating code lines.) .

In a "modern" dev environment, the code would look like this:

(the previous card must have had a "FOR J = 1 to something" line)
407 M(1,J) = M(2,2*J-1)
410 NEXT J
420 FOR J = 1 TO 100
425 T(2,J) = 0
426 S(2,J) = 0
427 M(2,J) = 0

Yeah, I am a geek, but it ended up turning into a fairly well-paying gig...

[campsawyer]

Holy crap! that is BASIC - truly old school basic with line numbers and everything

That card is still in pretty good shape.

It looks like a loop initializing different two-dimensional array variables to zero
(The colons are code separators denoting the "end of the line" or concatenating code lines.) .

In a "modern" dev environment, the code would look like this:

(the previous card must have had a "FOR J = 1 to something" line)
407 M(1,J) = M(2,2*J-1)
410 NEXT J
420 FOR J = 1 TO 100
425 T(2,J) = 0
426 S(2,J) = 0
427 M(2,J) = 0

Yeah, I am a geek, but it ended up turning into a fairly well-paying gig...

Good job Tony. Yes it is doing some sort of initialization.