fighterjet
Account Details
SteamID64 76561198002324132
SteamID3 [U:1:42058404]
SteamID32 STEAM_0:0:21029202
Country United States
Signed Up March 28, 2014
Last Posted November 1, 2016 at 5:07 PM
Posts 4 (0 per day)
Game Settings
In-game Sensitivity 2
Windows Sensitivity Default
Raw Input 1
DPI
800
Resolution
1920x1080
Refresh Rate
144 Hz
Hardware Peripherals
Mouse Logitech G400s
Keyboard Filco Majestouch w/ MX Brown
Mousepad Steelseries QCK+
Headphones Denon AHD2000
Monitor Asus VG248qe + Lightboost
#53 help me with my coding hw in Off Topic

I know C++, so here's a Clojure solution.

(declare play)
(declare ask)

(def maxincorrect 7)
(def words ["meme" "rick" "derp" "hi"])

(defn guessCorrect [secret position incorrect]
(println "correct guess!")
  (play secret (+ position 1) incorrect))

(defn guessIncorrect [secret position incorrect]
(println "incorrect guess!")
  (play secret position (+ incorrect 1)))

(defn isCorrectGuess [secret position guess]
(= (subs secret position (+ position 1)) guess))

(defn ask [secret position incorrect]
(println (str "Current guess: " (subs secret 0 position)))
  (println (str "lives remaining: " (- maxincorrect incorrect)))
  (println "Enter your next guess.")
  (if (isCorrectGuess secret position (read-line))
    (guessCorrect secret position incorrect)
    (guessIncorrect secret position incorrect)))

(defn play [secret position incorrect]
(cond
    (= (count secret) position) (println "you won! a winrar is you!")
    (= incorrect maxincorrect) (println "you lost, what the frick?")
    :else (ask secret position incorrect)))

(play (rand-nth words) 0 0)
posted about 8 years ago
#37 help me with my coding hw in Off Topic

I know C++, but here's a scheme solution.

(define maxincorrect 7)

(define (hasWon secret position)
	(= (string-length secret) position))

(define (hasLost incorrect)
	(= incorrect maxincorrect))

(define (currentGuess secret position)
	(string-append "Current guess: " (substring secret 0 position) "\n"))

(define (correctGuess secret position)
	(substring secret position (+ position 1)))

(define (play secret position incorrect)
	(cond
		((hasWon secret position) (display "you win! pootis!\n"))
		((hasLost incorrect) (display "you lost! dingus!\n"))

		(else ((display (currentGuess secret position))
			(display "Take a Guess: ")
			(if (string=? (correctGuess secret position) (read))
				((display "Correct guess!\n")
					(play secret (+ position 1) incorrect))
				((display "Incorrect guess!\n")
 					(play secret position (+ incorrect 1))))))))

(play "hi" 0 0)
posted about 8 years ago
#144 TF.TV WHIPS, what do you drive? in Off Topic
Rick@fighterjet... thats dope as hell you got the perfect setup.. something with power that can still drive in the snow.. and a turboed miata

are those real rpf1s on the miata?

Nope, they're Kosei K1 TSs.

posted about 10 years ago
#142 TF.TV WHIPS, what do you drive? in Off Topic

first post on tftv, might as well be my wips

http://i.imgur.com/yvv3zHw.jpg

2011 wrx, Invidia turboback, sway bars/bushings all around, 19psi 91 oct tune, put out 280whp/320wtq on a low-ish reading dyno, pretty happy with it so far.

http://i.imgur.com/NwgxTJk.jpg

1990 miata autocross car complete with shitty plasti dip, Garett 2560r @ 10psi, MSPNP, gigantic sway bars w/ coilovers, 80k on the original motor. Looks like (pretty much is) a shitbox but it's almost as fast as my wrx and way more fun to drive.

posted about 10 years ago