Drug Wars for console. Have fun…

Drug Wars for console. Have fun 😎
 #!/bin/bash # License: GPLv3 # A Terminal Based Strategy Game # Heavily based on a game by John E. Dell 1984, who was ahead of his time. # By A. J. S. (2019) GAMEDATE () { # true to original date, format is MM / DD / YYYY echo $(date --date=" 4 Dec 1983 +"$1" days" +"%m / %d / %y") } ROLLPRICES () { # this happens at the start of the game and whenever you jet CPRICE=$(( $(shuf -n1 --input-range=1500-3000) * 10 )) HPRICE=$(( $(shuf -n1 -i500-1400) * 10 )) APRICE=$(( $(shuf -n1 -i100-450) * 10 )) WPRICE=$(( $(shuf -n1 -i30-90) * 10 )) SPRICE=$(( $(shuf -n1 -i7-25) * 10 )) LPRICE=$(( $(shuf -n1 -i1-6) * 10 )) } TERMINFO () { # terminal based GUI to keep it old school; the WIDTH, WID, WI, W are just shorthand measurements to print blank spaces clear -x WIDTH=$(tput cols) HEIGHT=$(tput lines) let WID=WIDTH/2 let HEI=HEIGHT/2 let WI=WIDTH/4 let HE=HEIGHT/4 let W=WIDTH/8 let H=HEIGHT/8 } RESETVALUES () { # initialize the game values DAY=0 GEO=BRONX CASH=2000 GUNS=0 BANK=0 DEBT=5500 MAXLOAN=9450 HOLD=100 SCOCAINE=0 SHEROIN=0 SACID=0 SWEED=0 SSPEED=0 SLUDES=0 TCOCAINE=0 THEROIN=0 TACID=0 TWEED=0 TSPEED=0 TLUDES=0 STATE=begin DAMAGE=0 COPS=0 } ### ROLL INITIAL VALUES ### TERMINFO RESETVALUES ROLLPRICES ########################### US () { # print underscores printf '%0.s_' $(seq 1 $1) } SP () { # print space printf '%0.s ' $(seq 1 $1) } BLOCKS () { # print BLOCKS printf '%0.s█' $(seq 1 $1) } DSP () { # print space for the products case $1 in C ) space=$((WID-W-9-${#SCOCAINE})) ;; H ) space=$((WID-W-10-${#SHEROIN})) ;; A ) space=$((WID-W-12-${#SACID})) ;; W ) space=$((WID-W-12-${#SWEED})) ;; S ) space=$((WID-W-11-${#SSPEED})) ;; L ) space=$((WID-W-11-${#SLUDES})) ;; B ) space=$((WID-W-13-${#BANK})) ;; D ) space=$((WID-W-13-${#DEBT})) ;; DAMAGE ) space=$((WID-W-13-${#DAMAGE})) ;; COPS ) space=$((WID-W-11-${#COPS})) ;; esac printf '%0.s ' $(seq 1 $space) } STARTGAME () { TERMINFO STARTMSG=""$(cat << EOF $(SP $((WID-5)))DRUG WARS $(SP $((WID-8)))A GAME BASED ON $(SP $((WID-12)))THE NEW YORK DRUG MARKET $(SP $((WID-11)))BY JOHN E. DELL (1984) EOF )"" cat <<< $STARTMSG echo SP $((WID-13)) read -n1 -p "DO YOU WANT INSTRUCTIONS? " if [[ $REPLY = [y/Y] ]]; then INSTRUCTIONS else MAINMENU fi } INSTRUCTIONS () { TERMINFO INSTRUCTIONS=""$(cat << EOF $(SP $((WID-20)))DRUG WARS $(SP $((WID-20)))This is a game of buying, selling, and $(SP $((WID-20)))fighting. The object of the game is to $(SP $((WID-20)))pay off your debt to the loan shark. $(SP $((WID-20)))Then, make as much money as you can in a $(SP $((WID-20)))1 month period. If you deal too heavily $(SP $((WID-20)))in drugs, you might run into the $(SP $((WID-20)))police $(echo '!!') Your main drug stash will be $(SP $((WID-20)))in the Bronx. (It's a nice neighborhood) $(SP $((WID-20)))The prices of drugs per unit are: $(SP $((WID-20))) $(SP $((WID-20))) COCAINE 15000-30000 $(SP $((WID-20))) HEROIN 5000-14000 $(SP $((WID-20))) ACID 1000-4500 $(SP $((WID-20))) WEED 300-900 $(SP $((WID-20))) SPEED 70-250 $(SP $((WID-20))) LUDES 10-60 $(SP $((WID-20))) $(SP $((WID-20))) (HIT ANY KEY TO START GAME) EOF )"" cat <<< $INSTRUCTIONS echo read -n1 -p "" MAINMENU } HUD () { # HUD (Heads Up Display) shows the stash and coat values and is also a function and a variable TERMINFO # insert varying space depending on terminal window size SPW="$(SP $W)" HUD=""$(cat << EOF ${SPW}DATE $(GAMEDATE $DAY)$(SP $((WID-16)))HOLD $HOLD ${SPW}STASH$(SP $((WID-W-5-$((${#GEO}/2)))))$GEO$(SP $((W-$((${#GEO}/2)))))TRENCHCOAT $(US $WIDTH) ${SPW}COCAINE $SCOCAINE$(DSP C) |${SPW}COCAINE $TCOCAINE ${SPW}HEROIN $SHEROIN$(DSP H) |${SPW}HEROIN $THEROIN ${SPW}ACID $SACID$(DSP A) |${SPW}ACID $TACID ${SPW}WEED $SWEED$(DSP W) |${SPW}WEED $TWEED ${SPW}SPEED $SSPEED$(DSP S) |${SPW}SPEED $TSPEED ${SPW}LUDES $SLUDES$(DSP L) |${SPW}LUDES $TLUDES $(SP $((WID-1))) | ${SPW}BANK $BANK$(DSP B) |${SPW}GUNS $GUNS ${SPW}DEBT $DEBT$(DSP D) |${SPW}CASH $CASH $(US $WIDTH) EOF )"" cat <<< $HUD echo } SHOWPRICES () { # displays the current prices, changes when ROLLPRICES () happens SPWI="$(SP $WI)" SHOWPRICES=""$(cat << EOF # $(SP $W) HEY DUDE, THE PRICES OF DRUGS HERE ARE: ${SPWI}COCAINE $CPRICE$(SP $((WID-WI-11-${#CPRICE})))WEED $WPRICE ${SPWI}HEROIN $HPRICE$(SP $((WID-WI-11-${#HPRICE})))SPEED $SPRICE ${SPWI}ACID $APRICE$(SP $((WID-WI-11-${#APRICE})))LUDES $LPRICE EOF )"" HUD cat <<< $SHOWPRICES echo } LOAN () { # LOAN sequence HUD read -n1 -p "DO YOU WANT TO VISIT THE LOAN SHARK? " if [[ $REPLY = [y/Y] ]]; then REPAY else STASH fi } REPAY () { # REPAY a loan sequence HUD read -p "HOW MUCH TO REPAY? " if [[ $REPLY = 0 ]]; then BORROW elif [[ $REPLY -gt $CASH ]]; then REPAY elif [[ $REPLY -gt $DEBT ]]; then REPAY elif [[ $REPLY -le $CASH ]] && [[ $REPLY -le $DEBT ]]; then let CASH=CASH-REPLY let DEBT=DEBT-REPLY BORROW else BORROW fi } BORROW () { # BORROW money from the loan shark HUD read -p "HOW MUCH TO BORROW? " if [[ $REPLY = 0 ]]; then STASH elif [[ $(($REPLY+DEBT)) -le $MAXLOAN ]]; then let DEBT=DEBT+REPLY let CASH=CASH+REPLY STASH elif [[ $(($REPLY+DEBT)) -gt $MAXLOAN ]]; then echo 'YOU THINK HE IS CRAZY MAN !!!' sleep 1 let CASH=CASH+REPLY BORROW else LOAN fi } STASH () { # STASH or take out drugs from your stash HUD read -n1 -p "DO YOU WISH TO TRANSFER DRUGS TO YOUR STASH? " if [[ $REPLY = [y/Y] ]]; then echo echo STASHING elif [[ $REPLY = [n/N] ]]; then BANKING else BANKING fi } STASHING () { # Stash product type selector read -n1 -p "WHICH DRUG DO YOU WANT TO STASH OR TAKE? " case $REPLY in [c/C] ) STASHDEPOSIT COCAINE ;; [h/H] ) STASHDEPOSIT HEROIN ;; [a/A] ) STASHDEPOSIT ACID ;; [w/W] ) STASHDEPOSIT WEED ;; [s/S] ) STASHDEPOSIT SPEED ;; [l/L] ) STASHDEPOSIT LUDES ;; * ) STASH ;; esac } STASHDEPOSIT () { # stashing arithmetic and logic HUD read -p "HOW MUCH $1 DO YOU WANT TO STASH? " if [[ $REPLY = 0 ]]; then echo echo elif [[ $REPLY -le T$1 ]] && [[ $REPLY -gt 0 ]]; then let T$1=T$1-REPLY let S$1=S$1+REPLY let HOLD=HOLD+REPLY else STASH fi HUD unset REPLY read -p "HOW MUCH $1 DO YOU WANT TO TAKE? " if [[ $REPLY = 0 ]]; then echo echo elif [[ $REPLY -le S$1 ]] && [[ $REPLY -gt 0 ]] && [[ $((HOLD-REPLY)) -ge 0 ]]; then let S$1=S$1-REPLY let T$1=T$1+REPLY let HOLD=HOLD-REPLY else STASH fi BANKING } BANKING () { # use the bank HUD read -n1 -p "DO YOU WISH TO VISIT THE BANK? " YNO if [[ $YNO = [n/N] ]]; then { echo MAINMENU } elif [[ $YNO = [y/Y] ]]; then { echo read -p "HOW MUCH TO DEPOSIT? " if [[ $REPLY = 0 ]]; then { echo } elif [[ $REPLY -le $CASH ]] && [[ $REPLY -gt 0 ]]; then { let BANK=BANK+REPLY let CASH=CASH-REPLY } elif [[ $REPLY -gt $CASH ]]; then { BANKING } fi HUD read -p "HOW MUCH TO WITHDRAW? " # if [[ $REPLY = 0 ]]; then { # MAINMENU # } if [[ $REPLY -le $BANK ]] && [[ $REPLY -gt 0 ]]; then { let BANK=BANK-REPLY let CASH=CASH+REPLY } elif [[ $REPLY -gt $BANK ]]; then { BANKING } else :; MAINMENU fi MAINMENU } else MAINMENU fi } MAINMENU () { HUD SHOWPRICES case $STATE in begin ) STATE=normal [[ $DAY = 0 ]] && LOAN ;; BRONXDO ) STATE=normal LOAN ;; normal ) BUYSELLJET ;; esac # if [[ $DAY = 30 ]]; then # GAMEOVER # fi } BUYSELLJET () { STATE=normal read -n1 -p "WILL YOU BUY, SELL OR JET? " BSJ case $BSJ in [b/B] ) echo && BUYING ;; [s/S] ) echo && SELLING ;; [j/J] ) echo && JET ;; * ) MAINMENU ;; esac } BUYING () { read -n1 -p "WHAT WILL YOU BUY? " case $REPLY in [c/C] ) BUYDRUG COCAINE ;; [h/H] ) BUYDRUG HEROIN ;; [a/A] ) BUYDRUG ACID ;; [w/W] ) BUYDRUG WEED ;; [s/S] ) BUYDRUG SPEED ;; [l/L] ) BUYDRUG LUDES ;; * ) MAINMENU ;; esac } AFFORDABILITY () { let C_AFFORD=CASH/CPRICE let H_AFFORD=CASH/HPRICE let A_AFFORD=CASH/APRICE let W_AFFORD=CASH/WPRICE let S_AFFORD=CASH/SPRICE let L_AFFORD=CASH/LPRICE } BUYDRUG () { HUD SHOWPRICES AFFORDABILITY TINYNAME=$(cut -c1 <<< $1) TAFFORD=${TINYNAME}_AFFORD TPRICE=${TINYNAME}PRICE echo "YOU CAN AFFORD ( ${!TAFFORD} )" read -p "HOW MUCH $1 DO YOU WANT TO BUY? " if [[ $REPLY = 0 ]]; then echo MAINMENU elif [[ $REPLY -le ${!TAFFORD} ]] && [[ $REPLY -gt 0 ]] && [[ $((HOLD-REPLY)) -ge 0 ]]; then let T$1=T$1+REPLY let CASH=CASH-$((REPLY*${!TPRICE})) let HOLD=HOLD-REPLY #let T$1=$(bc <<< $(echo T$S1)+$(echo $REPLY)) #let CASH=$(bc <<< $(echo $CASH)-$(echo $REPLY)*$(echo $TPRICE)) #let T$1=T$1-REPLY #let CASH=CASH+$((REPLY*${!TPRICE})) MAINMENU else MAINMENU fi } SELLING () { read -n1 -p "WHAT WILL YOU SELL? " case $REPLY in [c/C] ) SELLDRUG COCAINE ;; [h/H] ) SELLDRUG HEROIN ;; [a/A] ) SELLDRUG ACID ;; [w/W] ) SELLDRUG WEED ;; [s/S] ) SELLDRUG SPEED ;; [l/L] ) SELLDRUG LUDES ;; * ) MAINMENU ;; esac } PROFITABILITY () { let C_PROFT=$((COCAINE*CPRICE)) let H_PROFIT=$((HEROIN*HPRICE)) let A_PROFIT=$((ACID*APRICE)) let W_PROFIT=$((WEED*WPRICE)) let S_PROFIT=$((SPEED*SPRICE)) let L_PROFIT=$((LUDES*LPRICE)) } SELLDRUG () { HUD SHOWPRICES PROFITABILITY TINYNAME=$(cut -c1 <<< $1) TPRICE=${TINYNAME}PRICE TMAX=T${1} echo "YOU CAN SELL ( ${!TMAX} )" read -p "HOW MUCH $1 DO YOU WANT TO SELL? " if [[ $REPLY = 0 ]]; then echo MAINMENU elif [[ $REPLY -le ${!TMAX} ]] && [[ $REPLY -gt 0 ]]; then #let T$1=((bc <<< $((T$S1-REPLY)))) #let CASH=((bc <<< $((CASH+REPLY*TPRICE))))) let T$1=T$1-REPLY let CASH=CASH+$((REPLY*${!TPRICE})) let HOLD=HOLD+REPLY MAINMENU else MAINMENU fi } JET () { HUD echo echo "$(SP $W)1"")"" BRONX$(SP $W)2"")"" GHETTO$(SP $W) 3"")"" CENTRAL PARK" echo "$(SP $W)4"")"" MANHATTAN$(SP $((W-4)))5"")"" CONEY ISLAND$(SP $((W-4)))6"")"" BROOKLYN" read -n1 -p "WHERE TO DUDE: " case $REPLY in 1 ) GEO=BRONX STATE=BRONXDO && NEWDAY ;; 2 ) GEO=GHETTO && NEWDAY ;; 3 ) GEO="CENTRAL PARK" && NEWDAY ;; 4 ) GEO=MANHATTAN && NEWDAY ;; 5 ) GEO="CONEY ISLAND" && NEWDAY ;; 6 ) GEO=BROOKLYN && NEWDAY ;; * ) MAINMENU ;; esac } NEWDAY () { let DAY=DAY+1 ROLLPRICES #DEBT=$(bc <<< "$DEBT*1.10") DEBT=$((DEBT*110/100)) #BANK=$(bc <<< "$BANK*1.05") BANK=$((BANK*105/100)) ROLLFIGHT ROLLEVENT MAINMENU } ROLLFIGHT () { FIGHTCHANCE=$(($(shuf -n1 --input-range=1-100)/$((HOLD+1)))) if [[ $FIGHTCHANCE -ge 1 ]]; then COPS=$((((FIGHTCHANCE/9))+2)) HUD echo read -n1 -p "OFFICER HARDASS AND $COPS OF HIS DEPUTIES ARE CHASING YOU "'!!!!!' FIGHT fi } FIGHTHUD () { TERMINFO FIGHTHUD=""$(cat << EOF $(BLOCKS $WIDTH) $(SP $W)DAMAGE $DAMAGE$(DSP DAMAGE)COPS $COPS$(DSP COPS)GUNS $GUNS $(BLOCKS $WIDTH) EOF )"" cat <<< $FIGHTHUD echo echo } FIGHT () { TERMINFO FIGHTHUD # end game if dead if [[ $DAMAGE -ge 50 ]]; then { read -n1 -p 'THEY WASTED YOU MAN !! WHAT A DRAG !!!' exit } fi # no guns fight if [[ $GUNS = 0 ]]; then { read -n1 -p "WILL YOU RUN?" if [[ $REPLY = [r/R/y/Y] ]]; then { # running echo GETAWAY=$(shuf -n1 -i 1-2) if [[ $GETAWAY = 1 ]]; then { FIGHTHUD echo 'YOU LOST THEM IN THE ALLEYS !!' sleep 0.5 MAINMENU } else { FIGHTHUD FIRINGONYOU } fi } else { FIGHT } fi } fi # gun fight if [[ $GUNS -gt 0 ]]; then { read -n1 -p "WILL YOU RUN OR FIGHT? " if [[ $REPLY = [r/R] ]]; then { # running echo GETAWAY=$(shuf -n1 -i 1-2) if [[ $GETAWAY = 1 ]]; then { FIGHTHUD read -n1 -p 'YOU LOST THEM IN THE ALLEYS !!' MAINMENU } else { FIGHTHUD FIRINGONYOU } fi } elif [[ $REPLY = [f/F] ]]; then { # fighting FIGHTHUD echo "YOU'RE FIRING ON THEM "'!!' sleep 0.5 KILLTHEM=$(($(shuf -n1 -i "0-$((GUNS*2))"))) if [[ $KILLTHEM = 0 ]]; then { FIGHTHUD echo 'YOU MISSED THEM !!' sleep 0.5 FIRINGONYOU } elif [[ $KILLTHEM -gt 0 ]]; then { FIGHTHUD COPS=$((COPS-1)) if [[ $COPS -le 0 ]]; then { FIGHTHUD echo 'YOU KILLED ALL OF THEM!!!!' sleep 0.5 FIGHTREWARD } fi echo 'YOU KILLED ONE!!' sleep 0.5 FIRINGONYOU FIGHT } fi } else { FIGHT } fi } fi } FIRINGONYOU () { FIGHTHUD echo 'THEY ARE FIRING ON YOU MAN !!' sleep 0.5 DAMAGEHIT=$(($(shuf -n1 -i 0-2)*COPS-$(shuf -n1 -i 2-20))) if [[ $DAMAGEHIT -le 0 ]]; then { FIGHTHUD echo 'THEY MISSED !!' sleep 0.5 FIGHT } elif [[ $DAMAGEHIT -gt 0 ]]; then { DAMAGE=$((DAMAGE+DAMAGEHIT)) FIGHTHUD echo "YOU'VE BEEN HIT "'!!' sleep 0.5 FIGHT } fi } FIGHTREWARD () { FIGHTHUD FIGHTREWARD=$(shuf -n1 -i "200-1000") CASH=$((CASH+FIGHTREWARD)) read -n1 -p "YOU FOUND $FIGHTREWARD DOLLARS ON OFFICER HARDASS' CARCAS "'!!!' MAINMENU } DOCTOR () { FIGHTHUD DOCPRICEMULTIPLY=$(shuf -n1 -i "200-1000") DOC=$((DAMAGE*50)) WILL YOU PAY% DOLLARS TO HAVE A DOCTOR SEW YOU UP ? } ROLLEVENT () { echo EVENTCHANCE=$(shuf -n1 -i 1-14) case $EVENTCHANCE in [1-2] ) echo ;; 3 ) MUGGED ;; 4 ) COKEBUST ;; 5 ) WEEDBOTTOMOUT ;; 6 ) POLICEDOGS ;; 7 ) BROWNIES ;; 8 ) CHEAPHEROIN ;; 9 ) FINDLUDES ;; 10 ) PARAQUAT ;; 11 ) CHEAPLUDES ;; 12 ) CHEAPACID ;; 13 ) GUNSALE ;; 14 ) COATSALE ;; esac } MUGGED () { let CASH=$((CASH*4/5)) HUD read -n1 -p 'YOU WERE MUGGED IN THE SUBWAY !!' MAINMENU } COKEBUST () { HUD CPRICE=$((CPRICE*6)) read -n1 -p 'COPS MADE A BIG COKE BUST !! PRICES ARE OUTRAGEOUS !!' MAINMENU } WEEDBOTTOMOUT () { HUD WPRICE=$((WPRICE/5)) read -n1 -p 'COLOMBIAN FREIGHTER DUSTED THE COAST GUARD !! WEED PRICES HAVE BOTTOMED OUT !!' MAINMENU } POLICEDOGS () { if [[ $HOLD -lt 70 ]]; then n=$(shuf -n1 -i 2-5) DRUGSARR=(COCAINE HEROIN ACID WEED SPEED LUDES) for DRUG in ${DRUGSARR[@]}; do DROPPED=$((T$DRUG/$n)) let HOLD=$((HOLD+DROPPED)) let T$DRUG=$((T$DRUG-DROPPED)) done HUD echo "POLICE DOGS CHASE YOU $n BLOCKS "'!!' echo read -n1 -p "YOU DROPPED SOME DRUGS "'!!'" THAT'S A DRAG MAN "'!!' fi MAINMENU } BROWNIES () { if [[ $TWEED -gt 1 ]]; then n=$(shuf -n1 -i 1-5) DROPPED=$((TWEED/$n)) let HOLD=$((HOLD+DROPPED)) let TWEED=$((TWEED-DROPPED)) HUD echo 'YOUR MAMA MADE SOME BROWNIES AND USED YOUR WEED !!' sleep 0.5 echo read -n1 -p 'THEY WERE GREAT !!' fi MAINMENU } CHEAPHEROIN () { HUD HPRICE=$((HPRICE/6)) read -n1 -p 'PIGS ARE SELLING CHEAP HEROIN FROM LAST WEEKS RAID !!' MAINMENU } FINDLUDES () { if [[ $HOLD -gt 30 ]]; then n=$(shuf -n1 -i 1-15) i=$(shuf -n1 -i 1-6) case $i in 1 ) m=COCAINE ;; 2 ) m=HEROIN ;; 3 ) m=ACID ;; 4 ) m=WEED ;; 5 ) m=SPEED ;; 6 ) m=LUDES ;; esac FOUND=$n let HOLD=$(($HOLD-$FOUND)) let T$m=$((T$m+$FOUND)) HUD read -n1 -p "YOU FIND $n UNITS OF $m ON A DEAD DUDE IN THE SUBWAY "'!!' MAINMENU else MAINMENU fi } PARAQUAT () { HUD echo 'THERE IS SOME WEED THAT SMELLS LIKE PARAQUAT HERE !! IT LOOKS GOOD !!' read -n1 -p 'WILL YOU SMOKE IT ?' if [[ $REPLY = [y/Y] ]]; then HUD echo 'YOU HALUCINATE FOR THREE DAYS ON THE WILDEST TRIP YOU EVER IMAGINED !!!' sleep 0.5 echo 'THEN YOU DIE BECAUSE YOUR BRAIN HAS DISINTEGRATED !!!' sleep 0.5 else MAINMENU fi } CHEAPLUDES () { HUD LPRICE=$((LPRICE/6)) read -n1 -p 'RIVAL DRUG DEALERS RADED A PHARMACY AND ARE SELLING C H E A P L U D E S !!!' MAINMENU } CHEAPACID () { HUD APRICE=$((APRICE/10)) read -n1 -p 'THE MARKET HAS BEEN FLOODED WITH CHEAP HOME MADE ACID !!!' MAINMENU } GUNSALE () { HUD GUNSTOCK=(RUGER ".38 SPECIAL" BARETTA) SHUFGUNS=$(shuf -n1 -i "0-2") GUNPRICE=$(shuf -n1 -i "250-500") read -n1 -p "WILL YOU BUY A ${GUNSTOCK[$SHUFGUNS]} FOR $GUNPRICE""? " if [[ $REPLY = [y/Y] ]]; then { if [[ $CASH -ge $GUNPRICE ]]; then { let CASH=$((CASH-GUNPRICE)) let GUNS=$((GUNS+1)) } fi } else 
nostr:nevent1qqsrwy22jlnl2gqvtck7rtadlulfprrfdx3tmgvfs3rpqluhug0u9gspz9mhxue69uhkummnw3ezuamfdejjqq3qnjst6azswskk5gp3ns8r6nr8nj0qg65acu8gaa2u9yz7yszjxs9sxpqqqqqqz2ts62u

Related Articles