Books > 50 Simple, Ready-to-Run VIC-20 Programs
50 Simple, Ready-to-Run VIC-20 Programs (US)
Barbara Fulgham
Tab Books, 1984
Download all programs from this book on one disk:
![]() 50 Simple Progs.d64 |
87 programs
Chapter 1: Math
Program | Author | Requirements | Files | Info |
Whole Numbers![]() Pages 1-3. |
Barbara Fulgham | Unexpanded | whole numbers.prg Screenshot |
Add, subtract, multiply or divide any two numbers. Controls: Follow on-screen prompts. |
Fractions![]() Pages 3-5. |
Barbara Fulgham | Unexpanded | fractions.prg Screenshot |
Add, subtract, multiply or divide any two fractions, and optionally reduce the answer to a compound number. Controls: Follow on-screen prompts. |
Sums A![]() Pages 5-7. |
Barbara Fulgham | Unexpanded | sums a.prg Screenshot |
Add two or more numbers to calculate the total. Controls: Follow on-screen prompts. |
Sums B![]() Pages 5-7. |
Barbara Fulgham | Unexpanded | sums b.prg Screenshot |
Calculate a continuous sum for any positive integer. Controls: Follow on-screen prompts. |
Factors![]() Pages 7-8. |
Barbara Fulgham | Unexpanded | factors.prg Screenshot |
Determine what numbers can be used to divide a larger number. Controls: Enter the number you want to divide, and the factor you want to test. |
Percentage![]() Pages 8-10. |
Barbara Fulgham | Unexpanded | percentage.prg Screenshot |
Convert either a fraction or a decimal into the percentage equivalent. Controls: Follow on-screen prompts. |
Means![]() Pages 10-11. |
Barbara Fulgham | Unexpanded | means.prg Screenshot |
Calculate the arithmetic, geometric or harmonic mean for a set of numbers. Controls: Follow on-screen prompts. |
Slope![]() Pages 11-16. |
Barbara Fulgham | Unexpanded | slope.prg Screenshot |
Calculates the slope of an incline. More specifically, given two pieces of information about a right-angle triangle, it will calculate the other three items. Controls: Follow on-screen prompts. |
Astronomical Distance Converter![]() Pages 17-18. |
Barbara Fulgham | Unexpanded | astro dist conv.prg Screenshot |
Astronomy program, convert distances from/to light years, parsecs, kilometres, miles or astronomical units. Controls: Follow on-screen prompts. |
Trigonometric Functions![]() Pages 19-21. |
Barbara Fulgham | Unexpanded | trigonometric.prg Screenshot |
Calculates 24 trigonometric functions on an angle, with an option to convert degrees into radians. Controls: Follow on-screen prompts. |
Polar/Rectangular Conversions![]() Pages 22-23. |
Barbara Fulgham | Unexpanded | polar-rect conv.prg Screenshot |
Convert polar coordinates into rectangular coordinates, and vice versa. Controls: Follow on-screen prompts. |
Geometric Formulas![]() Pages 24-26. |
Barbara Fulgham | Unexpanded | geometric form.prg Screenshot |
Calculate the area, surface area or volume of various geometric shapes, including spheres, cylinders and pyramids. Controls: Follow on-screen prompts. |
Linear Equations![]() Pages 27-28. |
Barbara Fulgham | Unexpanded | linear equation.prg Screenshot |
Solve linear equations with two variables. Controls: Follow on-screen prompts. |
Quadratic Equations![]() Pages 28-29. |
Barbara Fulgham | Unexpanded | quadratic equat.prg Screenshot |
Solve quadratic equations. Controls: Follow on-screen prompts. |
Graphing Quadratic Equations![]() Pages 29-30. |
Barbara Fulgham | Unexpanded | quadratic graph.prg Screenshot |
Displays a list of coordinates for a quadratic equation, that can be used to plot it onto a graph. Controls: Follow on-screen prompts. |
Matrix Addition and Subtraction![]() Pages 31-33. |
Barbara Fulgham | Unexpanded | matrices.prg Screenshot |
Add or subtract two matrices of equal size. Controls: Follow on-screen prompts. |
Metric Conversions![]() Pages 33-36. |
Barbara Fulgham | Unexpanded | metric convert.prg Screenshot |
Convert between metric and imperial measures, e.g. square feet to square metres. Controls: Follow on-screen prompts. |
Chapter 2: Home Uses
Program | Author | Requirements | Files | Info |
Charge Accounts![]() Pages 37-39. |
Barbara Fulgham | Unexpanded | charge accounts.prg Screenshot |
Keep track of up to seven credit cards/store charge cards, to add up how much you owe, how much interest you are paying, and how much you have paid. Edit the names of the cards by changing the DATA statements in lines 150-155. Controls: Follow on-screen prompts. |
Checkbook![]() Pages 39-41. |
Barbara Fulgham | Unexpanded | checkbook.prg Screenshot |
Balance your cheque book by entering details of each cheque and deposit. Controls: Follow on-screen prompts. |
Gas Mileage![]() Pages 41-42. |
Barbara Fulgham | Unexpanded | gas mileage.prg Screenshot |
Calculate the fuel economy of your vehicle, in miles per gallon. Controls: Enter the mileage at the last fillup, the current mileage, and how many gallons it took to fill the tank. |
Household Weights and Measures![]() Pages 42-46. |
Barbara Fulgham | Unexpanded | house wght meas.prg Screenshot |
Unit conversion calculator, converts teaspoons, cups, pints, bushels, etc. Most modes convert the required unit into several other units, e.g. cups = tablespoons = teaspoons. Controls: Follow on-screen prompts. |
Job Jar![]() Pages 46-47. |
Barbara Fulgham | Unexpanded | job jar.prg Screenshot |
Let the computer randomly decide who will do household chores like cleaning the yard or washing the pots. Controls: Follow on-screen prompts. |
Monthly Household Expenses![]() Pages 48-49. |
Barbara Fulgham | Unexpanded | monthly expense.prg Screenshot |
Calculate your monthly expenses by adding up how much you spend on twenty categories, e.g. rent, electricity, water etc. Controls: Follow on-screen prompts. |
Yearly Household Expenses![]() Pages 49-50. |
Barbara Fulgham | Unexpanded | yearly expense.prg Screenshot |
Calculate your yearly expenses by adding up how much you spend each month. Controls: Follow on-screen prompts. |
Cost of Working![]() Pages 50-52. |
Barbara Fulgham | Unexpanded | cost of working.prg Screenshot |
Add up your job-related expenses to work out if it makes financial sense returning to work. Controls: Follow on-screen prompts. |
Savings Account![]() Pages 53-55. |
Barbara Fulgham | Unexpanded | savings account.prg Screenshot |
Calculate how much interest you could earn from a lump sum or regular deposits, with either simple or compound interest. Controls: Follow on-screen prompts. |
Time/Amount![]() Pages 56-57. |
Barbara Fulgham | Unexpanded | time-amount.prg Screenshot |
Calculate how long it will take to save up a required amount of money. Controls: Follow on-screen prompts. |
Affording a Loan![]() Pages 58-59. |
Barbara Fulgham | Unexpanded | afford a loan.prg Screenshot |
Calculate what sized loan you can borrow, by entering how much you want to repay each month, the duration, and interest rate. Controls: Follow on-screen prompts. |
Payment Required![]() Pages 60-61. |
Barbara Fulgham | Unexpanded | payment req.prg Screenshot |
Calculate how much the repayments will cost to borrow a specific amount of money, to see if you can afford it. Controls: Follow on-screen prompts. |
Interest/Principal![]() Pages 61-62. |
Barbara Fulgham | Unexpanded | interest-prncpl.prg Screenshot |
Calculate how much of each loan payment goes towards paying the interest, and how much towards the principal amount. Controls: Follow on-screen prompts. |
Balance Loan![]() Pages 63-64. |
Barbara Fulgham | Unexpanded | balance loan.prg Screenshot |
Calculate how much money you still owe on loan repayments. Controls: Follow on-screen prompts. |
Chapter 3: Graphics
Program | Author | Requirements | Files | Info |
Draw a Person![]() Pages 66-67. |
Barbara Fulgham | Unexpanded | draw a person.prg Screenshot |
Draws a woman on the screen using POKE commands. Controls: None. |
Message in a Box![]() Pages 67-68. |
Barbara Fulgham | Unexpanded | msg in a box.prg Screenshot |
Displays a message in a box. Controls: None. |
The PRINT SPC Method![]() Pages 68-69. |
Barbara Fulgham | Unexpanded | print spc.prg Screenshot |
Draws a man on the screen using PRINT SPC() to position each character. Controls: None. |
The POKE and PRINT SPC Methods![]() Pages 69-70. |
Barbara Fulgham | Unexpanded | poke print spc.prg Screenshot |
Draws a man & woman on the screen using both POKE and PRINT SPC(). Controls: None. |
PRINT SPC on the Constantly Reset Screen![]() Page 70. |
Barbara Fulgham | Unexpanded | print spc crs.prg Screenshot |
Draws a dog using PRINT SPC() to position the graphics from the beginning of each new line. Controls: None. |
PRINT CHR$(145)![]() Pages 70-71. |
Barbara Fulgham | Unexpanded | print chr145.prg Screenshot |
The line of hearts disappears, demonstrating how CHR$(145) can be used to overwrite the previous line. Controls: None. |
Three Methods Combined![]() Page 71. |
Barbara Fulgham | Unexpanded | three combined.prg Screenshot |
Watch how the circles change. This demonstrates the combined use of SPC, CHR$(19) and CHR$(145). Controls: None. |
PRINT and POKE![]() Page 71. |
Barbara Fulgham | Unexpanded | heart circle.prg Screenshot |
The PRINT and POKE commands are used together to alternate between a heart and a circle. Controls: None. |
Color Using the POKE Command![]() Page 72. |
Barbara Fulgham | Unexpanded | color poke.prg Screenshot |
Displays a red heart, as a demonstration of using POKE to change the colour of a character. Controls: None. |
Looping to Form a String![]() Pages 72-73. |
Barbara Fulgham | Unexpanded | looping string.prg Screenshot |
Displays a string of red hearts using a FOR/NEXT loop Controls: None. |
Separate Loops for Spacing/Coloring![]() Page 73. |
Barbara Fulgham | Unexpanded | separate loops.prg Screenshot |
Displays the hearts in two colours, using separate FOR/NEXT loops. Controls: None. |
Loops for Many Tasks![]() Pages 73-74. |
Barbara Fulgham | Unexpanded | loop many tasks.prg Screenshot |
Asks you to enter three names, to show how FOR/NEXT loops can be used for many tasks. Controls: Follow on-screen prompts. |
Setting Different Colors![]() Pages 74-75. |
Barbara Fulgham | Unexpanded | set diff colors.prg Screenshot |
Displays a string of hearts in with different colours. Controls: None. |
Changing One Heart's Color![]() Page 75. |
Barbara Fulgham | Unexpanded | chng heart col.prg Screenshot |
Displays three hearts, that cycle through various colours. Controls: None. |
Rainbow Colors![]() Pages 75-76. |
Barbara Fulgham | Unexpanded | rainbow colors.prg Screenshot |
Displays a message in various colurs. Controls: None. |
Color Symbols![]() Pages 76-77. |
Barbara Fulgham | Unexpanded | color symbols.prg Screenshot |
Displays some colourful characters. Controls: None. |
Color Added![]() Page 77. |
Barbara Fulgham | Unexpanded | color added.prg Screenshot |
Draws a colourful man & woman on the screen. Controls: None. |
Independent Movement![]() Pages 78-80. |
Barbara Fulgham | Unexpanded | ind movement.prg Screenshot |
Moves an object horizontally or vertically from each side of the screen. Controls: None. |
Diagonal Independent Movement![]() Pages 80-81. |
Barbara Fulgham | Unexpanded | diagonal move.prg Screenshot |
Moves a ball diagonally from each corner of the screen. Controls: None. |
Complete Animation![]() Pages 81-83. |
Barbara Fulgham | Unexpanded | complete anim.prg Screenshot |
Moves an animated figure on the screen. Controls: None. |
Dependent Movement![]() Pages 83-84. |
Barbara Fulgham | Unexpanded | marked trail.prg Screenshot |
Move a character around the screen, leaving a trail behind it. Controls: Q (left), W (right), P (up), O (down). |
Multidirectional Movement![]() Page 84. |
Barbara Fulgham | Unexpanded | multidir move.prg Screenshot |
Move a character around the screen in larger steps, without leaving a trail. After each move, the character vanishes after a few seconds. Controls: Q (left), W (right), P (up), O (down). |
User-Altered Direction![]() Pages 84-85. |
Barbara Fulgham | Unexpanded | user-alt dir.prg Screenshot |
Control a ball that constantly moves in a downward diagonal direction. Don't let it leave the screen! Controls: Q (left), W (right), P (up), O (down). |
Screen Boundaries![]() Pages 85-86. |
Barbara Fulgham | Unexpanded | screen bound.prg Screenshot |
Control a ball that constantly moves in a downward diagonal direction, this time with a boundary around the edge of the screen. Controls: Q (left), W (right), P (up), O (down). |
Kick![]() Page 86. |
Barbara Fulgham | Unexpanded | kick.prg Screenshot |
Displays a picture of a dog kicking its legs in excitement. Controls: None. |
Chapter 4: Games
Program | Author | Requirements | Files | Info |
States and Capitals![]() Pages 88-90. |
Barbara Fulgham | Unexpanded | states capitals.prg Screenshot |
Educational quiz for 1 or 2 players. Test your knowledge of the American states. You will be told the name of a capital city and must identify the state. If your first two guesses are incorrect (or spelled wrongly), it will display the state's nickname and give you one last try. Controls: Follow on-screen prompts. |
Craps![]() Pages 90-93. |
Barbara Fulgham | Unexpanded | craps.prg Screenshot |
Dice game. Rolling a 7 or 11 on your first roll wins, while a 2, 3 or 12 loses. If you roll any other number, then you must roll that same number again before rolling a 7 or 11. Controls: Follow on-screen prompts. |
Acey-Deucy![]() Pages 93-95. |
Barbara Fulgham | Unexpanded | acey-deucy.prg Screenshot |
Card game. Two cards are dealt, and you must bet that a third card will fall between the values of the first two. Controls: Enter the amount of each bet. |
Darts![]() Pages 96-98. |
Barbara Fulgham | Unexpanded | darts.prg Screenshot |
Darts game for 1-5 players. The first player to reach 200 points wins. Controls: Enter the type of throw: 1 (fast throw), 2 (calculated throw), 3 (eyes closed). |
What's My Number?![]() Pages 98-100. |
Barbara Fulgham | Unexpanded | whats my number.prg Screenshot |
Guessing game. The computer chooses a random number between 1-100. Can you work it out using no more than six guesses? Controls: Enter your guess (1-100). |
Home Free![]() Pages 100-102. |
Barbara Fulgham | Unexpanded | home free.prg Screenshot |
Game for 1-5 players. You must race through the back yard to see who will be the first person to reach the 25th post. On each turn you can move forward up to five posts, but some posts have helpers and others have setbacks that effect how far you move. Controls: Enter how far to move (1-5). |
Treasure Hunt![]() Pages 103-105. |
Barbara Fulgham | Unexpanded | treasure hunt.prg Screenshot |
Game for 1-5 players. Players must race to find Capt Short Haul's treasure chest. On each turn you can move forward up to five paces, where a message will tell you to either go further or turn back. Controls: Enter how far to move (1-5). |
Tic-Tac-Toe![]() Pages 106-108. |
Barbara Fulgham | Unexpanded | tic-tac-toe.prg Screenshot |
2-player naughts and crosses. Players take it in turns to place an X or O on the grid. The first player to get a row of three wins. The game may crash if it ends in a draw. Controls: Type the location of your move, a comma, then your symbol e.g. "5,X". |
Rock-Paper-Scissors![]() Pages 108-110. |
Barbara Fulgham | Unexpanded | rock-paper-scis.prg Screenshot |
Classic game played against the computer. Paper covers rock; rock breaks scissors; scissors cuts paper. How many times can you win? Controls: For each round, type 'rock', 'paper' or 'scissors'. |
Guess My Letter![]() Pages 110-112. |
Barbara Fulgham | Unexpanded | guess my letter.prg Screenshot |
Guessing game. The computer randomly chooses a letter, you get five guesses to work out what it is. Controls: Type your guess (A-Z). |
How's Your Math?![]() Pages 113-116. |
Barbara Fulgham | Unexpanded | hows your math.prg Screenshot |
Test your mental arithmetic by answering addition, subtraction, multiplication or dividion problems. There are three difficulty levels. Controls: Type the answer. |
Mastermind![]() Pages 116-119. |
Barbara Fulgham | Unexpanded | mastermind.prg Screenshot |
Mastermind game. You must work out a 4-colour code chosen by the computer. A black peg means you have a correct colour in the correct place and a red peg means a correct colour in the wrong place. Controls: Type your guess by entering four numbers separated by commas, e.g. "3,6,7,5". |
Draw![]() Pages 119-120. |
Barbara Fulgham | Unexpanded | draw.prg Screenshot |
Draw simple lo-res pictures. Controls: Q (left), W (right), P (up), O (down), B (clear screen), T (quit). |
Zoo![]() Pages 120-123. |
Barbara Fulgham | Unexpanded | zoo.prg Screenshot |
Name each animal from its description. You are given up to three clues for each one. Controls: Type the name of each animal, or "quit" to end the game and view your score. |
Amaze![]() Pages 123-126. |
Barbara Fulgham | Unexpanded | amaze.prg Screenshot |
Maze game. Thieves have robbed the gravedigger's retirement home. You have two minutes to recover the money from the maze. Try not to punch holes in the walls. Controls: Q (left), W (right), P (up), O (down). |
Alphabet Story![]() Pages 126-128. |
Barbara Fulgham | 3K expansion | alpha story 3k.prg Screenshot |
A list of 25 words is briefly shown on the screen, each starting with a different letter of the alphabet (there is no word beginning with X). You must type these words in alphabetical order, spelling each one correctly. The computer will then use those words to display a story. Note: Works best with 3K expansion to avoid 'out of memory' errors. Controls: Type the word beginning with A, then the word beginning with B, and so on through to the word beginning with Z. |
Chapter 5: Music
Program | Author | Requirements | Files | Info |
On Top of Old Smoky![]() Page 130. |
Barbara Fulgham | Unexpanded | old smoky.prg Screenshot |
Plays the tune "On Top of Old Smoky". Controls: None. |
It Was a Very Good Year![]() Page 131. |
Barbara Fulgham | Unexpanded | very good year.prg Screenshot |
Plays the tune "It Was a Very Good Year". Controls: None. |
Clementine![]() Page 132. |
Barbara Fulgham | Unexpanded | clementine.prg Screenshot |
Plays the tune "Clementine". Controls: None. |
America![]() Page 133. |
Barbara Fulgham | Unexpanded | america.prg Screenshot |
Plays the tune "America" (it sounds like God Save the Queen). Controls: None. |
Cowboy's Lament![]() Pages 134-135. |
Barbara Fulgham | Unexpanded | cowboys lament.prg Screenshot |
Plays the tune "Cowboy's Lament". Controls: None. |
Froggie Went a Courtin'![]() Pages 135-136. |
Barbara Fulgham | Unexpanded | froggie courtin.prg Screenshot |
Plays the tune "Froggie Went a Courtin'". Controls: None. |
Single Voice Template![]() Pages 136-140. |
Barbara Fulgham | Unexpanded | single voice.prg Screenshot |
Programming subroutine to play music in your own programs. A single voice is used to play the notes. Controls: Modify the listing to replace '--' with the required info, and add DATA statements for the notes to be played. Running the routine as-is produces a syntax error. |
Old Smoky and Job Jar Combined![]() Pages 140-142. |
Barbara Fulgham | Unexpanded | oldsmoky jobjar.prg Screenshot |
Old Smoky and Job Jar merged into a single program, to demonstrate how tunes can be added to programs. Plays "Old Smoky" before allocating household chores. Controls: Follow on-screen prompts. |
Multiple Voice Template 1![]() Pages 142-143. |
Barbara Fulgham | Unexpanded | multi voice1.prg Screenshot |
Programming subroutine to play music in your own programs. Two voices are used, each playing the same notes. Controls: Modify the listing to replace '--' with the required info, and add DATA statements for the notes to be played. Running the routine as-is produces a syntax error. |
Multiple Voice Template 2![]() Pages 143-145. |
Barbara Fulgham | Unexpanded | multi voice2.prg Screenshot |
Programming subroutine to play music in your own programs. Two voices are used, each playing different notes. Controls: Modify the listing to replace '--' with the required info, and add DATA statements for the notes to be played. Running the routine as-is produces a syntax error. |
Multiple Voice Template 3![]() Pages 145-147. |
Barbara Fulgham | Unexpanded | multi voice3.prg Screenshot |
Programming subroutine to play music in your own programs. Three voices are used, each playing different notes. Controls: Modify the listing to replace '--' with the required info, and add DATA statements for the notes to be played. Running the routine as-is produces a syntax error. |
Chapter 6: Recipes
Program | Author | Requirements | Files | Info |
Main Categories![]() Pages 149-153. |
Barbara Fulgham | Unexpanded | recipe maincats.prg Screenshot |
Index program for storing recipes on your computer. This displays a list of recipes arranged into categories and subcategories, and then tells you which cassette/file to load to display the required recipe. Note: This is only intended to provide a starting point for building a recipe library, so most of the categories do not have accompanying recipe programs. Controls: Follow on-screen prompts. |
Cakes Subcategories![]() Pages 153-154. |
Barbara Fulgham | Unexpanded | cakes subcat.prg Screenshot |
Subcategory index program. This displays a list of cake recipes arranged into two subcategories, cakes and frostings. Note: Again, most of the subcategories do not have accompanying recipe programs. Controls: Follow on-screen prompts. |
Lemon Cake![]() Pages 154-155. |
Barbara Fulgham | Unexpanded | lemon cake.prg Screenshot |
Displays a recipe for lemon cake. Controls: Follow on-screen prompts. |
Beef Subcategories![]() Pages 155-156. |
Barbara Fulgham | Unexpanded | beef subcat.prg Screenshot |
Subcategory index program. This displays a list of beef recipes. Note: the subcategories do not have accompanying recipe programs. Controls: Follow on-screen prompts. |
With thanks to DLH's Commodore Archive for making this book available in PDF format.