Mul on olemas üks täiskomplektne "Juku", millele oleks vaja ühe ürituse tarbeks elu sisse puhuda. Riistvara on 100% töökorras, aga softi pole... kui keegi oskaks juhatada mind diskettideni (võin teha koopiad ja tagasi anda), siis premeerin teda kasti õllega.
Mingi 5,25" JUKU floppy ma isegi leidsin. Kahjuks ma täpselt ei tea, mis seal peal võiks olla (pole 5,25" floppy lugejat kuskilt võtta). Pealegi on ketas pea 10 aastat vana ning seega info säilimine sellel ülimalt kahtlane. Kui sa midagi kindlamat ei leia ja tahad seda ketast proovida, siis anna teada.
Mull on kah mõned bootimis võimelised ja ka mõnd programmi sisaldavad juku diskid (vähemalt kui proovisin siis töötasid )
Ja kuna diski säilivus on nii nagu on siis tahaks teada kas nii kuidagi ei oleks võimalik et ühendan selle juku diski seadme arvuti taha (juhtmed lähevad ja hakkas töölegi aga see seal on teistsugune süsteem ja PC ei saa sest aru . Siis töötas kui diskile format teha ) ja teen nendest diskidest mingi softiga kõvakettale imaged vms. et need siis CD-le parema säilivuse juurde panna
NB. Paljud on vanad ja vigased (pooli faile ei saa kätte jne.)
et siis see image tuleks koos vigadega vms. mitte ei ütleks "Read error" ja sellega asi piirdukski.
mul tegelt kah paar karbitäit juku floppysid, aga yhtegi pole proovida veel jõudnud, niiet töökordaei tea... _________________ O: vana (loe: antiikset) arvutustehnikat!
Aastate jooksul on õnnestunud leida mõningast softi, tänud kõigile kes aitasid!
Puudu on graafikatarkvara (nime kahjuks ei mäleta - hiirega sai joonistada monokroomgraafikat) ning legendaarne mäng nimega "ladder".
Oleks lahe kui keegi suudaks need leida - saan teha disketist koopia ja originaali tagastada.
Minu kettad on kõik prügikastiroaks saanud, aga tekstipõhine kraam mis jukul jooksis peaks olema üldine cp/m nimelise opsüsteemi käsufail, seni kuni prose käsustik klapib. Ehk siis suvaline 8080 ja Z80 ühilduv. Internetis ühtteist cp/m softi leidub, näiteks http://www.viara.eu/museum/cpm/ . Ma päris kindel ka ei ole, et suvaline cp/m binaar jukul jookseb, aga tõenäosus on olemas
Tõenäoliselt kõige suuremaks probleemiks internetist leitud kraami puhul on see, et sa ei saa teda kuidagi jukusse, kuna DOS-i ja Juku CP/M kettaformaadid erinevad. Õigupoolest oli igal kuradi 8bitisel arvutil absoluutselt oma floppiformaat tol ajal, rääkimata sellest et draiv võis olla ühe- või kahepoolne ja topelt- või mitte tihedusega kirjutav. DOS-i all leidus küll mingeid progesid, mis enamvähem suutsid enamust formaate lugeda ja kirjutada, aga isegi kui sa mõne leiad, on kogu selle värgiga tükk katsetamist.
Tervist kõigile "Juku" sõpradele. Äratan vana teema jälle ellu. Soov oleks saada kelleltki "Juku" tarkvara. Oman töötavat jukut, soft aga puudub täielikult. Kasutaja Vabrik äkki on Teil midagi alles? Töötava softi eest premeerin
5.25" floppysid on mul 2 karpi. Nendele saaks kopeerida kas ise või kui kellelgi on lausa töötav masin ja aega... siis saame ehk kokkuleppele.
ehk tasub natuke näppida? Asjadele on erinevaid firmware'e olemas (ja sees ka mingid jumperid) millega peaks saama ka erinevates 5.25" seadmete režiimis asja tööle. Siis pole vaja diskette pidevalt põristada. _________________ Progemisest: https://byteaether.github.io/
Seisab keldris vana 386-486-Pentium1? Räägime! Ehk saan vanakesele uue elu anda.
See on hea asi küll. Kusjuures olen ainult kiidusõnu kuulnud selle kohta. Iseasi kas "Juku" sellest aru saab. Enne poleks sellel erilist mõtet kah, kui softi mida sinna peale panna, pole üldse
ehk tasub natuke näppida? Asjadele on erinevaid firmware'e olemas (ja sees ka mingid jumperid) millega peaks saama ka erinevates 5.25" seadmete režiimis asja tööle. Siis pole vaja diskette pidevalt põristada.
pehka1985, kas juku klassikaliste 5.25 floppy'de pealt ei käinud? (pole kahjuks liiga kursis jukuga, pole olnud õnne asjaga kokku puutuda) _________________ Progemisest: https://byteaether.github.io/
Seisab keldris vana 386-486-Pentium1? Räägime! Ehk saan vanakesele uue elu anda.
pehka1985, see ju standardne? lihtsalt mitte kõige uuem standard... (ka 360kB 5.25" floppy'd olid olemas) _________________ Progemisest: https://byteaether.github.io/
Seisab keldris vana 386-486-Pentium1? Räägime! Ehk saan vanakesele uue elu anda.
Kas Juku tarkvaraga seoses on uudiseid? Mul oleks huvi Juku arvutit tervikuna emuleerida, täpsemalt kasutamiseks muuseumides, et tutvustada tulevastele põlvedele Eesti arvutimängude esiajalugu. Sel nädalavahetusel eksperimenteeriks natuke, kuigi Juku emuleerimiseni ilmselt päris kohe ei jõua:
Mul kunagi istus nina all küll selline riistapuu ja floppysid oli ka erinevaid. Sealt leiaks mõnegi legendaardse mängu ja programmi, aga sellega läheks aega. Floppyde saatuse kohta hetkel ei tea ja masin ise on muuseumis.
Hiire emuleerimine on esialgne, st ajab asja ära, kuid joonistamiseks on ebamugav -- aga ülejäänu osas peaks see vastama 98% ulatuses kunagise kooliarvuti kogemusele.
Hiire emuleerimine on esialgne, st ajab asja ära, kuid joonistamiseks on ebamugav -- aga ülejäänu osas peaks see vastama 98% ulatuses kunagise kooliarvuti kogemusele.
Mul oli Juku. Mängudest olid pehmete floppide peal Xonix, Pusher ja Tetris. Kas midagi taolist ka plaanis panna?
Proovisin kah paari mängu. Bomber man mehikest sai liigutada klahvidega 7, 8, 9 ja F8. Tankimängus ei leidnud tulistamisklahvi, igatahes A ei toiminud. Mingil hetkel muutus tank nähtamatuks ja jäi ühe koha peale seisma. Aga oli tore vanu aegu meenutada
Jukudega oli põgus kokkupuude 90'ndate alguses, kui kooli ilmus arvutiõpe. Paar aastat hiljem sain TÜ füüsikahoones näppida juba 286 ja 386 arvuteid ning alles siis tekkis arusaamine, mida kõike arvutiga päriselt teha saab.
Bomber man mehikest sai liigutada klahvidega 7, 8, 9 ja F8. Tankimängus ei leidnud tulistamisklahvi, igatahes A ei toiminud.
Seal kettal on esialgu üpris juhuslik valik ja kui saan õigesti aru, siis need kaks on mängud, mida Juku peal algselt polnud, vaid on nüüd hiljem fännide poolt porditud ja võivad käituda natuke ootamatult. Aga 7-8-9-F8 on tõesti Juku "mänguriklahvid", sest nad paiknesid klaviatuuril füüsiliselt nagu tänapäeval nooleklahvid.
SKG kirjutas:
Mul oli Juku. Mängudest olid pehmete floppide peal Xonix, Pusher ja Tetris. Kas midagi taolist ka plaanis panna?
Kas Juku peal oli CP/M-i tekstiversioon Pusherist ka? Seal kettal on igatahes Sokobani kloon Laoleo -- selle laadimine võtab küll nii harjumatult kaua, et võib hakata kahtlema, kas mitte arvuti kokku ei ole jooksnud.
Minimal system requirements for KolibriOS:
* CPU 5x86: Pentium, AMD or Cyrix without MMX with frequency 90 MHz
* RAM: 8 MB
* Videocard: supporting VGA (640x480x16 mode) or VESA
* Keyboard: AT
* Mouse: COM, PS/2 or USB
xonix ja tetris ning paljud teised - snake ja miinid on kolibrios-il ka olemas vaikimisi peal:
Mis see KolibriOS täpsemalt on ja kas seal jooksevad Juku versioonid Xonixist või Tetrisest (neid mõlemat saab Elektroonikamuuseumi lehel veebiemulaatorist käivitada)?
Ei juku ei ole. FASM assamblery keeles ja väheke uuematele arvutitele - alates 586, PI-PIII, ja tänapäevaste 32bit masinateni välja.
Lihtsalt vanad mängud uues kuues, parema graafikaga.
Linux ka ei ole ja polegi kuhugile asetada- isegi juku on rokem commodore64 moodi.
Sorry! _________________
träm, ma ei mäleta, mis versioon see oli, ma olin tollal ~12-13 aastane.
Olin 1991. aastal sama vana ja mäletan hägusalt tekstiversiooni, aga just mõne päeva eest ilmus välja üks ketas, kus ka see Pusher peal paistab olevat -- aga nii vigane, et sellest kahjuks elulooma ei saa. _________________ Buudi oma JUKU üles! (või loe saatesõna veebiemulaatorile)
Aga sel mängukonsoolil on ka võimalik peale mängude - programmeerida. Originaalsest commodorest pisut väiksem kuid samaväärne. HDMI-ga saab telekaga ühendada.
Viimati müüdi JUKU koos vanema venna JUSSiga oksjonil 9300 euro eest -- JUKU on küll huvitav ka paari tehnilise detaili poolest, nt hiire protokolli, kettavormingu ja vist ka MultiBus tööstussiini kasutamise poolest üheplaadi- või koduarvutis, aga peamiselt väärib ta siiski tähelepanu olulise osana Eesti infoühiskonna kujunemisloost. _________________ Buudi oma JUKU üles! (või loe saatesõna veebiemulaatorile)
Mina nägin viimati Juku arvuteid - 2 tükki - täiskomplekt - 1998 aastal pärnu endises hansagümaasiumis. Töötasid aga seisid. Ma ei tea, mis neist saanud on -
kui tahad võid pärida sellest koolist - kool on alles nimi muudetud - võib-olla on kuskil ruumis tolmu all või ära antud.
Pärnu kandis üldiselt neid oli - ja võib kuskil ruumides olla veel -tolmus. _________________
10 RANDOMIZE
20 PRINT "MATRIXI KOOD: LÕPETAMISEKS CTRL+C"
30 DIM LINE(80)
40 FOR I=1 TO 80: LINE(I) = 32: NEXT I
50 FOR T=1 TO 1000
60 X = INT(RND(1)*80) + 1
70 C = INT(RND(1)*2)
80 IF C=0 THEN LINE(X) = INT(RND(1)*10) + 48
90 IF C=1 THEN LINE(X) = INT(RND(1)*26) + 65
100 FOR I=1 TO 80: PRINT CHR$(LINE(I)); : NEXT I
110 PRINT
120 FOR I=1 TO 80: IF RND(1) < 0.1 THEN LINE(I) = 32: NEXT I
130 NEXT T
Kuna jukul on dos ja basic, siis basic peaks olema kõigil üks - kui see kood töötab, siis on sama ka jukul, käsk run ja enter siis lõpuks jooksutab seda koodi
10 PRINT "NUMBER SQUARE"
20 FOR N=1 TO 10
30 PRINT N; " "; N*N
40 NEXT N
50 END
10 PRINT "ARVA ARV (1-100)"
20 A=INT(RND(1)*100)+1
30 INPUT "SISESTA OMA PAKKUMINE: "; G
40 IF G=A THEN PRINT "ÕIGE!": END
50 IF G<A THEN PRINT "SUUREM!"
60 IF G>A THEN PRINT "VÄIKSEM!"
70 GOTO 30
Mina nägin viimati Juku arvuteid - 2 tükki - täiskomplekt - 1998 aastal pärnu endises hansagümaasiumis. Töötasid aga seisid. Ma ei tea, mis neist saanud on -
kui tahad võid pärida sellest koolist - kool on alles nimi muudetud - võib-olla on kuskil ruumis tolmu all või ära antud.
Pärnu kandis üldiselt neid oli - ja võib kuskil ruumides olla veel -tolmus.
Pärnu 6.KK-s ehk hilisemas Hansagümnaasiumis sai kutseka ajal vist aastal 1990 isegi üks arvutitund Juku taga veeta. _________________
See kood JUKU peal täitsa teeb midagi, aga vähemalt B80 jaoks tuleb LINE tuleb asendada L-iga, sest LINE on ka käsk ja muutujaid käskude nimedega segada ei tohi. JUKU ekraani laius on 80 asemel 40, misttõtu iga 80 tuleb asendada, aga parem on see defineerida muutujana P. Kui trükitakse rida kogu ekraani laiuses, siis pole enam täiendavaid reavahetusi vaja ja vähemalt EKTA JBASICUS tulemus natuke MATRIXi efektile sarnaneb küll. Seal eraldi RANDOMIZE käsku seal pole, aga B80 BASICus on, samas see tundub lubavat viisakalt kuni 39 märki trükkida ja vajab ikkagi eraldi PRINT käske (ääreni trükkides hakkab ise reavahetusi lisama). Kuna JUKUl on ka teisi tekstirežiime, siis saab P väärtust nende jaoks muuta. Töötav kood on selline:
10 REM RANDOMIZE
20 PRINT "MATRIXI KOOD: L`PETAMISEKS CTRL+C"
30 P=40: DIM L(P)
40 FOR I=1 TO P: L(I)=32: NEXT I
50 FOR T=1 TO 1000
60 X=INT(RND(1)*P)+1
70 C=INT(RND(1)*2)
80 IF C=0 THEN L(X)=INT(RND(1)*10)+48
90 IF C=1 THEN L(X)=INT(RND(1)*26)+65
100 FOR I=1 TO P: PRINT CHR$(L(I));: NEXT I
110 REM PRINT
120 FOR I=1 TO P: IF RND(1)<.1 THEN L(I)=32: NEXT I
130 NEXT T
Pidasin nädala eest ettekande JUKU häkkeritest ja tarkvara ökosüsteemist, ka seal sai natuke JBASICut demotud:
Kuigi hiire tugi on esialgsel kujul valmis, siis seda ma praegu ametlikku versiooni ei lisanud. Ülejäänu peaks töötama enam-vähem nagu päris JUKU peal. _________________ Buudi oma JUKU üles! (või loe saatesõna veebiemulaatorile)
viimati muutis träm 05.12.2024 15:13:15, muudetud 3 korda
Esimene minu kirjutatud arvutimäng oli "T-KUK" ehk tähtede kukkumine ATARI BASICus. Hiljem portisin selle IBMi BASICusse ka. Mängul oli kolm levelit (maa, linn ja kuu) ja edetabel ning olin selle hoolega korporatiivselt brändinud. Kahjuks on sellest säilinud ainult üks hilisem remake:
Ilmselt pean millalgi selle ka JUKU jaoks kirjutama. Arvan, et olen seda kunagi juba teinud, aga kahtlustan, et sellega oli niisugune lugu, et kui selle kirjutasin, siis läks salvestamisega midagi nihu ja uuesti kirjutada polnud enam tuju. _________________ Buudi oma JUKU üles! (või loe saatesõna veebiemulaatorile)
10 PRINT "SATOSHI TO EURO CONVERTER"
20 PRINT "-------------------------"
30 INPUT "ENTER SATOSHI AMOUNT: "; S
40 INPUT "ENTER VALUE OF 1 SATOSHI IN CENTS (e.g., 1 FOR 1 CENT): "; C
50 V = S * (C / 100)
60 PRINT "VALUE IN EUROS: "; V
70 PRINT "-------------------------"
80 GOTO 30
----
Selle sain tööle SmallBASIC-us. Töötab ka vintage-basicus:
10 PRINT "ALGORTIMI V2LU"
20 PRINT "SISESTA ARV: ";
30 INPUT N
40 IF N <= 0 THEN PRINT "PALUN SISESTA POSITIIVNE ARV!": GOTO 20
50 PRINT "1. KAS ARV ON PAARIS V2I PAARITU?"
60 R = INT(N / 2) * 2
70 IF R = N THEN PRINT N; " ON PAARIS."
80 IF R <> N THEN PRINT N; " ON PAARITU."
90 PRINT "2. COLLATZI ALGORTIM:"
100 X = N
110 PRINT X;
120 IF X = 1 THEN PRINT " - VALMIS!" : GOTO 150
130 R = INT(X / 2) * 2
140 IF R = X THEN X = X / 2: GOTO 145
141 X = 3 * X + 1
145 GOTO 110
150 PRINT "VAJUTA ENTER, ET J2TKATA"
160 INPUT A$
170 PRINT "3. FAKTORITE SUMMA ARVUTAMINE:"
180 S = 0
190 FOR I = 1 TO N - 1
200 IF N - (INT(N / I) * I) = 0 THEN S = S + I
210 NEXT I
220 PRINT "FAKTORITE SUMMA ON "; S
260 PRINT "KAS PROOVID UUESTI? (J/E): ";
270 INPUT K$
280 IF K$ = "J" OR K$ = "j" THEN GOTO 20
290 PRINT "T2NAN, ET PROOVISID ALGORTIMI V2LU!"
300 END
Seal on paar asja, mida mujal pole, aga üldiselt on seal olemasolevad JUKU mängud sellisel kujul, et neid oleks võimalik suurema lisavaevata tööle panna. Hea koht, kust alustada, kui keegi peaks tahtma uuendada oma tutvust legendaarse kooliarvutiga. _________________ Buudi oma JUKU üles! (või loe saatesõna veebiemulaatorile)
Huvitav see MAME toetus on ka linuxi mängukonsoolis, et kas juku saab ka sinna MAME-ga toppida:
Üldiselt peaks JUKU süsteemi tugi tulema kaasa misatahes viimase MAMEga sõltumata opsüsteemist (see töötab ju isegi veebibrauseris), aga seal ei ole ilmselt vaikimisi meie eksootilise kooliarvuti tarkvara, mis tuleb ise lisada. JUKU tugi on olemas alates MAME versioonist 0.272.
MAMEs saab defineerida ka klahvide asemel muid sisendeid, seega ei tohiks JUKU mängude seadistamine olla ülejõukäiv, ka saab salvestada süsteemi seisundeid, mis tähendab, et mängud saab vajadusel panna tööle ka ilma eelneva opsüsteemi logimiseta ja käsureal toimetamiseta.
Detsembris jõudis tarkvara kataloogi kaks uut ketast Vakstu seeriast:
Millalgi hiljem jõuab ka kolmas, mis esialgu koosneb peamiselt halbadest sektoritest ja vajab seetõttu veel veidi putitamist. _________________ Buudi oma JUKU üles! (või loe saatesõna veebiemulaatorile)
40 ' Algväärtusta veerud
50 FOR I = 1 TO 80
60 C(I) = INT(RND * 24) + 1
70 NEXT I
100 ' Peatsükkel
110 CLS ' Kustuta ekraan
120 FOR I = 1 TO 80
130 X = C(I)
140 C(I) = X + INT(RND * 2) ' Liiguta alla 1-2 sammu
150 IF C(I) > 24 THEN C(I) = 1 ' Reset, kui jõuab alla
160 ' Genereeri juhuslik sümbol
170 R = INT(RND * 17)
180 IF R = 0 THEN S$ = "B"
190 IF R > 0 AND R < 10 THEN S$ = CHR$(48 + R) ' 0-9
200 IF R >= 10 THEN S$ = CHR$(55 + R) ' A-F
210 LOCATE C(I), I
220 PRINT S$;
230 NEXT I
240 FOR T = 1 TO 100: NEXT T ' Viivitus
250 GOTO 100
10 PRINT "KUI PALJU SA KOGUD KUUS (EURODES)?"
20 INPUT KUU
30 PRINT "MITU AASTAT SA TAHAD KOGUDA?"
40 INPUT AASTAD
50 SUMMA = KUU * 12 * AASTAD
60 PRINT "ILMA INFLATSIOONITA KOGU SUMMA: "; SUMMA; " EUROT"
70 REM --- INFLATSIOONI ARVUTUS (12% AASTAS VÄÄRTUSE VÄHENEMINE)
80 INF = 1
90 FOR I = 1 TO AASTAD
100 INF = INF * 0.88
110 NEXT I
120 REAALSUMMA = SUMMA * INF
130 PRINT "RAHA VÄÄRTUS INFLATSIOONIGA (12% AASTAS): "; INT(REAALSUMMA); " EUROT"
140 REM --- BITCOINI DEFALTSIOON (15% AASTAS KASV)
150 BTC = 1
160 FOR I = 1 TO AASTAD
170 BTC = BTC * 1.15
180 NEXT I
190 BTC_SUMMA = SUMMA * BTC
200 PRINT "KUI PANED BITCOINI (+15% AASTAS): "; INT(BTC_SUMMA); " EUROT"
mina634, see programm arvutab aiateibaid.
Oletame, et kogun 100€ iga kuu 20 aastat. Minu viimane 100€, mis panen 20. aastal sisse, ei saa pihta 20 aastase vääringuga inflatsiooniga. Tal on vaid 1 kuu aega üldse eksisteerida.
Ma üldist konteksti ei hakka üldse kommenteerima. _________________ Progemisest: https://byteaether.github.io/
Seisab keldris vana 386-486-Pentium1? Räägime! Ehk saan vanakesele uue elu anda.
mina634, see programm arvutab aiateibaid.
Oletame, et kogun 100€ iga kuu 20 aastat. Minu viimane 100€, mis panen 20. aastal sisse, ei saa pihta 20 aastase vääringuga inflatsiooniga. Tal on vaid 1 kuu aega üldse eksisteerida.
Ma üldist konteksti ei hakka üldse kommenteerima.
See on hind praeguste hindadega. Et siis, mis inflatsioonist järgi jääb. 1861 EUR. Kogud 20 aastat (24000 eur) ja väärtus on sellest järgi (1861 EUR) tänaste hindadega. Julm hind 10, 20, 30 aastat niisama eurosi koguda. Krt! Koolis seda ei õpetatud - kuigi minu ajal oli juba NIXONi FIAT süsteem. Uuri ajalugu Fordi ostujõud enne 71-72 aastal ja pärast 1972 aastat.
(satoshi nakamoto selle põhjal lõi ka bitcoini valemi - osaliselt + 21 miljonit piiratud..)
Aga igal juhul ületab bitcoin igasugust inflatsiooni - täpseid ei saa andagi. See muutub. Aga plussis. _________________
mina634, kui ei saa pihta, siis ei saa pihta. Kõigile pole Jumala poolt ühtmoodi antud. _________________ Progemisest: https://byteaether.github.io/
Seisab keldris vana 386-486-Pentium1? Räägime! Ehk saan vanakesele uue elu anda.
Tegin uue kogumisstrateegia (investoritele, pankadele ja eraisikutele, kes püüavad kuus vähemalt keskmist ~ 1-2 kasumiprotsenti (erinevast kohtadest) ja
saavad ka ise sisestada inflatsiooni protsendi. Soovitan seda ka eesti riigile. Soovitan panna suurem inflatsiooni number, mida te majandusuudistest kuulate, eriti siis kui soovite 20+ aastat koguda (sõjad, rahatrükk, pankade pankrott)
10 PRINT "SMARTSAVE - Smart Saving Simulation (Simple View)"
20 INPUT "Initial capital ($) ";C
30 INPUT "Monthly saving ($) ";S
40 INPUT "Annual inflation rate (%) ";I
50 I = I / 100
60 INPUT "Number of years to save? ";Y
70 T = Y * 12
80 DIM B(T)
90 SUMR = 0: SUMREAL = 0
100 R = 0.01
110 FOR M = 1 TO T
120 C = C + S
130 INF = (1 + I) ^ (M / 12)
140 IF R > 0.02 THEN STRAT = 2 ELSE IF R > 0.005 THEN STRAT = 1 ELSE STRAT = 0
150 IF STRAT = 0 THEN GOSUB 500
160 IF STRAT = 1 THEN GOSUB 600
170 IF STRAT = 2 THEN GOSUB 700
180 B(M) = C / INF
190 SUMR = SUMR + R
200 SUMREAL = SUMREAL + B(M)
210 NEXT M
220 AVGR = SUMR / T
230 AVGREAL = SUMREAL / T
240 PRINT "Average monthly return: "; INT(AVGR * 10000) / 100; "%"
250 PRINT "Final real value: $"; INT(B(T))
260 PRINT "Average real value per month (With Inflation): $"; INT(AVGREAL)
270 END
500 REM --- HOLDING IN CASH ---
510 R = 0.002
520 C = C * (1 + R)
530 RETURN
600 REM --- SAFE INVESTMENT ---
610 R = 0.01 + RND / 100
620 C = C * (1 + R)
630 RETURN
700 REM --- RISKY INVESTMENT ---
710 R = 0.03 * (RND - 0.3)
720 IF R < -0.02 THEN R = -0.02
730 C = C * (1 + R)
740 RETURN
jnt kirjutas:
mina634, kui ei saa pihta, siis ei saa pihta. Kõigile pole Jumala poolt ühtmoodi antud.
täiesti võid koodi muuta - endale usutavamaks kohendada - keegi ei keela. _________________
sa ei või postitada uusi teemasid siia foorumisse sa ei või vastata selle foorumi teemadele sa ei või muuta oma postitusi selles foorumis sa ei või kustutada oma postitusi selles foorumis sa ei või vastata küsitlustele selles foorumis sa ei saa lisada manuseid selles foorumis sa võid manuseid alla laadida selles foorumis
Hinnavaatlus ei vastuta foorumis tehtud postituste eest.