+- PG-HQ Forums (https://www.pg-hq.com/comms)
+-- Forum: Panzer Grenadier (https://www.pg-hq.com/comms/forumdisplay.php?fid=3)
+--- Forum: PG-HQ Q&A (https://www.pg-hq.com/comms/forumdisplay.php?fid=8)
+--- Thread: Editing icons on posts (/showthread.php?tid=380)
RE: Editing icons on posts - campsawyer - 11-22-2012
(11-22-2012, 02:51 AM)Michael Murphy Wrote:(11-22-2012, 01:48 AM)campsawyer Wrote: 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?
RE: Editing icons on posts - J6A - 11-23-2012
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.
RE: Editing icons on posts - Dean_P - 11-23-2012
(11-22-2012, 02:51 AM)Michael Murphy Wrote:(11-22-2012, 01:48 AM)campsawyer Wrote: 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...
RE: Editing icons on posts - tlangston28 - 11-24-2012
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...
RE: Editing icons on posts - campsawyer - 11-25-2012
(11-24-2012, 04:33 PM)tlangston28 Wrote: 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.