my-first-programs

KO | EN

gitlite — search

#javascript #python #ai #llm #go #rust #deep-learning #docker #awesome #kubernetes #awesome-list #vue #pytorch #open-source

my-first-programs

(★ 57)

Old pascal programs I wrote in the early nineties

File Explorer

Download Latest Version (.zip)

- animotion.gif
- ANMOTION.COM
- ANMOTION.PAS
- README.md
- ASTEROID.COM
- asteroid.gif
- ASTEROID.PAS
- README.md
- BALL.COM
- ball.gif
- BALL.PAS
- README.md
- BASEBALL.COM
- baseball.png
- README.md
- TRICK.PAS
- BLOW.COM
- blow.gif
- BLOW.PAS
- README.md
- cars.gif
- CARS.PAS
- CARS2.COM
- README.md
- CHESS.COM
- CHESS.PAS
- chess.png
- README.md
- CODE.COM
- CODE.PAS
- code1.png
- code2.png
- README.md
- CURVE.COM
- CURVE.PAS
- curve.png
- README.md
- DIARY.COM
- DIARY.DAT
- DIARY.PAS
- diary.png
- READD.COM
- readd.png
- README.md
- DOG.COM
- DOG.PAS
- dog.png
- README.md
- FIB.COM
- FIB.PAS
- fib.png
- README.md
- FLOWER.COM
- flower.gif
- FLOWER.PAS
- README.md
- GOMOKU.COM
- GOMOKU.PAS
- gomoku.png
- README.md
- GRAPH.COM
- GRAPH.PAS
- graph.png
- README.md
- GRAPHICS.COM
- graphics.gif
- GRAPHICS.PAS
- README.md
- HANOI.COM
- HANOI.PAS
- hanoi.png
- README.md
- INDIANS.COM
- indians.gif
- INDIANS.PAS
- README.md
- MASTER.PAS
- MASTER2.PAS
- MASTERMI.COM
- MASTERMI.PAS
- mastermind1.png
- mastermind2.png
- mastermind3.png
- mastermind4.png
- mastermind5.png
- README.md
- MELT.COM
- melt.gif
- MELT.PAS
- README.md
- MINES.COM
- mines.gif
- MINES.PAS
- README.md
- MISSLE.COM
- MISSLE.PAS
- missle.png
- README.md
- MONEY.COM
- MONEY.PAS
- money.png
- README.md
- MUSIC.COM
- MUSIC.PAS
- music.png
- README.md
- OPT1.COM
- OPT1.PAS
- opt1.png
- OPT2.COM
- OPT2.PAS
- opt2.png
- OPT3.COM
- OPT3.PAS
- opt3.png
- OPT4.COM
- OPT4.PAS
- opt4.png
- OPT5.COM
- OPT5.PAS
- opt5.png
- OPT6.COM
- OPT6.PAS
- opt6.png
- OPT7.COM
- OPT7.PAS
- opt7.png
- OPT8.COM
- OPT8.PAS
- opt8.png
- OPT9.PAS
- README.md
- OTHELLO.COM
- OTHELLO.PAS
- othello.png
- README.md
- POP.PAS
- pop.png
- README.md
- POP-UP.COM
- pop-up.gif
- POP-UP.PAS
- README.md
- POSTFIX.PAS
- postfix.txt
- README.md
- DRAWING.PAS
- PSYCHO.COM
- psycho.gif
- README.md
- README.md
- REFLEX.COM
- reflex.gif
- REFLEX.PAS
- README.md
- SEA.COM
- sea.gif
- SEA.PAS
- README.md
- STARS.COM
- stars.gif
- STARS.PAS
- README.md
- TICTACTO.COM
- TICTACTO.PAS
- tictacto.png
- README.md
- UNSCRAM.COM
- UNSCRAM.PAS
- unscram1.png
- unscram2.png
- README.md
- WAR.COM
- WAR.PAS
- war.png
- README.md
- WEIRD.COM
- weird.gif
- WEIRD.PAS
.gitignore
README.md

// repository documentation

Was this content helpful?

★ 0 (0 ratings)

# my-first-programs

About ten years ago, I went with my father to my grandfather's house because my dad had our old family computer there and it was still able to start up, but we knew it wouldn't be able to for much longer.  This computer had all of my old computer games that I programmed when I was a teenager, and I planned to copy them onto a 5¼-inch floppy disk, transfer it to my grandfather's computer which had a 5¼-inch floppy disk drive, but also a 3½-inch floppy disk drive.  Once I got them on a 3½-inch floppy disk, I could then copy them to my laptop and anywhere else.  I was able to copy most of the stuff, and they have been sitting on my hard drive and dropbox for a while, but now I'm finally putting them on Github.

