/ 64'er Special 7 / 64er_Magazin_Sonderheft_07_86-07_1986_Markt__Technik_de_Side_A.d64 / statistik

< prev

next >

view JSON data

view as text

open on a Mac

open on a PC

+--------+-------------------------+-------------------------+--------+--------+
|00000000| d8 1f ef 1f 64 00 3b 2a | 2a 2a 20 53 54 41 54 49 |....d.;*|** STATI|
|00000010| 53 54 49 4b 20 2a 2a 2a | 00 f5 1f 6e 00 3b 00 fb |STIK ***|...n.;..|
|00000020| 1f 78 00 3b 00 1e 20 82 | 00 2e 45 51 20 47 45 54 |.x.;.. .|..EQ GET|
|00000030| 50 4f 53 20 3d 24 42 30 | 38 42 20 20 3b 3d 3e 20 |POS =$B0|8B  ;=> |
|00000040| 50 4f 49 4e 54 45 52 00 | 34 20 8c 00 2e 45 51 20 |POINTER.|4 ...EQ |
|00000050| 43 48 4b 4b 4f 4d 20 3d | 24 41 45 46 44 00 48 20 |CHKKOM =|$AEFD.H |
|00000060| 96 00 2e 45 51 20 53 55 | 4d 4d 45 31 20 3d 24 41 |...EQ SU|MME1 =$A|
|00000070| 35 00 5c 20 a0 00 2e 45 | 51 20 53 55 4d 4d 45 32 |5.\ ...E|Q SUMME2|
|00000080| 20 3d 24 41 41 00 7b 20 | aa 00 2e 45 51 20 50 55 | =$AA.{ |...EQ PU|
|00000090| 46 46 45 52 20 3d 24 42 | 32 20 20 20 20 3b 50 55 |FFER =$B|2    ;PU|
|000000a0| 46 46 45 52 00 a0 20 b4 | 00 2e 45 51 20 53 54 41 |FFER.. .|..EQ STA|
|000000b0| 52 54 20 20 3d 24 39 42 | 20 20 20 20 3b 4c 49 4e |RT  =$9B|    ;LIN|
|000000c0| 4b 45 20 47 52 45 4e 5a | 45 00 c6 20 be 00 2e 45 |KE GRENZ|E.. ...E|
|000000d0| 51 20 53 54 4b 4f 50 20 | 20 3d 24 39 45 20 20 20 |Q STKOP | =$9E   |
|000000e0| 20 3b 52 45 43 48 54 45 | 20 47 52 45 4e 5a 45 00 | ;RECHTE| GRENZE.|
|000000f0| e6 20 c8 00 2e 45 51 20 | 43 4f 55 4e 54 20 20 3d |. ...EQ |COUNT  =|
|00000100| 24 42 37 20 20 20 20 3b | 5a 41 45 48 4c 45 52 00 |$B7    ;|ZAEHLER.|
|00000110| 06 21 d2 00 2e 45 51 20 | 4e 20 20 20 20 20 20 3d |.!...EQ |N      =|
|00000120| 24 42 39 20 20 20 20 3b | 5a 41 45 48 4c 45 52 00 |$B9    ;|ZAEHLER.|
|00000130| 26 21 dc 00 2e 45 51 20 | 4e 31 20 20 20 20 20 3d |&!...EQ |N1     =|
|00000140| 24 46 41 20 20 20 20 3b | 5a 41 45 48 4c 45 52 00 |$FA    ;|ZAEHLER.|
|00000150| 4a 21 e6 00 2e 45 51 20 | 41 44 44 20 20 20 20 3d |J!...EQ |ADD    =|
|00000160| 24 42 38 36 41 20 20 3b | 46 41 43 3d 41 52 47 2b |$B86A  ;|FAC=ARG+|
|00000170| 46 41 43 00 6e 21 f0 00 | 2e 45 51 20 53 55 42 20 |FAC.n!..|.EQ SUB |
|00000180| 20 20 20 3d 24 42 38 35 | 33 20 20 3b 46 41 43 3d |   =$B85|3  ;FAC=|
|00000190| 41 52 47 2d 46 41 43 00 | 92 21 fa 00 2e 45 51 20 |ARG-FAC.|.!...EQ |
|000001a0| 4d 55 4c 54 20 20 20 3d | 24 42 41 32 42 20 20 3b |MULT   =|$BA2B  ;|
|000001b0| 46 41 43 3d 41 52 47 2a | 46 41 43 00 b6 21 04 01 |FAC=ARG*|FAC..!..|
|000001c0| 2e 45 51 20 44 49 56 20 | 20 20 20 3d 24 42 42 31 |.EQ DIV |   =$BB1|
|000001d0| 32 20 20 3b 46 41 43 3d | 41 52 47 2f 46 41 43 00 |2  ;FAC=|ARG/FAC.|
|000001e0| da 21 0e 01 2e 45 51 20 | 45 58 50 20 20 20 20 3d |.!...EQ |EXP    =|
|000001f0| 24 42 46 37 42 20 20 3b | 46 41 43 3d 41 52 47 5e |$BF7B  ;|FAC=ARG^|
|00000200| 46 41 43 00 ee 21 18 01 | 2e 45 51 20 46 41 43 20 |FAC..!..|.EQ FAC |
|00000210| 20 20 20 3d 24 36 31 00 | 02 22 22 01 2e 45 51 20 |   =$61.|.""..EQ |
|00000220| 41 52 47 20 20 20 20 3d | 24 36 39 00 18 22 2c 01 |ARG    =|$69..",.|
|00000230| 2e 45 51 20 4b 4f 4e 46 | 41 43 20 3d 24 42 42 41 |.EQ KONF|AC =$BBA|
|00000240| 32 00 2e 22 36 01 2e 45 | 51 20 4b 4f 4e 41 52 47 |2.."6..E|Q KONARG|
|00000250| 20 3d 24 42 41 38 43 00 | 44 22 40 01 2e 45 51 20 | =$BA8C.|D"@..EQ |
|00000260| 46 41 43 4b 4f 4e 20 3d | 24 42 42 44 34 00 5a 22 |FACKON =|$BBD4.Z"|
|00000270| 4a 01 2e 45 51 20 46 41 | 43 41 52 47 20 3d 24 42 |J..EQ FA|CARG =$B|
|00000280| 43 30 43 00 70 22 54 01 | 2e 45 51 20 4b 4f 4e 4d |C0C.p"T.|.EQ KONM|
|00000290| 55 4c 20 3d 24 42 41 32 | 38 00 86 22 5e 01 2e 45 |UL =$BA2|8.."^..E|
|000002a0| 51 20 4b 4f 4e 41 44 44 | 20 3d 24 42 38 36 37 00 |Q KONADD| =$B867.|
|000002b0| 9c 22 68 01 2e 45 51 20 | 46 4c 49 49 4e 54 20 3d |."h..EQ |FLIINT =|
|000002c0| 24 42 43 39 42 00 b2 22 | 72 01 2e 45 51 20 5a 57 |$BC9B.."|r..EQ ZW|
|000002d0| 45 50 4f 53 20 3d 24 42 | 43 34 39 00 c8 22 7c 01 |EPOS =$B|C49.."|.|
|000002e0| 2e 45 51 20 45 49 4e 50 | 4f 53 20 3d 24 42 33 41 |.EQ EINP|OS =$B3A|
|000002f0| 32 00 de 22 86 01 2e 45 | 51 20 46 41 43 53 54 52 |2.."...E|Q FACSTR|
|00000300| 20 3d 24 42 44 44 44 00 | f4 22 90 01 2e 45 51 20 | =$BDDD.|."...EQ |
|00000310| 53 54 52 4f 55 54 20 3d | 24 41 42 31 45 00 fa 22 |STROUT =|$AB1E.."|
|00000320| 9a 01 3b 00 16 23 a4 01 | 2e 42 41 20 24 43 30 30 |..;..#..|.BA $C00|
|00000330| 30 3b 50 52 4f 47 52 41 | 4d 4d 53 54 41 52 54 00 |0;PROGRA|MMSTART.|
|00000340| 1c 23 ae 01 3b 00 22 23 | b8 01 3b 00 37 23 c2 01 |.#..;."#|..;.7#..|
|00000350| 3b 2a 50 4f 49 4e 54 45 | 52 20 48 4f 4c 45 4e 2a |;*POINTE|R HOLEN*|
|00000360| 00 52 23 cc 01 20 4a 53 | 52 43 48 4b 4b 4f 4d 3b |.R#.. JS|RCHKKOM;|
|00000370| 50 4f 49 4e 54 45 52 20 | 41 55 46 00 6e 23 d6 01 |POINTER |AUF.n#..|
|00000380| 20 4a 53 52 47 45 54 50 | 4f 53 3b 4c 49 4e 4b 45 | JSRGETP|OS;LINKE|
|00000390| 20 47 52 45 4e 5a 45 00 | 8b 23 e0 01 20 53 54 41 | GRENZE.|.#.. STA|
|000003a0| 53 54 41 52 54 3b 4e 41 | 43 48 20 53 54 41 52 54 |START;NA|CH START|
|000003b0| 28 2b 31 29 00 9b 23 ea | 01 20 53 54 59 53 54 41 |(+1)..#.|. STYSTA|
|000003c0| 52 54 2b 31 00 a9 23 f4 | 01 20 53 54 41 53 54 4b |RT+1..#.|. STASTK|
|000003d0| 4f 50 00 b9 23 fe 01 20 | 53 54 59 53 54 4b 4f 50 |OP..#.. |STYSTKOP|
|000003e0| 2b 31 00 d4 23 08 02 20 | 4a 53 52 43 48 4b 4b 4f |+1..#.. |JSRCHKKO|
|000003f0| 4d 3b 50 4f 49 4e 54 45 | 52 20 41 55 46 00 f1 23 |M;POINTE|R AUF..#|
|00000400| 12 02 20 4a 53 52 47 45 | 54 50 4f 53 3b 52 45 43 |.. JSRGE|TPOS;REC|
|00000410| 48 54 45 20 47 52 45 4e | 5a 45 00 f7 23 1c 02 3b |HTE GREN|ZE..#..;|
|00000420| 00 fd 23 26 02 3b 00 22 | 24 30 02 3b 2a 2a 2a 20 |..#&.;."|$0.;*** |
|00000430| 4e 2c 20 4e 2d 31 2c 20 | 43 4f 55 4e 54 20 45 52 |N, N-1, |COUNT ER|
|00000440| 4d 49 54 54 45 4c 4e 20 | 2a 2a 2a 00 2b 24 3a 02 |MITTELN |***.+$:.|
|00000450| 20 53 45 43 00 43 24 44 | 02 20 53 42 43 53 54 41 | SEC.C$D|. SBCSTA|
|00000460| 52 54 3b 44 49 46 46 45 | 52 45 4e 5a 00 5c 24 4e |RT;DIFFE|RENZ.\$N|
|00000470| 02 20 53 54 41 24 36 33 | 3b 5a 57 49 53 43 48 45 |. STA$63|;ZWISCHE|
|00000480| 4e 20 44 45 4e 00 77 24 | 58 02 20 54 59 41 3b 47 |N DEN.w$|X. TYA;G|
|00000490| 52 45 4e 5a 45 4e 20 42 | 45 52 45 43 48 4e 45 4e |RENZEN B|ERECHNEN|
|000004a0| 00 87 24 62 02 20 53 42 | 43 53 54 41 52 54 2b 31 |..$b. SB|CSTART+1|
|000004b0| 00 93 24 6c 02 20 53 54 | 41 24 36 32 00 a0 24 76 |..$l. ST|A$62..$v|
|000004c0| 02 20 4c 44 58 23 24 39 | 30 00 a9 24 80 02 20 53 |. LDX#$9|0..$.. S|
|000004d0| 45 43 00 b8 24 8a 02 20 | 4a 53 52 5a 57 45 50 4f |EC..$.. |JSRZWEPO|
|000004e0| 53 00 c7 24 94 02 20 4a | 53 52 46 41 43 41 52 47 |S..$.. J|SRFACARG|
|000004f0| 00 cd 24 9e 02 3b 00 ea | 24 a8 02 20 4c 44 59 23 |..$..;..|$.. LDY#|
|00000500| 35 3b 44 49 46 46 45 52 | 45 4e 5a 20 47 45 54 45 |5;DIFFER|ENZ GETE|
|00000510| 49 4c 54 00 08 25 b2 02 | 20 4a 53 52 45 49 4e 50 |ILT..%..| JSREINP|
|00000520| 4f 53 3b 44 55 52 43 48 | 20 35 20 45 52 47 49 42 |OS;DURCH| 5 ERGIB|
|00000530| 54 00 23 25 bc 02 20 4a | 53 52 44 49 56 3b 44 49 |T.#%.. J|SRDIV;DI|
|00000540| 45 20 41 4e 5a 41 48 4c | 20 4e 2d 31 00 32 25 c6 |E ANZAHL| N-1.2%.|
|00000550| 02 20 4c 44 58 23 3c 28 | 4e 31 29 00 41 25 d0 02 |. LDX#<(|N1).A%..|
|00000560| 20 4c 44 59 23 3e 28 4e | 31 29 00 50 25 da 02 20 | LDY#>(N|1).P%.. |
|00000570| 4a 53 52 46 41 43 4b 4f | 4e 00 56 25 e4 02 3b 00 |JSRFACKO|N.V%..;.|
|00000580| 78 25 ee 02 20 4a 53 52 | 46 4c 49 49 4e 54 3b 4e |x%.. JSR|FLIINT;N|
|00000590| 2d 31 20 49 4e 4b 52 45 | 4d 45 4e 54 49 45 52 45 |-1 INKRE|MENTIERE|
|000005a0| 4e 00 8d 25 f8 02 20 4c | 44 58 24 36 34 3b 45 52 |N..%.. L|DX$64;ER|
|000005b0| 47 49 42 54 20 4e 00 99 | 25 02 03 20 4c 44 59 24 |GIBT N..|%.. LDY$|
|000005c0| 36 35 00 a2 25 0c 03 20 | 49 4e 59 00 b0 25 16 03 |65..%.. |INY..%..|
|000005d0| 20 42 43 43 4e 4f 49 4e | 43 00 b9 25 20 03 20 49 | BCCNOIN|C..% . I|
|000005e0| 4e 58 00 ca 25 2a 03 4e | 4f 49 4e 43 20 53 54 58 |NX..%*.N|OINC STX|
|000005f0| 4e 2b 31 00 d4 25 34 03 | 20 53 54 59 4e 00 f5 25 |N+1..%4.| STYN..%|
|00000600| 3e 03 20 53 54 58 43 4f | 55 4e 54 2b 31 3b 55 4e |>. STXCO|UNT+1;UN|
|00000610| 44 20 47 4c 45 49 43 48 | 5a 45 49 54 49 47 00 13 |D GLEICH|ZEITIG..|
|00000620| 26 48 03 20 53 54 59 43 | 4f 55 4e 54 3b 43 4f 55 |&H. STYC|OUNT;COU|
|00000630| 4e 54 20 28 43 4f 55 4e | 54 3d 4e 29 00 19 26 52 |NT (COUN|T=N)..&R|
|00000640| 03 3b 00 24 26 5c 03 20 | 4c 44 59 23 30 00 3e 26 |.;.$&\. |LDY#0.>&|
|00000650| 66 03 20 4a 53 52 45 49 | 4e 50 4f 53 3b 50 55 46 |f. JSREI|NPOS;PUF|
|00000660| 46 45 52 20 49 4e 2d 00 | 5a 26 70 03 20 4a 53 52 |FER IN-.|Z&p. JSR|
|00000670| 46 41 43 50 55 46 3b 49 | 54 49 41 4c 49 53 49 45 |FACPUF;I|TIALISIE|
|00000680| 52 45 4e 00 60 26 7a 03 | 3b 00 66 26 84 03 3b 00 |REN.`&z.|;.f&..;.|
|00000690| 85 26 8e 03 3b 2a 2a 2a | 20 53 55 4d 4d 45 20 31 |.&..;***| SUMME 1|
|000006a0| 20 42 45 52 45 43 48 4e | 45 4e 20 2a 2a 2a 00 a7 | BERECHN|EN ***..|
|000006b0| 26 98 03 4c 4f 4f 50 53 | 31 20 4a 53 52 49 4e 46 |&..LOOPS|1 JSRINF|
|000006c0| 41 43 3b 41 28 53 54 41 | 52 54 29 20 4e 41 43 48 |AC;A(STA|RT) NACH|
|000006d0| 00 c2 26 a2 03 20 4c 44 | 41 53 54 41 52 54 3b 46 |..&.. LD|ASTART;F|
|000006e0| 41 43 20 4b 4f 50 49 45 | 52 45 4e 00 de 26 ac 03 |AC KOPIE|REN..&..|
|000006f0| 20 4c 44 59 53 54 41 52 | 54 2b 31 3b 55 4e 44 20 | LDYSTAR|T+1;UND |
|00000700| 46 41 43 20 4d 49 54 00 | fe 26 b6 03 20 4a 53 52 |FAC MIT.|.&.. JSR|
|00000710| 4b 4f 4e 4d 55 4c 3b 41 | 28 53 54 41 52 54 29 20 |KONMUL;A|(START) |
|00000720| 4d 55 4c 54 49 50 4c 00 | 21 27 c0 03 20 4c 44 41 |MULTIPL.|!'.. LDA|
|00000730| 23 3c 28 50 55 46 46 45 | 52 29 3b 46 41 43 20 55 |#<(PUFFE|R);FAC U|
|00000740| 4e 44 20 53 55 4d 4d 45 | 20 31 00 41 27 ca 03 20 |ND SUMME| 1.A'.. |
|00000750| 4c 44 59 23 3e 28 50 55 | 46 46 45 52 29 3b 41 44 |LDY#>(PU|FFER);AD|
|00000760| 44 49 45 52 45 4e 20 55 | 4e 44 00 60 27 d4 03 20 |DIEREN U|ND.`'.. |
|00000770| 4a 53 52 4b 4f 4e 41 44 | 44 3b 4e 45 55 45 20 53 |JSRKONAD|D;NEUE S|
|00000780| 55 4d 4d 45 20 31 20 49 | 4e 00 7f 27 de 03 20 4a |UMME 1 I|N..'.. J|
|00000790| 53 52 46 41 43 50 55 46 | 3b 50 55 46 46 45 52 20 |SRFACPUF|;PUFFER |
|000007a0| 4b 4f 50 49 45 52 45 4e | 00 a1 27 e8 03 20 4a 53 |KOPIEREN|..'.. JS|
|000007b0| 52 4f 46 46 53 45 54 3b | 53 54 41 52 54 20 49 4e |ROFFSET;|START IN|
|000007c0| 4b 52 45 4d 45 4e 54 49 | 45 52 00 c2 27 f2 03 20 |KREMENTI|ER..'.. |
|000007d0| 4a 53 52 44 45 43 43 4e | 54 3b 5a 41 45 48 4c 45 |JSRDECCN|T;ZAEHLE|
|000007e0| 52 20 44 45 4b 52 45 4d | 45 4e 54 00 e0 27 fc 03 |R DEKREM|ENT..'..|
|000007f0| 20 42 4e 45 4c 4f 4f 50 | 53 31 3b 46 45 52 54 49 | BNELOOP|S1;FERTI|
|00000800| 47 3f 20 4e 45 49 4e 3d | 3e 00 e6 27 06 04 3b 00 |G? NEIN=|>..'..;.|
|00000810| 01 28 10 04 20 4c 44 41 | 53 54 4b 4f 50 3b 53 54 |.(.. LDA|STKOP;ST|
|00000820| 41 52 54 20 57 49 45 44 | 45 52 00 1f 28 1a 04 20 |ART WIED|ER..(.. |
|00000830| 4c 44 58 53 54 4b 4f 50 | 2b 31 3b 41 55 46 20 44 |LDXSTKOP|+1;AUF D|
|00000840| 41 53 20 45 52 53 54 45 | 00 3b 28 24 04 20 53 54 |AS ERSTE|.;($. ST|
|00000850| 41 53 54 41 52 54 3b 45 | 4c 45 4d 45 4e 54 20 41 |ASTART;E|LEMENT A|
|00000860| 28 4c 47 29 00 52 28 2e | 04 20 53 54 58 53 54 41 |(LG).R(.|. STXSTA|
|00000870| 52 54 2b 31 3b 53 45 54 | 5a 45 4e 00 5c 28 38 04 |RT+1;SET|ZEN.\(8.|
|00000880| 20 4c 44 41 4e 00 76 28 | 42 04 20 4c 44 58 4e 2b | LDAN.v(|B. LDXN+|
|00000890| 31 3b 43 4f 55 4e 54 20 | 4d 49 54 20 44 45 52 00 |1;COUNT |MIT DER.|
|000008a0| 93 28 4c 04 20 53 54 41 | 43 4f 55 4e 54 3b 41 4e |.(L. STA|COUNT;AN|
|000008b0| 5a 41 48 4c 20 4e 20 4c | 41 44 45 4e 00 a3 28 56 |ZAHL N L|ADEN..(V|
|000008c0| 04 20 53 54 58 43 4f 55 | 4e 54 2b 31 00 b6 28 60 |. STXCOU|NT+1..(`|
|000008d0| 04 20 4c 44 59 23 30 3b | 55 4e 44 20 46 41 43 00 |. LDY#0;|UND FAC.|
|000008e0| d4 28 6a 04 20 4a 53 52 | 45 49 4e 50 4f 53 3b 49 |.(j. JSR|EINPOS;I|
|000008f0| 4e 49 54 49 41 4c 49 53 | 49 45 52 45 4e 00 da 28 |NITIALIS|IEREN..(|
|00000900| 74 04 3b 00 e0 28 7e 04 | 3b 00 ff 28 88 04 3b 2a |t.;..(~.|;..(..;*|
|00000910| 2a 2a 20 53 55 4d 4d 45 | 20 32 20 42 45 52 45 43 |** SUMME| 2 BEREC|
|00000920| 48 4e 45 4e 20 2a 2a 2a | 00 1e 29 92 04 4c 4f 4f |HNEN ***|..)..LOO|
|00000930| 50 53 32 20 4c 44 41 53 | 54 41 52 54 3b 5a 55 20 |PS2 LDAS|TART;ZU |
|00000940| 46 41 43 20 44 41 53 00 | 3f 29 9c 04 20 4c 44 59 |FAC DAS.|?).. LDY|
|00000950| 53 54 41 52 54 2b 31 3b | 45 4c 45 4d 45 4e 54 20 |START+1;|ELEMENT |
|00000960| 41 28 53 54 41 52 54 29 | 00 57 29 a6 04 20 4a 53 |A(START)|.W).. JS|
|00000970| 52 4b 4f 4e 41 44 44 3b | 41 44 44 49 45 52 45 4e |RKONADD;|ADDIEREN|
|00000980| 00 76 29 b0 04 20 4a 53 | 52 4f 46 46 53 45 54 3b |.v).. JS|ROFFSET;|
|00000990| 53 54 41 52 54 20 49 4e | 4b 52 45 4d 45 4e 54 00 |START IN|KREMENT.|
|000009a0| 97 29 ba 04 20 4a 53 52 | 44 45 43 43 4e 54 3b 5a |.).. JSR|DECCNT;Z|
|000009b0| 41 45 48 4c 45 52 20 44 | 45 4b 52 45 4d 45 4e 54 |AEHLER D|EKREMENT|
|000009c0| 00 b5 29 c4 04 20 42 4e | 45 4c 4f 4f 50 53 32 3b |..).. BN|ELOOPS2;|
|000009d0| 46 45 52 54 49 47 3f 20 | 4e 45 49 4e 3d 3e 00 bb |FERTIG? |NEIN=>..|
|000009e0| 29 ce 04 3b 00 c1 29 d8 | 04 3b 00 e3 29 e2 04 3b |)..;..).|.;..)..;|
|000009f0| 2a 2a 2a 20 53 55 4d 4d | 45 32 3d 53 55 4d 4d 45 |*** SUMM|E2=SUMME|
|00000a00| 32 2a 53 55 4d 4d 45 32 | 20 2a 2a 2a 00 02 2a ec |2*SUMME2| ***..*.|
|00000a10| 04 20 4a 53 52 46 41 43 | 41 52 47 3b 53 55 4d 4d |. JSRFAC|ARG;SUMM|
|00000a20| 45 32 20 4e 41 43 48 20 | 41 52 47 00 14 2a f6 04 |E2 NACH |ARG..*..|
|00000a30| 20 4c 44 41 4e 3b 42 52 | 49 4e 47 45 4e 00 23 2a | LDAN;BR|INGEN.#*|
|00000a40| 00 05 20 4a 53 52 45 49 | 4e 50 4f 53 00 3b 2a 0a |.. JSREI|NPOS.;*.|
|00000a50| 05 20 4a 53 52 45 58 50 | 3b 46 41 43 3d 41 52 47 |. JSREXP|;FAC=ARG|
|00000a60| 5e 46 41 43 00 41 2a 14 | 05 3b 00 47 2a 1e 05 3b |^FAC.A*.|.;.G*..;|
|00000a70| 00 6c 2a 28 05 3b 2a 2a | 2a 20 53 55 4d 4d 45 32 |.l*(.;**|* SUMME2|
|00000a80| 20 44 55 52 43 48 20 4e | 20 44 49 56 49 44 49 45 | DURCH N| DIVIDIE|
|00000a90| 52 20 2a 2a 2a 00 8b 2a | 32 05 20 4a 53 52 46 41 |R ***..*|2. JSRFA|
|00000aa0| 43 41 52 47 3b 53 55 4d | 4d 45 32 20 4e 41 43 48 |CARG;SUM|ME2 NACH|
|00000ab0| 20 41 52 47 00 9d 2a 3c | 05 20 4c 44 41 4e 3b 42 | ARG..*<|. LDAN;B|
|00000ac0| 52 49 4e 47 45 4e 00 a9 | 2a 46 05 20 4c 44 58 4e |RINGEN..|*F. LDXN|
|00000ad0| 2b 31 00 c0 2a 50 05 20 | 53 54 41 24 36 33 3b 4e |+1..*P. |STA$63;N|
|00000ae0| 20 4e 41 43 48 20 46 41 | 43 00 d4 2a 5a 05 20 53 | NACH FA|C..*Z. S|
|00000af0| 54 58 24 36 32 3b 42 52 | 49 4e 47 45 4e 00 e1 2a |TX$62;BR|INGEN..*|
|00000b00| 64 05 20 4c 44 58 23 24 | 39 30 00 ea 2a 6e 05 20 |d. LDX#$|90..*n. |
|00000b10| 53 45 43 00 06 2b 78 05 | 20 4a 53 52 5a 57 45 50 |SEC..+x.| JSRZWEP|
|00000b20| 4f 53 3b 53 55 4d 4d 45 | 32 20 44 55 52 43 48 00 |OS;SUMME|2 DURCH.|
|00000b30| 1f 2b 82 05 20 4a 53 52 | 44 49 56 3b 4e 20 44 49 |.+.. JSR|DIV;N DI|
|00000b40| 56 49 44 49 45 52 45 4e | 00 25 2b 8c 05 3b 00 2b |VIDIEREN|.%+..;.+|
|00000b50| 2b 96 05 3b 00 50 2b a0 | 05 3b 2a 2a 2a 20 53 55 |+..;.P+.|.;*** SU|
|00000b60| 4d 4d 45 32 20 56 4f 4e | 20 53 55 4d 4d 45 31 20 |MME2 VON| SUMME1 |
|00000b70| 53 55 42 54 52 20 2a 2a | 2a 00 74 2b aa 05 20 4c |SUBTR **|*.t+.. L|
|00000b80| 44 41 23 3c 28 50 55 46 | 46 45 52 29 3b 53 55 4d |DA#<(PUF|FER);SUM|
|00000b90| 4d 45 31 20 4e 41 43 20 | 48 20 41 52 47 00 93 2b |ME1 NAC |H ARG..+|
|00000ba0| b4 05 20 4c 44 59 23 3e | 28 50 55 46 46 45 52 29 |.. LDY#>|(PUFFER)|
|00000bb0| 3b 42 52 49 4e 47 45 4e | 20 55 4e 44 00 ad 2b be |;BRINGEN| UND..+.|
|00000bc0| 05 20 4a 53 52 4b 4f 4e | 41 52 47 3b 53 55 4d 4d |. JSRKON|ARG;SUMM|
|00000bd0| 45 32 20 56 4f 4e 00 cb | 2b c8 05 20 4a 53 52 53 |E2 VON..|+.. JSRS|
|00000be0| 55 42 3b 53 55 4d 4d 45 | 31 20 53 55 42 54 52 41 |UB;SUMME|1 SUBTRA|
|00000bf0| 48 49 45 52 00 d1 2b d2 | 05 3b 00 d7 2b dc 05 3b |HIER..+.|.;..+..;|
|00000c00| 00 fd 2b e6 05 3b 2a 2a | 2a 20 52 45 53 55 4c 54 |..+..;**|* RESULT|
|00000c10| 41 54 20 44 55 52 43 48 | 20 4e 2d 31 20 44 49 56 |AT DURCH| N-1 DIV|
|00000c20| 49 44 20 2a 2a 2a 00 1a | 2c f0 05 20 4a 53 52 46 |ID ***..|,.. JSRF|
|00000c30| 41 43 41 52 47 3b 52 45 | 53 55 4c 54 41 54 20 4e |ACARG;RE|SULTAT N|
|00000c40| 41 43 48 00 35 2c fa 05 | 20 4c 44 41 23 3c 28 4e |ACH.5,..| LDA#<(N|
|00000c50| 31 29 3b 41 52 47 20 42 | 52 49 4e 47 45 4e 00 55 |1);ARG B|RINGEN.U|
|00000c60| 2c 04 06 20 4c 44 59 23 | 3e 28 4e 31 29 3b 4b 4f |,.. LDY#|>(N1);KO|
|00000c70| 4e 53 54 41 4e 54 45 20 | 4e 20 4e 41 43 48 00 70 |NSTANTE |N NACH.p|
|00000c80| 2c 0e 06 20 4a 53 52 4b | 4f 4e 46 41 43 3b 46 41 |,.. JSRK|ONFAC;FA|
|00000c90| 43 20 55 4e 44 20 41 52 | 47 00 8c 2c 18 06 20 4a |C UND AR|G..,.. J|
|00000ca0| 53 52 44 49 56 3b 44 55 | 52 43 48 20 46 41 43 20 |SRDIV;DU|RCH FAC |
|00000cb0| 44 49 56 49 44 00 92 2c | 22 06 3b 00 98 2c 2c 06 |DIVID..,|".;..,,.|
|00000cc0| 3b 00 bc 2c 36 06 3b 2a | 2a 2a 20 56 41 52 49 41 |;..,6.;*|** VARIA|
|00000cd0| 4e 5a 20 49 4e 20 56 20 | 53 50 45 49 43 48 45 52 |NZ IN V |SPEICHER|
|00000ce0| 4e 20 2a 2a 2a 00 d8 2c | 40 06 20 4a 53 52 43 48 |N ***..,|@. JSRCH|
|00000cf0| 4b 4b 4f 4d 3b 5a 45 49 | 47 45 52 20 41 55 46 20 |KKOM;ZEI|GER AUF |
|00000d00| 56 00 f1 2c 4a 06 20 4a | 53 52 47 45 54 50 4f 53 |V..,J. J|SRGETPOS|
|00000d10| 3b 48 4f 4c 45 4e 20 55 | 4e 44 00 09 2d 54 06 20 |;HOLEN U|ND..-T. |
|00000d20| 54 41 58 3b 44 49 45 20 | 42 45 52 45 43 48 4e 45 |TAX;DIE |BERECHNE|
|00000d30| 54 45 00 27 2d 5e 06 20 | 4a 4d 50 46 41 43 4b 4f |TE.'-^. |JMPFACKO|
|00000d40| 4e 3b 56 41 52 49 41 4e | 5a 20 4e 41 43 48 20 56 |N;VARIAN|Z NACH V|
|00000d50| 00 2d 2d 68 06 3b 00 33 | 2d 72 06 3b 00 53 2d 7c |.--h.;.3|-r.;.S-||
|00000d60| 06 3b 2a 20 5a 41 45 48 | 4c 45 52 20 44 45 4b 52 |.;* ZAEH|LER DEKR|
|00000d70| 45 4d 45 4e 54 49 45 52 | 45 4e 20 2a 00 67 2d 86 |EMENTIER|EN *.g-.|
|00000d80| 06 44 45 43 43 4e 54 20 | 4c 44 41 43 4f 55 4e 54 |.DECCNT |LDACOUNT|
|00000d90| 00 74 2d 90 06 20 42 4e | 45 4c 41 42 31 00 84 2d |.t-.. BN|ELAB1..-|
|00000da0| 9a 06 20 44 45 43 43 4f | 55 4e 54 2b 31 00 96 2d |.. DECCO|UNT+1..-|
|00000db0| a4 06 4c 41 42 31 20 44 | 45 43 43 4f 55 4e 54 00 |..LAB1 D|ECCOUNT.|
|00000dc0| a6 2d ae 06 20 4c 44 41 | 43 4f 55 4e 54 2b 31 00 |.-.. LDA|COUNT+1.|
|00000dd0| b5 2d b8 06 20 42 4e 45 | 44 45 43 45 4e 44 00 c3 |.-.. BNE|DECEND..|
|00000de0| 2d c2 06 20 4c 44 41 43 | 4f 55 4e 54 00 d2 2d cc |-.. LDAC|OUNT..-.|
|00000df0| 06 44 45 43 45 4e 44 20 | 52 54 53 00 d8 2d d6 06 |.DECEND |RTS..-..|
|00000e00| 3b 00 de 2d e0 06 3b 00 | f9 2d ea 06 3b 2a 20 41 |;..-..;.|.-..;* A|
|00000e10| 28 53 54 41 52 54 29 20 | 4e 41 43 48 20 46 41 43 |(START) |NACH FAC|
|00000e20| 20 2a 00 1a 2e f4 06 49 | 4e 46 41 43 20 4c 44 41 | *.....I|NFAC LDA|
|00000e30| 53 54 41 52 54 3b 4b 4f | 4e 53 54 41 4e 54 45 20 |START;KO|NSTANTE |
|00000e40| 41 55 46 00 38 2e fe 06 | 20 4c 44 59 53 54 41 52 |AUF.8...| LDYSTAR|
|00000e50| 54 2b 31 3b 44 49 45 20 | 53 54 41 52 54 28 2b 31 |T+1;DIE |START(+1|
|00000e60| 29 00 53 2e 08 07 20 4a | 4d 50 4b 4f 4e 46 41 43 |).S... J|MPKONFAC|
|00000e70| 3b 57 45 49 53 54 2c 20 | 4e 41 43 48 00 59 2e 12 |;WEIST, |NACH.Y..|
|00000e80| 07 3b 00 7b 2e 1c 07 3b | 2a 20 4b 4f 4e 53 54 20 |.;.{...;|* KONST |
|00000e90| 49 4e 20 50 55 46 46 45 | 52 20 4e 41 43 48 20 46 |IN PUFFE|R NACH F|
|00000ea0| 41 43 20 2a 00 94 2e 26 | 07 50 55 46 46 41 43 20 |AC *...&|.PUFFAC |
|00000eb0| 4c 44 41 23 3c 28 50 55 | 46 46 45 52 29 00 a7 2e |LDA#<(PU|FFER)...|
|00000ec0| 30 07 20 4c 44 59 23 3e | 28 50 55 46 46 45 52 29 |0. LDY#>|(PUFFER)|
|00000ed0| 00 b6 2e 3a 07 20 4a 4d | 50 4b 4f 4e 46 41 43 00 |...:. JM|PKONFAC.|
|00000ee0| bc 2e 44 07 3b 00 de 2e | 4e 07 3b 2a 20 46 41 43 |..D.;...|N.;* FAC|
|00000ef0| 20 4e 41 43 48 20 50 55 | 46 46 45 52 20 4b 4f 50 | NACH PU|FFER KOP|
|00000f00| 49 45 52 45 4e 20 2a 00 | f7 2e 58 07 46 41 43 50 |IEREN *.|..X.FACP|
|00000f10| 55 46 20 4c 44 58 23 3c | 28 50 55 46 46 45 52 29 |UF LDX#<|(PUFFER)|
|00000f20| 00 0a 2f 62 07 20 4c 44 | 59 23 3e 28 50 55 46 46 |../b. LD|Y#>(PUFF|
|00000f30| 45 52 29 00 19 2f 6c 07 | 20 4a 4d 50 46 41 43 4b |ER)../l.| JMPFACK|
|00000f40| 4f 4e 00 1f 2f 76 07 3b | 00 3f 2f 80 07 3b 2a 20 |ON../v.;|.?/..;* |
|00000f50| 53 54 41 52 54 20 41 55 | 46 20 4e 45 58 54 20 45 |START AU|F NEXT E|
|00000f60| 4c 45 4d 45 4e 54 20 2a | 00 53 2f 8a 07 4f 46 46 |LEMENT *|.S/..OFF|
|00000f70| 53 45 54 20 4c 44 41 53 | 54 41 52 54 00 5c 2f 94 |SET LDAS|TART.\/.|
|00000f80| 07 20 43 4c 43 00 67 2f | 9e 07 20 41 44 43 23 35 |. CLC.g/|.. ADC#5|
|00000f90| 00 75 2f a8 07 20 53 54 | 41 53 54 41 52 54 00 84 |.u/.. ST|ASTART..|
|00000fa0| 2f b2 07 20 42 43 43 4f | 46 46 45 4e 44 00 94 2f |/.. BCCO|FFEND../|
|00000fb0| bc 07 20 49 4e 43 53 54 | 41 52 54 2b 31 00 a3 2f |.. INCST|ART+1../|
|00000fc0| c6 07 4f 46 46 45 4e 44 | 20 52 54 53 00 a9 2f d0 |..OFFEND| RTS../.|
|00000fd0| 07 3b 00 af 2f da 07 3b | 00 00 00                |.;../..;|...     |
+--------+-------------------------+-------------------------+--------+--------+