AppleSoft Magnum Opus

When I was a kid, I spent a lot of time writing and not enough time working my Applesoft.

It was February 26th, 1986, Third Period Computer Basic Class. This
was the day I would write my greatest Applesoft program ever.  What it lacks in
actual program content, it more than makes up for in setting the stage
for the antagonistic relationship I was developing with the instructor.
I only had to print it a few times for debugging purposes to seal the
deal for the rest of the semester.

 1  REM  *********************************************************
 2  REM  *                                                       *
 3  REM  *                   Copyright (c) 1986                  *
 4  REM  *    Xanith Diskette Company and/or its affiliates.     *
 5  REM  *                   All rights reserved.                *
 6  REM  *                                                       *
 7  REM  *  Redistribution and use in source and binary forms,   *
 8  REM  *  with or withoutmodification, are permitted provided  *
 9  REM  *  that the following conditions are met:               *
10  REM *                                                       *
11  REM * -Redistributions of source code must retain the above *
12  REM *  copyright notice, this list of conditions and the    *
13  REM *  following disclaimer.                                *
14  REM *                                                       *
15  REM * -Redistributions in binary form must reproduce the    *
16  REM *  above copyright notice, this list of conditions and  *
17  REM *  the following disclaimer in the documentation and/o  *
18  REM *  other materials provided with the distribution.      *
19  REM *                                                       *
20  REM * -Neither the name of Xanith Diskette Company or the   *
21  REM *  names of its contributors may be used to endorse     *
22  REM *  or promote products derived from this software       *
23  REM *  without specific prior written permission.           *
24  REM *                                                       *
25  REM * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND*
26  REM * CONTRIBUTORS "AS IS" AND ANY EXPRESS OR IMPLIED       *
27  REM * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED*
28  REM * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A       *
29  REM * PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL *
30  REM * THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY *
31  REM * DIRECT, INDIRECT, *INCIDENTAL, SPECIAL, EXEMPLARY, OR *
32  REM * CONSEQUENTIAL DAMAGES (INCLUDING,BUT NOT LIMITED TO,  *
33  REM * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF  *
34  REM * USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOW- *
35  REM * EVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN*
36  REM * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING        *
37  REM * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE*
38  REM * USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSS-    *
39  REM * IBILITY OF SUCH DAMAGE.                               *
40  REM *                                                       *
41  REM * The SUMS program impliments an application that simply*
42  REM * allows a third party (hereby referred to as "user") to*
43  REM * assign numeric values to variables, which are held in *
44  REM * memory, called upon, and used to calculate a total    *
45  REM * sum.  No claim of ownership will be brought against   *
46  REM * the user values and such intent is neither implied or *
47  REM * expressed for the term in which the user values are   *
48  REM * contained in memory.                                  *
49  REM *                                                       *
50  REM *                                                       *
51  REM *                     SUMS                              *
52  REM *                                                       *
53  REM *                      by                               *
54  REM *               Daniel McLaughlin                       *
55  REM *                  Third Period                         *
56  REM *               February 26, 1986                       *
57  REM *                                                       *
58  REM *                   STARRING                            *
59  REM *                     The                               *
60  REM *               DECLARED VARIABLES                      *
61  REM *         A$ as User Numeric Input No. 1                *
62  REM *         B$ as User Numeric Input No. 2                *
63  REM *                                                       *
64  REM *********************************************************
65  INPUT "INPUT THE FIRST NUMBER => ";A
66  INPUT "INPUT THE SECOND NUMBER => ";B
67  C = A + B
68  PRINT  
69  PRINT A;" + ";B;" = ";C
70  FOR I = 1 TO 2500 : NEXT I
71  TEXT  : HOME
72  END

One thought on “AppleSoft Magnum Opus”

  1. What a thoughtful touch to disclaim ownership of the user’s input data! Such a nicety would be unheard of in today’s litigious society…

You are one of the few that has achieved this level. Do not leave it unsung.