These programs represent a very special and meaningful part of my childhood.  I didn't have many friends around this time and I remember spending all day and late nights during summer break sitting at my computer making games and messing around.  My uncle John introduced me to programming in Pascal because he was taking a computer programming class at the University of Akron.  My grandfather saw my interest and bought me a thick Pascal reference book, which I pored over endlessly.  It was so awesome to me to be able to make things - cool things - on my computer.  It gave me a lot of confidence and made me happy.

It was a lot of fun going through these old programs and running them again.  Some of them I hadn't seen in almost 25 years, so it was a blast from the past.  I downloaded [DOSBox](http://www.dosbox.com/) and was able to run the old compiled versions and take screenshots, which you can see below.  I've added some notes to go along with them.

# [animotion](https://github.com/ca98am79/my-first-programs/tree/master/animotion)

Experimenting with graphics.  [The reference to John at the bottom line of the code](https://github.com/ca98am79/my-first-programs/blob/master/animotion/ANMOTION.PAS#L202) is my uncle who introduced me to Pascal progamming.  He must have been giving me a hard time about the structure of my code.

![Animotion program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/animotion/animotion.gif)

# [asteroid](https://github.com/ca98am79/my-first-programs/tree/master/asteroid)

A space fighter game.  In the source code [a variable is named "missyconrad"](https://github.com/ca98am79/my-first-programs/blob/master/asteroid/ASTEROID.PAS#L399) - this is the name of a girl I had a crush on in school.

![Asteroid program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/asteroid/asteroid.gif)

# [ball](https://github.com/ca98am79/my-first-programs/tree/master/ball)

An experiment with sprites to bounce a ball

![Ball program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/ball/ball.gif)

# [baseball](https://github.com/ca98am79/my-first-programs/tree/master/baseball)

A trick program that makes you think it is deleting all files on your drive.  I totally forgot about it and, after all these years, when I ran the program I totally fell for it.  I expected it to be a baseball game and was startled and freaked out for a moment, thinking it may have deleted my files.  Ha.

~~I can't find the source code.~~ [I found the source](https://github.com/ca98am79/my-first-programs/blob/master/baseball/TRICK.PAS) - it had a different filename.

![baseball program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/baseball/baseball.png)

# [blow](https://github.com/ca98am79/my-first-programs/tree/master/blow)

Some weird missile game that I don't think you even do anything with except watch it and hope for the best.  You will notice my reuse of the explosion sprite graphic - I use this in a few different programs.

![blow program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/blow/blow.gif)

# [cars](https://github.com/ca98am79/my-first-programs/tree/master/cars)

My epic car game.  It was my only [side-scrolling](https://en.wikipedia.org/wiki/Side-scrolling_video_game) game, and I only made four screens for it, so there is no way to win.  Maybe some day I or others can fork and continue the game, but it would take some work since the [sprites/inc files](https://github.com/ca98am79/my-first-programs/blob/master/cars/CARS.PAS#L2-L11) are missing.

![Car program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/cars/cars.gif)

# [chess](https://github.com/ca98am79/my-first-programs/tree/master/chess)

A chess program that actually played legal moves.  They were random moves, but at least they were legal!

![Chess program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/chess/chess.png)

# [code](https://github.com/ca98am79/my-first-programs/tree/master/code)

It reads a file and then outputs it in code form, which means it just substitutes random but consistent letters for other letters.

![Code program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/code/code1.png)

![Code program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/code/code2.png)

# [diary](https://github.com/ca98am79/my-first-programs/tree/master/diary)

I created this diary program and had it run every time the computer booted up at our house.  So I have log entries from myself, my sisters, my parents and friends starting on July 13 1992.  The last entry is from my dad, who kept our old computer around for nostalgic reasons, dated Sept.10th, 2006.  If it weren't for him taking care of the old family computer, this stuff would have been lost.

It comes with a program READD.COM, which is used to read the log entries.

![Diary program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/diary/diary.png)

![Readd program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/diary/readd.png)

# [flower](https://github.com/ca98am79/my-first-programs/tree/master/flower)

Experimenting with graphics.  Pressing the spacebar updates the screen.

![Flower program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/flower/flower.gif)

# [gomoku](https://github.com/ca98am79/my-first-programs/tree/master/gomoku)

A [gomoku](https://en.wikipedia.org/wiki/Gomoku) game I made.  It's played on a Go board and you try to get 5 in a row to win.  The computer plays pretty well - better than random!

![Gomoku program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/gomoku/gomoku.png)

# [mastermind](https://github.com/ca98am79/my-first-programs/tree/master/mastermind)

A [mastermind](https://en.wikipedia.org/wiki/Mastermind_(board_game)) game I made.  This was fun and it was probably the game I made that I played the most.  Either this or [gomoku](https://github.com/ca98am79/my-first-programs/tree/master/gomoku), although I was more proud of gomoku because it had some intelligence.

![mastermind program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/mastermind/mastermind1.png)

![mastermind program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/mastermind/mastermind2.png)

![mastermind program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/mastermind/mastermind3.png)

![mastermind program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/mastermind/mastermind4.png)

![mastermind program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/mastermind/mastermind5.png)

# [melt](https://github.com/ca98am79/my-first-programs/tree/master/melt)

This is the kind of stuff I did for fun as a kid.

![Melt program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/melt/melt.gif)

# [mines](https://github.com/ca98am79/my-first-programs/tree/master/mines)

Can you figure out how to get the treasure?  Not sure why I called it "mines" - I probably had a different idea when I started.  Also, this is heavily influenced from [Hack/Nethack](https://en.wikipedia.org/wiki/Hack_(video_game)), which I *loved*.

![Mines program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/mines/mines.gif)

# [music](https://github.com/ca98am79/my-first-programs/tree/master/music)

Another trick program (like [baseball](https://github.com/ca98am79/my-first-programs/tree/master/baseball)).  Experimenting with pascal audio.

![Music program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/music/music.png)

# [opt](https://github.com/ca98am79/my-first-programs/tree/master/opt)

My experiments with [autostereograms](https://en.wikipedia.org/wiki/Autostereogram) - pretty cool!

![opt1 program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/opt/opt1.png)

![opt2 program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/opt/opt2.png)

![opt3 program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/opt/opt3.png)

![opt4 program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/opt/opt4.png)

![opt5 program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/opt/opt5.png)

![opt6 program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/opt/opt6.png)

![opt7 program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/opt/opt7.png)

![opt8 program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/opt/opt8.png)

# [psycho](https://github.com/ca98am79/my-first-programs/tree/master/psycho)

Playing around with graphics

![Psycho program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/psycho/psycho.gif)

# [reflex](https://github.com/ca98am79/my-first-programs/tree/master/reflex)

A line goes towards another line and you press the space bar to start/stop it.  You try to get it as close to the other line as you can, and it gets faster and faster each level.  I think there was a high score list, so I was always competing with myself or friends or my sister.

![Reflex program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/reflex/reflex.gif)

# [sea](https://github.com/ca98am79/my-first-programs/tree/master/sea)

Fish game.  Also, it looks similar to [asteroid](https://github.com/ca98am79/my-first-programs/tree/master/asteroid), in that [girls that I had crushes on in school made it on the variables list](https://github.com/ca98am79/my-first-programs/blob/master/sea/SEA.PAS#L17).

![Sea program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/sea/sea.gif)

# [stars](https://github.com/ca98am79/my-first-programs/tree/master/stars)

Must have been one of my first programs.  Although, [you can see in the code I have specific plots](https://github.com/ca98am79/my-first-programs/blob/master/stars/STARS.PAS#L54-L65) (not just random) - I wonder what I was up to?  Probably just messing around.

![Stars program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/stars/stars.gif)

# [unscram](https://github.com/ca98am79/my-first-programs/tree/master/unscram)

Enter a scrambled word and this program will unscramble it for you!  Only, it just prints out all combinations of the letters, so not very useful.  I did add some logic to try to highlight words that may be more likely to be correct.  I remember trying to find a dictionary file, but I couldn't get one - this was before I had access to the Internet.  I think I searched our Word Perfect installation files, but I couldn't find anything to use.

![Unscram program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/unscram/unscram1.png)

![Unscram program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/unscram/unscram2.png)

# [weird](https://github.com/ca98am79/my-first-programs/tree/master/weird)

Experimenting with graphics.

![Weird program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/weird/weird.gif)

# [war](https://github.com/ca98am79/my-first-programs/tree/master/war)

The card game "[war](https://en.wikipedia.org/wiki/War_(card_game))."

![War program screenshot](https://raw.githubusercontent.com/ca98am79/my-first-programs/master/war/war.png)

my-first-programs

File Explorer

Today's picks

Was this content helpful?

Recent Feedback

my-first-programs

File Explorer

Today's picks

Was this content helpful?

Recent Feedback

Download README