3: Data Data 4: Data Data 5: Data Data 6: Data Data 7: Data Data 8: Data Data 9: Data Data 10: Data Data 11: Data Data 12: Data Data 13: Data Data 14: Data Data 15: Data Data 16: Data Data 17: Data Data 18: Data Data 19: Data Data 20: Data Data 21: Data Data 22: Data Data 23: Data Data 24: Data Data 25: Data Data 26: Data Data 27: Data Data 28: Data Data 29: Data Data 30: Data Data 31: Data Data 32: Data Data 33: Data Data 34: Data Data 35: Data Data 36: Data Data 37: Data Data 38: Data Data 39: Data Data 40: Data Data 41: Data Data 42: Data Data 43: Data Data 44: Data Data 45: Assignment Assignment 46: Assignment Assignment 46: Assignment Assignment 46: Assignment Assignment 46: Assignment Assignment 47: Assignment Assignment 47: Assignment Assignment 47: Vdu Vdu 47: Gosub Gosub 249: MODE MODE 48: Data Data 49: Data Data 50: Data Data 51: Data Data 52: Data Data 71: Assignment Assignment 72: Data Data 74: Data Data 75: Data Data 76: Data Data 77: Data Data 78: Assignment Assignment 78: Assignment Assignment 79: Assignment Assignment 80: Assignment Assignment 80: Assignment Assignment 80: Assignment Assignment 80: Assignment Assignment 80: Assignment Assignment 80: Assignment Assignment 80: Assignment Assignment 81: Assignment Assignment 81: Assignment Assignment 81: Assignment Assignment 81: Assignment Assignment 81: Assignment Assignment 81: Assignment Assignment 81: Assignment Assignment 81: Assignment Assignment 81: Assignment Assignment 81: Assignment Assignment 82: Data Data 92: Data Data 93: Data Data 94: Data Data 95: Data Data 96: Data Data 97: Data Data 98: Data Data 99: Data Data 100: Data Data 101: Data Data 102: Data Data 103: Data Data 104: Data Data 105: Data Data 106: Data Data 108: Data Data 109: Data Data 110: Data Data 111: Data Data 112: Data Data 113: Data Data 114: Data Data 115: Data Data 116: Data Data 117: Data Data 118: Data Data 119: Data Data 120: Data Data 121: Data Data 123: Data Data 124: Data Data 125: Data Data 126: Data Data 127: Data Data 128: Data Data 129: Data Data 130: Data Data 131: Data Data 132: Data Data 133: Data Data 134: Data Data 135: Data Data 136: Data Data 137: Data Data 138: Data Data 139: Data Data 140: Data Data 141: Data Data 142: Data Data 143: Data Data 144: Data Data 145: Data Data 146: Data Data 147: Data Data 148: Data Data 149: Data Data 150: Data Data 151: Data Data 152: Data Data 153: Data Data 154: Data Data 155: Data Data 156: Data Data 157: Data Data 158: Data Data 159: Data Data 160: Data Data 161: Data Data 162: Data Data 163: Data Data 164: Data Data 165: Data Data 166: Data Data 167: Data Data 168: Data Data 169: Data Data 170: Restore Restore 170: ForToStep ForToStep 170: Read Read 170: Next Next 172: Data Data 173: Data Data 174: Data Data 175: Data Data 176: Data Data 177: Data Data 178: Data Data 179: Data Data 180: Data Data 181: Data Data 182: Data Data 183: Data Data 184: Data Data 185: Data Data 186: Data Data 187: Data Data 188: Data Data 189: Data Data 190: Print Print 190: Repeat Repeat 190: Until Until 190: Cls Cls 190: Print Print 190: CallProcedure CallProcedure 191: Print Print 191: Assignment Assignment 191: Assignment Assignment 191: Assignment Assignment 191: Assignment Assignment 191: Assignment Assignment 191: Assignment Assignment 191: Assignment Assignment 191: If If 191: Assignment Assignment 192: If If 191: Assignment Assignment 191: Assignment Assignment 192: Assignment Assignment 193: If If 192: Assignment Assignment None: Goto Goto 193: Assignment Assignment 193: CallProcedure CallProcedure 193: If If 193: Assignment Assignment 193: Print Print 194: If If 195: Assignment Assignment 194: Print Print 194: Print Print 194: Goto Goto 449: Print Print 195: If If 195: Assignment Assignment 196: If If 195: If If 195: Print Print 195: Goto Goto 195: Assignment Assignment 196: Assignment Assignment 197: If If 196: If If 196: CallProcedure CallProcedure 196: Goto Goto 197: Print Print 198: If If 197: Goto Goto 200: Print Print 198: Print Print 198: If If 198: Print Print 199: If If 198: Assignment Assignment 199: Print Print 200: Input Input 201: If If 201: Print Print 202: Assignment Assignment 201: Goto Goto 202: If If 202: CallProcedure CallProcedure 203: If If 202: Goto Goto 203: CallProcedure CallProcedure 204: Assignment Assignment 203: Goto Goto 204: If If 204: Print Print 205: If If 204: Goto Goto 205: CallProcedure CallProcedure 205: Assignment Assignment 205: Assignment Assignment 205: CallProcedure CallProcedure 205: CallProcedure CallProcedure 206: If If 205: Goto Goto 211: If If None: Goto Goto 207: If If 244: Assignment Assignment 207: CallProcedure CallProcedure 208: If If 207: Goto Goto 208: CallProcedure CallProcedure 209: If If 208: Print Print 208: If If None: Goto Goto 209: CallProcedure CallProcedure 209: If If None: Goto Goto 210: OnGoto OnGoto 209: Print Print 209: Goto Goto 213: CallProcedure CallProcedure 214: CallProcedure CallProcedure 215: CallProcedure CallProcedure 216: CallProcedure CallProcedure 217: CallProcedure CallProcedure 218: CallProcedure CallProcedure 220: CallProcedure CallProcedure 221: CallProcedure CallProcedure 224: CallProcedure CallProcedure 225: CallProcedure CallProcedure 226: CallProcedure CallProcedure 227: CallProcedure CallProcedure 228: CallProcedure CallProcedure 211: CallProcedure CallProcedure 211: If If 211: Assignment Assignment 211: CallProcedure CallProcedure 211: If If 211: CallProcedure CallProcedure 211: CallProcedure CallProcedure 211: Print Print 211: Goto Goto 211: Print Print 211: Goto Goto 212: OnGoto OnGoto 211: Goto Goto 237: CallProcedure CallProcedure 229: CallProcedure CallProcedure 230: CallProcedure CallProcedure 231: Assignment Assignment 232: Print Print 235: CallProcedure CallProcedure 236: CallProcedure CallProcedure 238: Print Print 240: Assignment Assignment 243: Assignment Assignment 219: CallProcedure CallProcedure 212: CallProcedure CallProcedure 212: Goto Goto 213: If If 213: Assignment Assignment 213: Goto Goto 213: Goto Goto 214: Goto Goto 215: Goto Goto 216: If If 216: Assignment Assignment 216: Goto Goto 216: Goto Goto 217: If If 217: Assignment Assignment 217: Goto Goto 217: Goto Goto 218: Goto Goto 219: Goto Goto 220: Goto Goto 221: Goto Goto 222: If If 222: CallProcedure CallProcedure 223: If If 222: Goto Goto 223: If If 223: Assignment Assignment 223: If If 223: Assignment Assignment 223: CallProcedure CallProcedure 223: Goto Goto 223: CallProcedure CallProcedure 223: Goto Goto 223: CallProcedure CallProcedure 223: Goto Goto 224: Goto Goto 225: Goto Goto 226: Goto Goto 227: Goto Goto 228: Goto Goto 229: Goto Goto 230: Goto Goto 231: Assignment Assignment 231: Print Print 231: Goto Goto 233: Input Input 233: Assignment Assignment 233: If If None: Goto Goto 234: If If 234: Print Print 234: Goto Goto 234: CallProcedure CallProcedure 234: End End 235: Goto Goto 236: Goto Goto 237: Goto Goto 239: Gosub Gosub 251: Print Print 239: Goto Goto 241: Print Print 241: If If 241: Assignment Assignment 241: If If 241: Assignment Assignment 242: CallProcedure CallProcedure 242: Goto Goto 243: CallProcedure CallProcedure 243: Goto Goto 244: CallProcedure CallProcedure 244: If If 244: CallProcedure CallProcedure 244: If If 244: CallProcedure CallProcedure 244: If If 244: Assignment Assignment 245: CallProcedure CallProcedure 244: Goto Goto 244: Goto Goto 244: Goto Goto 245: If If 245: CallProcedure CallProcedure 246: If If 245: Goto Goto 246: CallProcedure CallProcedure 247: If If 246: Goto Goto 247: CallProcedure CallProcedure 247: If If 247: Assignment Assignment 247: If If 247: Assignment Assignment 248: CallProcedure CallProcedure 247: CallProcedure CallProcedure 247: Goto Goto 247: CallProcedure CallProcedure 247: Goto Goto 247: Goto Goto 248: Goto Goto 249: Assignment Assignment 249: Print Print 249: ForToStep ForToStep 249: Print Print 249: Next Next 249: Print Print 249: ForToStep ForToStep 249: Print Print 249: Next Next 249: Print Print 250: Print Print 250: Return Return 252: Print Print 252: Return Return 253: DefineProcedure DefineProcedure 253: Local Local 253: Restore Restore 253: ForToStep ForToStep 253: Read Read 253: If If 253: Read Read 253: Next Next 253: ReturnFromProcedure ReturnFromProcedure 253: Next Next 253: ReturnFromProcedure ReturnFromProcedure 254: DefineProcedure DefineProcedure 255: Local Local 255: Restore Restore 255: Repeat Repeat 255: Assignment Assignment 255: Read Read 255: Until Until 256: If If 256: Assignment Assignment 256: Assignment Assignment 256: Assignment Assignment 257: ReturnFromProcedure ReturnFromProcedure 256: Assignment Assignment 258: DefineProcedure DefineProcedure 259: Local Local 259: Restore Restore 259: Repeat Repeat 259: Assignment Assignment 259: Read Read 259: Until Until 260: If If 260: Assignment Assignment 260: Assignment Assignment 260: Assignment Assignment 261: ReturnFromProcedure ReturnFromProcedure 260: Assignment Assignment 262: DefineProcedure DefineProcedure 263: Local Local 263: Assignment Assignment 263: Assignment Assignment 263: Restore Restore 263: Read Read 263: ForToStep ForToStep 263: Read Read 263: Next Next 264: If If 264: Assignment Assignment 265: Print Print 264: Assignment Assignment 264: Goto Goto 265: ReturnFromProcedure ReturnFromProcedure 266: DefineProcedure DefineProcedure 267: Local Local 267: Assignment Assignment 267: Assignment Assignment 268: If If None: Goto Goto 269: Print Print 278: Assignment Assignment 269: Restore Restore 269: If If 269: Assignment Assignment 270: Read Read 269: Assignment Assignment 270: Assignment Assignment 271: If If 271: Assignment Assignment 272: Print Print 271: Assignment Assignment 271: Goto Goto 272: If If 272: Assignment Assignment 273: If If 273: Print Print 273: If If 273: Print Print 274: If If 274: CallProcedure CallProcedure 275: If If 274: If If 274: Print Print 274: If If 274: Print Print 275: CallProcedure CallProcedure 276: If If 275: Print Print 275: Assignment Assignment 276: CallProcedure CallProcedure 277: If If 276: Print Print 276: Assignment Assignment 277: Assignment Assignment 278: Assignment Assignment 278: Assignment Assignment 279: Repeat Repeat 279: Assignment Assignment 279: If If 279: Assignment Assignment 280: Until Until 280: If If 280: CallProcedure CallProcedure 280: If If None: Goto Goto 280: Print Print 280: Assignment Assignment 281: If If 284: If If 280: Goto Goto 281: CallProcedure CallProcedure 281: CallProcedure CallProcedure 282: Assignment Assignment 282: Assignment Assignment 282: Repeat Repeat 282: Assignment Assignment 282: If If 282: CallProcedure CallProcedure 283: Until Until 282: Assignment Assignment 284: Assignment Assignment 285: If If 285: Print Print 286: If If 286: Print Print 287: Print Print 287: ReturnFromProcedure ReturnFromProcedure 288: DefineProcedure DefineProcedure 288: Local Local 288: Restore Restore 288: Assignment Assignment 288: ForToStep ForToStep 288: Read Read 288: Next Next 288: ForToStep ForToStep 288: Read Read 288: If If 288: Assignment Assignment 288: Assignment Assignment 289: Next Next 288: Assignment Assignment 289: If If 289: Assignment Assignment 289: If If 289: Assignment Assignment 290: ForToStep ForToStep 290: CallProcedure CallProcedure 291: If If None: Goto Goto 292: If If 296: Next Next 292: Assignment Assignment 293: If If 293: Assignment Assignment 294: If If 294: Assignment Assignment 295: Assignment Assignment 296: Print Print 297: ReturnFromProcedure ReturnFromProcedure 298: DefineProcedure DefineProcedure 299: If If 299: CallProcedure CallProcedure 300: If If 299: Print Print 299: Goto Goto 306: ReturnFromProcedure ReturnFromProcedure 300: Assignment Assignment 301: If If 300: Assignment Assignment 300: CallProcedure CallProcedure 300: Goto Goto 301: CallProcedure CallProcedure 302: If If 302: CallProcedure CallProcedure 302: If If 302: CallProcedure CallProcedure 303: If If 302: Assignment Assignment 303: CallProcedure CallProcedure 303: If If 303: CallProcedure CallProcedure 304: If If 303: Assignment Assignment None: Goto Goto 305: CallProcedure CallProcedure 307: DefineProcedure DefineProcedure 308: Assignment Assignment 308: Assignment Assignment 309: If If 309: CallProcedure CallProcedure 310: CallProcedure CallProcedure 309: Print Print 309: Goto Goto 318: ReturnFromProcedure ReturnFromProcedure 310: Restore Restore 310: If If None: Goto Goto 311: If If 314: If If 311: If If 312: ForToStep ForToStep 311: If If 311: CallProcedure CallProcedure 311: Goto Goto 312: Read Read 312: Next Next 313: ForToStep ForToStep 313: Read Read 313: Next Next 313: If If 313: CallProcedure CallProcedure 313: Assignment Assignment 314: If If 315: If If 314: Assignment Assignment 315: Assignment Assignment 316: If If 316: Assignment Assignment 317: CallProcedure CallProcedure 317: If If 317: Print Print 319: DefineProcedure DefineProcedure 320: If If None: Goto Goto 320: Assignment Assignment 320: If If 320: CallProcedure CallProcedure 320: CallProcedure CallProcedure 320: Goto Goto 332: ReturnFromProcedure ReturnFromProcedure 320: Print Print 320: Goto Goto 321: Assignment Assignment 321: If If 321: Print Print 322: If If 321: Goto Goto 322: Assignment Assignment 322: If If 322: Assignment Assignment 322: If If 322: CallProcedure CallProcedure 323: Assignment Assignment 322: ReturnFromProcedure ReturnFromProcedure 323: If If 323: Assignment Assignment 324: Assignment Assignment 323: Assignment Assignment 323: Assignment Assignment 325: If If 325: Print Print 326: If If 325: Assignment Assignment 325: Goto Goto 326: Print Print 327: If If 326: Assignment Assignment 326: Goto Goto 330: If If 327: Assignment Assignment 328: If If