Cerca Hashtag

Scopri nuove persone e i loro amici a quattro zampe, e fai nuove amicizie

Articoli Results "asic"
  • The full source code generated for AppleSoft BASIC by CrypTok's AI. Wanted to share the entire code, but I sure hope I can share it in the future without posting the entire code like the way I'm doing it now. Either way, enjoy!

    10 REM BITCOIN MINING SIMULATOR
    20 REM BY CRYPTOK AI
    30 CLEAR
    40 HOME
    50 PRINT "BITCOIN MINING SIMULATOR"
    60 PRINT "========================"
    70 PRINT
    80 REM INITIALIZE VARIABLES
    90 B = 0: REM BITCOIN BALANCE
    100 H = 1: REM HASH RATE (H/S)
    110 M = 1: REM MINERS
    120 U = 0: REM UPGRADES BOUGHT
    130 T = 0: REM TOTAL MINED
    140 REM
    150 REM MAIN GAME LOOP
    160 HOME
    170 PRINT "BITCOIN MINING SIM"
    180 PRINT "=================="
    190 PRINT
    200 PRINT "BITCOIN: "; INT(B * 100000000) / 100000000
    210 PRINT "HASH RATE: "; H; " H/S"
    220 PRINT "MINERS: "; M
    230 PRINT "TOTAL MINED: "; INT(T * 100000000) / 100000000
    240 PRINT
    250 REM MINING CALCULATION
    260 B = B + (H / 1000000): REM SIMPLIFIED MINING
    270 T = T + (H / 1000000)
    280 PRINT "MINING..."
    290 FOR I = 1 TO 500: NEXT I: REM DELAY
    300 PRINT
    310 PRINT "UPGRADES:"
    320 PRINT "1) BUY MINER (COST: "; 0.01 * (M + 1); " BTC)"
    330 PRINT "2) UPGRADE HASH (COST: "; 0.05 * (U + 1); " BTC)"
    340 PRINT "3) KEEP MINING"
    350 PRINT "4) QUIT"
    360 PRINT
    370 INPUT "CHOICE: "; C
    380 IF C = 1 THEN GOSUB 500
    390 IF C = 2 THEN GOSUB 600
    400 IF C = 3 THEN GOTO 160
    410 IF C = 4 THEN GOTO 700
    420 GOTO 160
    430 REM
    500 REM BUY MINER
    510 COST = 0.01 * (M + 1)
    520 IF B < COST THEN PRINT "NOT ENOUGH BTC!": FOR I = 1 TO 1000: NEXT I: RETURN
    530 B = B - COST
    540 M = M + 1
    550 H = H + M
    560 PRINT "MINER PURCHASED!"
    570 FOR I = 1 TO 1000: NEXT I
    580 RETURN
    590 REM
    600 REM UPGRADE HASH
    610 COST = 0.05 * (U + 1)
    620 IF B < COST THEN PRINT "NOT ENOUGH BTC!": FOR I = 1 TO 1000: NEXT I: RETURN
    630 B = B - COST
    640 U = U + 1
    650 H = H * 1.5
    660 PRINT "HASH RATE UPGRADED!"
    670 FOR I = 1 TO 1000: NEXT I
    680 RETURN
    690 REM
    700 REM END GAME
    710 HOME
    720 PRINT "FINAL STATS:"
    730 PRINT "============"
    740 PRINT "TOTAL BITCOIN MINED: "; INT(T * 100000000) / 100000000
    750 PRINT "MINERS OWNED: "; M
    760 PRINT "UPGRADES BOUGHT: "; U
    770 PRINT
    780 PRINT "THANKS FOR MINING!"
    790 PRINT "VISIT CRYPTOKAPP.COM"
    800 END
    The full source code generated for AppleSoft BASIC by CrypTok's AI. Wanted to share the entire code, but I sure hope I can share it in the future without posting the entire code like the way I'm doing it now. Either way, enjoy! 10 REM BITCOIN MINING SIMULATOR 20 REM BY CRYPTOK AI 30 CLEAR 40 HOME 50 PRINT "BITCOIN MINING SIMULATOR" 60 PRINT "========================" 70 PRINT 80 REM INITIALIZE VARIABLES 90 B = 0: REM BITCOIN BALANCE 100 H = 1: REM HASH RATE (H/S) 110 M = 1: REM MINERS 120 U = 0: REM UPGRADES BOUGHT 130 T = 0: REM TOTAL MINED 140 REM 150 REM MAIN GAME LOOP 160 HOME 170 PRINT "BITCOIN MINING SIM" 180 PRINT "==================" 190 PRINT 200 PRINT "BITCOIN: "; INT(B * 100000000) / 100000000 210 PRINT "HASH RATE: "; H; " H/S" 220 PRINT "MINERS: "; M 230 PRINT "TOTAL MINED: "; INT(T * 100000000) / 100000000 240 PRINT 250 REM MINING CALCULATION 260 B = B + (H / 1000000): REM SIMPLIFIED MINING 270 T = T + (H / 1000000) 280 PRINT "MINING..." 290 FOR I = 1 TO 500: NEXT I: REM DELAY 300 PRINT 310 PRINT "UPGRADES:" 320 PRINT "1) BUY MINER (COST: "; 0.01 * (M + 1); " BTC)" 330 PRINT "2) UPGRADE HASH (COST: "; 0.05 * (U + 1); " BTC)" 340 PRINT "3) KEEP MINING" 350 PRINT "4) QUIT" 360 PRINT 370 INPUT "CHOICE: "; C 380 IF C = 1 THEN GOSUB 500 390 IF C = 2 THEN GOSUB 600 400 IF C = 3 THEN GOTO 160 410 IF C = 4 THEN GOTO 700 420 GOTO 160 430 REM 500 REM BUY MINER 510 COST = 0.01 * (M + 1) 520 IF B < COST THEN PRINT "NOT ENOUGH BTC!": FOR I = 1 TO 1000: NEXT I: RETURN 530 B = B - COST 540 M = M + 1 550 H = H + M 560 PRINT "MINER PURCHASED!" 570 FOR I = 1 TO 1000: NEXT I 580 RETURN 590 REM 600 REM UPGRADE HASH 610 COST = 0.05 * (U + 1) 620 IF B < COST THEN PRINT "NOT ENOUGH BTC!": FOR I = 1 TO 1000: NEXT I: RETURN 630 B = B - COST 640 U = U + 1 650 H = H * 1.5 660 PRINT "HASH RATE UPGRADED!" 670 FOR I = 1 TO 1000: NEXT I 680 RETURN 690 REM 700 REM END GAME 710 HOME 720 PRINT "FINAL STATS:" 730 PRINT "============" 740 PRINT "TOTAL BITCOIN MINED: "; INT(T * 100000000) / 100000000 750 PRINT "MINERS OWNED: "; M 760 PRINT "UPGRADES BOUGHT: "; U 770 PRINT 780 PRINT "THANKS FOR MINING!" 790 PRINT "VISIT CRYPTOKAPP.COM" 800 END
    0 Commenti 0 condivisioni 84 Views
  • Apparently you can use CrypTok's AI to make BASIC programs, in any form of BASIC you want. This is actually pretty cool! I don't know if it will run properly, but if you got the source code, you can go full-out FOSS with it!

    Also, I switched from regular Ubuntu to Linux Mint, in case you're curious.
    Apparently you can use CrypTok's AI to make BASIC programs, in any form of BASIC you want. This is actually pretty cool! 😅 I don't know if it will run properly, but if you got the source code, you can go full-out FOSS with it! Also, I switched from regular Ubuntu to Linux Mint, in case you're curious.
    0 Commenti 0 condivisioni 77 Views
  • I really did this for a living...

    #bitcoin #asic #everyone #cryptok
    I really did this for a living... #bitcoin #asic #everyone #cryptok
    Love
    3
    0 Commenti 0 condivisioni 1K Views
  • How long did it take you to understand crypto basics?
    #Cryptok
    How long did it take you to understand crypto basics? #Cryptok
    0 Commenti 0 condivisioni 872 Views
Search Tips
  • Use # for hashtags
  • Use @ to find users
  • Use quotes for exact phrases
  • Use tabs to filter results