|
DataMuseum.dkPresents historical artifacts from the history of: Zilog MCZ Floppy Disks |
This is an automatic "excavation" of a thematic subset of
Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 2362 (0x93a) Notes: ZILOG_BASIC Names: »S.BP«
└─⟦3b14772ef⟧ Bits:30006814 8" ZilogMCZ floppy NThun_0016 (OPERATIVSYSTEM 1/05 850619 KOPI) └─ ⟦this⟧ »S.BP«
0x000…014 BasicHead {variables=0x0004, stms=0x00ec, f2=0x0836, f3=0000000000000000000000000000} 0x014…018 [ 0x014…018 [0x0]: VarDef {f0=0x0400, f1=0x0f, f2=0x28} I% 0x0 0x014…018 ] 0x018…01c Statement 01792 @0x939 0x01c…020 Statement 01664 @0x91c 0x020…024 Statement 01648 @0x91a 0x024…028 Statement 01632 @0x918 0x028…02c Statement 01616 @0x90d 0x02c…030 Statement 01600 @0x907 0x030…034 Statement 01584 @0x8f5 0x034…038 Statement 01568 @0x8ea 0x038…03c Statement 01552 @0x8e1 0x03c…040 Statement 01536 @0x8ce 0x040…044 Statement 01424 @0x8c6 0x044…048 Statement 01408 @0x8bd 0x048…04c Statement 01392 @0x8ae 0x04c…050 Statement 01376 @0x8a3 0x050…054 Statement 01360 @0x895 0x054…058 Statement 01344 @0x88a 0x058…05c Statement 01328 @0x87e 0x05c…060 Statement 01312 @0x875 0x060…064 Statement 01296 @0x86a 0x064…068 Statement 01280 @0x861 0x068…06c Statement 01168 @0x856 0x06c…070 Statement 01152 @0x84d 0x070…074 Statement 01136 @0x844 0x074…078 Statement 01120 @0x83d 0x078…07c Statement 01104 @0x83a 0x07c…080 Statement 01088 @0x80d 0x080…084 Statement 01072 @0x80b 0x084…088 Statement 01056 @0x7d9 0x088…08c Statement 01024 @0x7d7 0x08c…090 Statement 00917 @0x7a3 0x090…094 Statement 00912 @0x766 0x094…098 Statement 00896 @0x727 0x098…09c Statement 00880 @0x6dc 0x09c…0a0 Statement 00864 @0x69b 0x0a0…0a4 Statement 00848 @0x655 0x0a4…0a8 Statement 00832 @0x612 0x0a8…0ac Statement 00816 @0x5d4 0x0ac…0b0 Statement 00800 @0x599 0x0b0…0b4 Statement 00784 @0x54e 0x0b4…0b8 Statement 00768 @0x514 0x0b8…0bc Statement 00656 @0x4cd 0x0bc…0c0 Statement 00640 @0x492 0x0c0…0c4 Statement 00624 @0x44b 0x0c4…0c8 Statement 00608 @0x414 0x0c8…0cc Statement 00592 @0x3de 0x0cc…0d0 Statement 00576 @0x3aa 0x0d0…0d4 Statement 00560 @0x368 0x0d4…0d8 Statement 00544 @0x325 0x0d8…0dc Statement 00528 @0x2e9 0x0dc…0e0 Statement 00400 @0x2bb 0x0e0…0e4 Statement 00384 @0x28d 0x0e4…0e8 Statement 00352 @0x28b 0x0e8…0ec Statement 00336 @0x289 0x0ec…0f0 Statement 00320 @0x23e 0x0f0…0f4 Statement 00304 @0x1f2 0x0f4…0f8 Statement 00288 @0x1a6 0x0f8…0fc Statement 00272 @0x15a 0x0fc…100 Statement 00256 @0x10f 0x100…104 Statement 00080 @0x104 0x104…10f 0050 PRINT = ( 27 ) → af700145e2f3 0x10f…15a 0100 PRINT » ~~ M A P D A T F O T O G R A M M E T R I ~~~~~~~~~~ viak a/s ~~« EOS 0x15a…1a6 0110 PRINT » | |« EOS 0x1a6…1f2 0120 PRINT » | S T E R E O D I G versjon 2.0 |« EOS 0x1f2…23e 0130 PRINT » | |« EOS 0x23e…289 0140 PRINT » ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~« EOS 0x289…28b 0150 PRINT EOS 0x28b…28d 0160 PRINT EOS 0x28d…2bb 0180 PRINT » HOVEDMENY« EOS 0x2bb…2e9 0190 PRINT » ---------« EOS 0x2e9…325 0210 PRINT » 1. DEF ......... Definisjon av tabeller.« EOS 0x325…368 0220 PRINT » 2. INDAT ....... Input data for transformasjon.« EOS 0x368…3aa 0230 PRINT » 3. TRANS ....... 3-D ortogonal transformasjon.« EOS 0x3aa…3de 0240 PRINT » 4. DIG ......... Digitalisering.« EOS 0x3de…414 0250 PRINT » 5. PRINT ....... Print resultater.« EOS 0x414…44b 0260 PRINT » 6. DIG.AER...... Aerotriangolation.« EOS 0x44b…492 0270 PRINT » 7. AKSER ....... Valg af stigningsretning i x og y.« EOS 0x492…4cd 0280 PRINT » 8. DIG.TEST .... Testprogram til x,y,z.« EOS 0x4cd…514 0290 PRINT » 9. AFSTAND ..... Beregning af afstand mellem 2 pkt.« EOS 0x514…54e 0300 PRINT » 10. VEND.AKSER .. Vender akser i filer.« EOS 0x54e…599 0310 PRINT » 11. VEJPLAN ..... Beregner manglende hj||rner af planer.« EOS 0x599…5d4 0320 PRINT » 12. DIG.KORREKS . Flytter origo i filer.« EOS 0x5d4…612 0330 PRINT » 13. KOREG ....... Opretning af hj{lpefiler.« EOS 0x612…655 0340 PRINT » 14. SCAN ........ S||ger p} tema og koordinater.« EOS 0x655…69b 0350 PRINT » 15. KONVERT.GEOPLAN .Konverterer til geoplan coder.« EOS 0x69b…6dc 0360 PRINT » 16. PARAM ....... Opretning af tegneparametre.« EOS 0x6dc…727 0370 PRINT » 17. PREPARE ..... Sortering af reg.filer til tegnefiler.« EOS 0x727…766 0380 PRINT » 18. PLOT.START.NAT Generering af tegnefiler.« EOS 0x766…7a3 0390 PRINT » 19. PLOT. ....... Udtegning af tegnefiler.« EOS 0x7a3…7d7 0395 PRINT » 20. EXIT ....... Exit STEREODIG.« EOS 0x7d7…7d9 0400 PRINT EOS 0x7d9…80b 0420 INPUT » VELG NR. : « COMMA var(I%) EOS 0x80b…80d 0430 PRINT EOS 0x80d…83a 0440 ON var(I%) COMMA 0 var(B0x60) 4 »\x80\x04\x90\x04« 0 5 16 5 32 5 48 5 var(A0x05) var(B0x50) 5 var(B0x60) 5 »\x80\x05\x90\x05\x00« 6 16 6 32 6 48 6 var(A0x06) var(B0x50) 6 EOS 0x83a…83d 0450 GOTO var(B0x50) 0 0x83d…844 0460 CHAIN »DEF« EOS 0x844…84d 0470 CHAIN »INDAT« EOS 0x84d…856 0480 CHAIN »TRANS« EOS 0x856…861 0490 CHAIN »DIG.NEW« EOS 0x861…86a 0500 CHAIN »PRINT« EOS 0x86a…875 0510 CHAIN »DIG.AER« EOS 0x875…87e 0520 CHAIN »AKSER« EOS 0x87e…88a 0530 CHAIN »DIG.TEST« EOS 0x88a…895 0540 CHAIN »AFSTAND« EOS 0x895…8a3 0550 CHAIN »VEND.AKSER« EOS 0x8a3…8ae 0560 CHAIN »VEJPLAN« EOS 0x8ae…8bd 0570 CHAIN »DIG.KORREKS« EOS 0x8bd…8c6 0580 CHAIN »KOREG« EOS 0x8c6…8ce 0590 CHAIN »SCAN« EOS 0x8ce…8e1 0600 CHAIN »KONVERT.GEOPLAN« EOS 0x8e1…8ea 0610 CHAIN »PARAM« EOS 0x8ea…8f5 0620 CHAIN »PREPARE« EOS 0x8f5…907 0630 CHAIN »PLOT.START.NAT« EOS 0x907…90d 0640 CHAIN »TM« EOS 0x90d…918 0650 PRINT = ( 27 ) → af700145e2f3 0x918…91a 0660 PRINT EOS 0x91a…91c 0670 PRINT EOS 0x91c…939 0680 PRINT » EXIT STERIODIG« EOS 0x939…93a 0700 END