000000: 5A 58 54 61 70 65 21 1A 01 0A 20 B8 0B 11 8A 04 ZXTape!... .....
000010: 45 02 45 02 45 02 8A 04 00 10 08 0A 00 07 01 00 E.E.E...........
000020: 2C 57 41 56 45 20 49 4E 46 45 52 45 4E 43 45 00 ,WAVE INFERENCE.
000030: 00 01 FF 00 FD 06 70 01 FF FD 06 00 00 00 00 00 ......p.........
000040: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000050: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000060: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000070: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000080: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000090: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000100: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000110: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000120: 00 D4 23 FF FF FF FF 11 8A 04 45 02 45 02 45 02 ..#.......E.E.E.
000130: 8A 04 00 10 08 C4 09 13 07 00 16 22 00 0A 00 C5 ..........."....
000140: 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ---------------
000150: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 22 00 14 ------------."..
000160: 00 C5 20 2D 2D 2D 2D 20 57 41 56 45 20 49 4E 54 .. ---- WAVE INT
000170: 45 52 46 45 52 45 4E 43 45 20 2D 2D 2D 2D 00 22 ERFERENCE ----."
000180: 00 1E 00 C5 20 2D 2D 2D 2D 2D 28 43 29 20 20 4A .... -----(C) J
000190: 6F 68 6E 20 4B 65 6E 6E 65 64 79 2D 2D 2D 2D 2D ohn Kennedy-----
0001A0: 00 22 00 32 00 C5 20 2D 2D 2D 2D 2D 2D 2D 2D 2D .".2.. ---------
0001B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
0001C0: 2D 2D 00 07 00 3C 00 01 C0 00 0C 00 46 00 B3 20 --...<......F..
0001D0: 9F 20 1E C0 03 00 07 00 50 00 01 C0 00 13 00 5A . ......P......Z
0001E0: 00 C5 20 63 6C 65 61 72 20 73 63 72 65 65 6E 00 .. clear screen.
0001F0: 07 00 64 00 01 C0 00 15 00 6E 00 82 20 0E 01 A2 ..d......n.. ...
000200: 20 0E 2C 0E 01 A2 20 0F 2C 19 17 00 0C 00 78 00 .,... .,.....x.
000210: BA 20 0E 01 BB 20 0F 00 08 00 82 00 AD 20 0F 00 . ... ....... ..
000220: 07 00 8C 00 01 C0 00 0E 00 96 00 C5 20 70 72 6F ............ pro
000230: 6D 70 74 73 00 07 00 A0 00 01 C0 28 52 00 14 00 mpts.......(R...
000240: AA 00 D8 20 23 0F 2C 10 2C 19 26 2C 19 0A 2C 19 ... #.,.,.&,..,.
000250: 0E 00 0B 00 B4 00 AE 20 12 2C 19 A4 00 0E 00 BE ....... .,......
000260: 00 95 20 1A 66 02 2C 0E 2C 0F 00 0B 00 C8 00 95 .. .f.,.,.......
000270: 20 0E 2C 19 64 00 0D 00 D2 00 95 20 F5 1A 66 02 .,.d...... ..f.
000280: 2C 0E 00 0C 00 DC 00 95 20 0E 2C F5 19 64 00 2C ,....... .,..d.,
000290: 00 E6 00 A3 20 23 0F 2C 22 57 61 76 65 20 6C 65 ...£ #.,"Wave le
0002A0: 6E 67 74 68 20 6F 66 20 77 61 76 65 20 41 2E 28 ngth of wave A.(
0002B0: 63 61 29 22 3B 0D 00 00 77 E1 00 1F 00 F0 00 A1 ca)";...w.......
0002C0: 20 0D 00 00 77 E1 EE 19 64 20 FC 20 0D 00 00 77 ...w...d . ...w
0002D0: E1 F1 0F 20 EB 20 1E E6 00 00 09 00 FA 00 BF 20 ... . .........
0002E0: 23 0F 00 2C 00 04 01 A3 20 23 0F 2C 22 57 61 76 #..,...£ #.,"Wav
0002F0: 65 20 6C 65 6E 67 74 68 20 6F 66 20 77 61 76 65 e length of wave
000300: 20 42 2E 28 63 61 29 22 3B 0D 00 00 77 E2 00 09 B.(ca)";...w...
000310: 00 0E 01 BF 20 23 0F 00 1F 00 18 01 A1 20 0D 00 .... #....... ..
000320: 00 77 E2 EE 19 64 20 FC 20 0D 00 00 77 E2 F1 0F .w...d . ...w...
000330: 20 EB 20 1E F0 00 00 33 00 22 01 A3 20 B3 60 23 . ....3.".£ .`#
000340: 0F 2C 22 4F 66 66 73 65 74 20 6F 66 20 42 20 74 .,"Offset of B t
000350: 6F 20 41 20 28 69 6E 20 64 65 67 72 65 65 73 29 o A (in degrees)
000360: 22 3B 0D 00 00 6F 66 66 73 65 F4 00 06 00 2C 01 ";...offse....,.
000370: 91 00 17 00 36 01 0D 00 00 77 E1 EF 0D 00 00 77 ....6....w.....w
000380: E1 F7 1F CD CC CC 34 83 00 17 00 40 01 0D 00 00 ......4....@....
000390: 77 E2 EF 0D 00 00 77 E2 F7 1F CD CC CC 34 83 00 w.....w......4..
0003A0: 0E 00 4A 01 0D 00 00 61 6D F0 EF 19 4B 00 07 00 ..J....am...K...
0003B0: 54 01 01 C0 00 11 00 5E 01 C5 20 73 65 74 20 73 T......^.. set s
0003C0: 63 72 65 65 6E 00 07 00 68 01 01 C0 00 08 00 72 creen...h......r
0003D0: 01 AD 20 0F 00 0A 00 7C 01 A2 20 10 2C 13 00 0B .. ....|.. .,...
0003E0: 00 86 01 A2 20 0F 2C 19 17 00 0B 00 90 01 A2 20 .... .,........
0003F0: 11 2C 19 0F 00 0A 00 9A 01 A9 20 0F 2C 0F 00 08 .,........ .,...
000400: 00 A4 01 BB 20 10 00 2B 00 AE 01 BF 20 22 20 20 .... ..+.... "
000410: 20 20 57 41 56 45 20 49 4E 54 45 52 46 45 52 45 WAVE INTERFERE
000420: 4E 43 45 20 42 59 20 4A 2E 4B 45 4E 4E 45 44 59 NCE BY J.KENNEDY
000430: 22 00 0B 00 B8 01 A9 20 19 0D 2C 10 00 1C 00 D5 "...... ..,.....
000440: 76 C2 01 BB 20 0F 01 BF 20 22 52 45 53 55 4C 54 v... ... "RESULT
000450: 41 4E 54 20 20 57 41 56 45 22 00 0B 00 CC 01 A9 ANT WAVE"......
000460: 20 19 0D 2C 11 00 1C 00 D6 01 BB 20 11 01 BF 20 ..,....... ...
000470: 22 49 4E 43 49 44 45 4E 54 20 20 57 41 56 45 53 "INCIDENT WAVES
000480: 22 00 07 00 E0 01 01 C0 00 10 00 EA 01 C5 20 64 "............. d
000490: 72 61 77 20 67 72 69 64 00 07 00 F4 01 01 C0 00 raw grid........
0004A0: 18 00 FE 01 9E 20 0D 00 00 E1 EF 0E 20 EC 20 1A ..... ...... . .
0004B0: 80 02 20 E6 20 19 10 00 0E 00 08 02 20 AE 20 0D .. . ....... . .
0004C0: 00 00 E1 2C 0E 00 0F 00 12 02 20 95 20 0E 2C 1A ...,...... . .,.
0004D0: 80 01 2C 10 00 0E 00 1C 02 20 AE 20 0E 2C 0D 00 ..,...... . .,..
0004E0: 00 E1 00 0D 00 26 02 20 95 20 1A 6F 02 2C 0E 00 .....&. . .o.,..
0004F0: 06 00 30 02 B0 00 07 00 3A 02 01 C0 00 18 00 44 ..0.....:......D
000500: 02 C5 20 64 72 61 77 20 63 65 6E 74 72 61 6C 20 .. draw central
000510: 61 78 69 73 00 07 00 4E 02 01 C0 00 17 00 58 02 axis...N......X.
000520: 9E 20 0D 00 00 C1 EF 0E 20 EC 20 1A 6F 02 20 E6 . ...... . .o. .
000530: 20 12 00 11 00 62 02 20 BC 20 0D 00 00 E1 2C 19 ....b. . ....,.
000540: C8 FA E8 2C 10 00 06 00 6C 02 B0 00 07 00 76 02 ...,....l.....v.
000550: 01 C0 00 18 00 80 02 C5 20 64 72 61 77 20 61 63 ........ draw ac
000560: 74 75 61 6C 20 77 61 76 65 73 00 07 00 8A 02 01 tual waves......
000570: C0 00 17 00 94 02 9E 20 0D 00 00 F4 EF 0E 20 EC ....... ...... .
000580: 20 1A D8 04 20 E6 20 16 00 22 00 9E 02 20 0D 00 ... . .."... ..
000590: 00 F8 EF FF 15 28 28 0D 00 00 F4 F7 0D 00 00 77 .....((........w
0005A0: E1 29 29 F6 0D 00 00 61 6D F0 00 2C 00 A8 02 20 .))....am..,...
0005B0: 0D 00 00 F9 EF FF 15 28 28 0D 00 00 F4 F7 0D 00 .......((.......
0005C0: 00 77 E2 29 F4 0D 00 00 6F 66 66 73 65 F4 29 F6 .w.)....offse.).
0005D0: 0D 00 00 61 6D F0 00 14 00 B2 02 20 0D 00 00 FA ...am...... ....
0005E0: EF 0D 00 00 F8 F4 0D 00 00 F9 00 27 00 BC 02 20 ...........'...
0005F0: 0D 00 00 78 B1 EF FF 15 28 28 28 0D 00 00 F4 F4 ...x....(((.....
000600: 16 29 F7 0D 00 00 77 E1 29 29 F6 0D 00 00 61 6D .)....w.))....am
000610: F0 00 31 00 C6 02 20 0D 00 00 79 B1 EF FF 15 28 ..1... ...y....(
000620: 28 28 0D 00 00 F4 F4 16 29 F7 0D 00 00 77 E2 29 ((......)....w.)
000630: F4 0D 00 00 6F 66 66 73 65 F4 29 F6 0D 00 00 61 ....offse.)....a
000640: 6D F0 00 E1 6D 17 00 D0 02 20 0D 00 00 7A B1 EF m...m.... ...z..
000650: 0D 00 00 78 B1 F4 0D 00 00 79 B1 00 2E 00 DA 02 ...x.....y......
000660: 20 BC 20 0D 00 00 F4 F7 10 2C 0D 00 00 F8 F4 19 . ......,......
000670: C8 2C 11 01 94 20 28 0D 00 00 F4 F4 16 29 F7 10 .,... (......)..
000680: 2C 0D 00 00 78 B1 F4 19 C8 00 2E 00 E4 02 20 BC ,...x......... .
000690: 20 0D 00 00 F4 F7 10 2C 0D 00 00 F9 F4 19 C8 2C ......,.......,
0006A0: 11 01 94 20 28 0D 00 00 F4 F4 16 29 F7 10 2C 0D ... (......)..,.
0006B0: 00 00 79 B1 F4 19 C8 00 2E 00 EE 02 20 BC 20 0D ..y......... . .
0006C0: 00 00 F4 F7 10 2C 0D 00 00 FA F4 19 C8 2C 0F 01 .....,.......,..
0006D0: 94 20 28 0D 00 00 F4 F4 16 29 F7 10 2C 0D 00 00 . (......)..,...
0006E0: 7A B1 F4 19 C8 00 06 00 F8 02 B0 00 07 00 02 03 z...............
0006F0: 01 C0 00 1B 00 0C 03 C5 20 70 72 69 6E 74 20 52 ........ print R
000700: 45 2D 52 55 4E 20 6D 65 73 73 61 67 65 00 07 00 E-RUN message...
000710: 16 03 01 C0 00 0C 00 20 03 BA 20 10 01 BB 20 0E ....... .. ... .
000720: 00 22 00 2A 03 A9 20 19 0C 2C 19 16 01 BF 20 22 .".*.. ..,.... "
000730: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000740: 20 22 00 22 00 65 48 34 03 A9 20 19 0C 2C 19 17 ".".eH4.. ..,..
000750: 01 BF 20 22 20 53 50 41 43 45 20 54 4F 20 52 45 .. " SPACE TO RE
000760: 2D 52 55 4E 20 22 00 22 00 3E 03 A9 20 19 0C 2C -RUN ".".>.. ..,
000770: 19 18 01 BF 20 22 20 20 20 20 20 20 20 20 20 20 .... "
000780: 20 20 20 20 20 20 20 22 00 07 00 48 03 01 C0 00 "...H....
000790: 1C 00 52 03 C5 20 66 6C 61 73 68 20 64 69 66 66 ..R.. flash diff
0007A0: 65 72 65 6E 74 20 77 61 76 65 73 00 07 00 5C 03 erent waves...\.
0007B0: 01 C0 00 0E 00 66 03 CD 20 A2 20 19 3C 2C 19 3C .....f.. . .<,.<
0007C0: 00 0D 00 70 03 A2 20 0F 2C 0F 2C 19 1A 00 0D 00 ...p.. .,.,.....
0007D0: 7A 03 A2 20 11 2C 19 1A 2C 0F 00 07 00 84 03 01 z.. .,..,.......
0007E0: C0 00 25 00 8E 03 C5 20 61 63 74 20 6F 6E 20 72 ..%.... act on r
0007F0: 65 70 6C 79 20 74 6F 20 52 45 2D 52 55 4E 20 6D eply to RE-RUN m
000800: 65 73 73 61 67 65 00 07 00 98 03 01 C0 00 0E 00 essage..........
000810: A2 03 D6 20 FF 43 F2 22 22 01 D5 00 0E 00 AC 03 ... .C."".......
000820: D6 20 FF 43 EF 22 22 01 D5 00 06 00 B6 03 CA 00 . .C."".........
000830: 0C 00 C0 03 CC 20 0F 2C 1A F4 01 00 06 00 CA 03 ..... .,........
000840: CA 00 00 00 00 00 00 93 96 FF FF FF FF .............
RESULT OF SEARCH :
PRO=1 CHEA=0 COD=0 MUSI=0 COP=0 GRA=0 WRIT=0 198=0 199=0 STARTER=0 KBI=0 CAAV=0 L.TOURNIER=0
EEE ,WAVE INFERENCEp#EEE" ---------------------------" ---- WAVE INTERFERENCE
----" -----(C) John Kennedy-----"2 ---------------------------F PZ clear scre
endn , ,x prompts(R #,,&, , , f,, ,d f, ,d,£ #,"Wave length of wave A.(ca)"
w wd w #,£ #,"Wave length of wave B.(ca)" w # wd w 3"£ #,"Offset of B
to A (in degrees)" offse,6 w w4 w w4J amKT set screenhr , , , , + " WAVE I
NTERFERENCE BY J.KENNEDY" ,v "RESULTANT WAVE" , "INCIDENT WAVES" draw grid
, ,, , & o,0D draw central axisNX o b ,,lv draw actual waves
" (( w)) am, (( w) offse) am ' x((( ) w)) am1 y((( ) w) offse) amm
z x y. , , ( ), x. , , ( ), y. , , ( ), z print RE-RUN message "* , "
""eH4 , " SPACE TO RE-RUN "" , " "HR flash diffe
rent wavesf , p ,, z ,,% act on reply to RE-RUN message C"" C"" ,