DataMuseum.dk

Presents historical artifacts from the history of:

Zilog MCZ Floppy Disks

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦5d4d9f042⟧

    Length: 2366 (0x93e)
    Notes: ZILOG_BASIC
    Names: »S.BP«

Derivation

└─⟦84a75cdbc⟧ Bits:30006816 8" ZilogMCZ floppy NThun_0018 (Styrediskette Basic 3.0 Rio 2.2 Hjælpeprogrammer)
    └─ ⟦this⟧ »S.BP« 

OctetView

0x000…014 BasicHead {variables=0x0004, stms=0x00ec, f2=0x083a, f3=0000000000000000000000000000}
0x014…018 [
0x014…018   [0x0]: VarDef {f0=0x1400, f1=0x4f, f2=0x28} I% 0x0
0x014…018 ]
0x018…01c Statement 01792 @0x93d
0x01c…020 Statement 01664 @0x920
0x020…024 Statement 01648 @0x91e
0x024…028 Statement 01632 @0x91c
0x028…02c Statement 01616 @0x911
0x02c…030 Statement 01600 @0x90b
0x030…034 Statement 01584 @0x8f9
0x034…038 Statement 01568 @0x8ee
0x038…03c Statement 01552 @0x8e5
0x03c…040 Statement 01536 @0x8d2
0x040…044 Statement 01424 @0x8ca
0x044…048 Statement 01408 @0x8c1
0x048…04c Statement 01392 @0x8b2
0x04c…050 Statement 01376 @0x8a7
0x050…054 Statement 01360 @0x899
0x054…058 Statement 01344 @0x88e
0x058…05c Statement 01328 @0x882
0x05c…060 Statement 01312 @0x879
0x060…064 Statement 01296 @0x86e
0x064…068 Statement 01280 @0x865
0x068…06c Statement 01168 @0x85a
0x06c…070 Statement 01152 @0x851
0x070…074 Statement 01136 @0x848
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…848 0460 CHAIN »DEF.NEW« EOS
0x848…851 0470 CHAIN »INDAT« EOS
0x851…85a 0480 CHAIN »TRANS« EOS
0x85a…865 0490 CHAIN »DIG.NEW« EOS
0x865…86e 0500 CHAIN »PRINT« EOS
0x86e…879 0510 CHAIN »DIG.AER« EOS
0x879…882 0520 CHAIN »AKSER« EOS
0x882…88e 0530 CHAIN »DIG.TEST« EOS
0x88e…899 0540 CHAIN »AFSTAND« EOS
0x899…8a7 0550 CHAIN »VEND.AKSER« EOS
0x8a7…8b2 0560 CHAIN »VEJPLAN« EOS
0x8b2…8c1 0570 CHAIN »DIG.KORREKS« EOS
0x8c1…8ca 0580 CHAIN »KOREG« EOS
0x8ca…8d2 0590 CHAIN »SCAN« EOS
0x8d2…8e5 0600 CHAIN »KONVERT.GEOPLAN« EOS
0x8e5…8ee 0610 CHAIN »PARAM« EOS
0x8ee…8f9 0620 CHAIN »PREPARE« EOS
0x8f9…90b 0630 CHAIN »PLOT.START.NAT« EOS
0x90b…911 0640 CHAIN »TM« EOS
0x911…91c 0650 PRINT = ( 27 )  → af700145e2f3
0x91c…91e 0660 PRINT EOS
0x91e…920 0670 PRINT EOS
0x920…93d 0680 PRINT »           EXIT STERIODIG« EOS
0x93d…93e 0700 END

Less…

Reduced view