|
DataMuseum.dkPresents historical artifacts from the history of: Christian Rovsing CR7, CR8 & CR16 CP/M |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Christian Rovsing CR7, CR8 & CR16 CP/M Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 512 (0x200)
Types: TextFile
Names: »LAAN.BAK«
└─⟦a2831e659⟧ Bits:30004217 MBASIC r5.21 og BASIC programmer
└─ ⟦this⟧ »LAAN.BAK«
10 PRINT CHR$(26) 20 PRINT "Beregninger over et laan" 30 print "========================" 40 print 50 print " (1) Et laans hovedstol" 60 print " (2) Et laans ydelser" 70 print " (3) Et laans sidste ydelse" 80 print " (4) Et laans restgaeld" 90 print " (5) Et laans løbetid" 100 print " (6) Et laans rente" 110 print 120 print "Vaelg fra 1-6 "; 130 valg$=inkey$ 140 if valg$="" then goto 130 150 if valg$="0" then stop 160 if valg$="1" then chain "HVDSTL" 170«eof»