This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(def ^:const pixels-per-tile 32) | |
(defn create-ball-body! | |
[screen radius] | |
(let [body (add-body! screen (body-def :dynamic))] | |
(->> (circle-shape :set-radius radius) | |
(fixture-def :density 1 :friction 0 :restitution 1 :shape) | |
(body! body :create-fixture)) | |
body)) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(print "Click the screen to create a new block.") | |
(def ^:const mass 10) | |
(defn get-environment | |
[] | |
(let [attr-type (attribute-type :color :ambient-light) | |
attr (attribute :color attr-type 0.3 0.3 0.3 1)] | |
(environment :set attr))) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(ns my-game.core | |
(:require [clojure.edn :as edn] | |
[clojure.java.io :as io] | |
[play-clj.core :refer :all] | |
[play-clj.g2d :refer :all] | |
[play-clj.g3d :refer :all] | |
[play-clj.math :refer :all] | |
[play-clj.physics :refer :all] | |
[play-clj.ui :refer :all]) | |
(:import [java.io StringWriter])) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(defscreen main-screen | |
:on-show | |
(fn [screen entities] | |
(update! screen | |
:renderer (model-batch) | |
:attributes (let [attr-type (attribute-type :color :ambient-light) | |
attr (attribute :color attr-type 0.8 0.8 0.8 1)] | |
(environment :set attr)) | |
:camera (doto (perspective 75 (game :width) (game :height)) | |
(position! 0 0 3) |
- Create a Digital Ocean account
- In the OS X terminal, run
ssh-keygen
, then hit enter until it is done - Create a droplet
- Select Ubuntu 16.10 x64
- In Finder,
Go -> Go to Folder...
then type~/.ssh
- Open
id_rsa.pub
with TextEdit - Copy the contents of the file and paste them in the "New SSH Key" text field
- Click "Create"
- In the Terminal app, run
ssh root@YOUR_IP_ADDRESS
- Run
apt-get update
I made a documentation generator that cashes in on Clojure's dynamism. See the play-cljs docs (a ClojureScript game library) for an example of its output.
Like many of you, I've often wondered what my final regret will be on my deathbed. My best guess came to me in a dream recently. I was walking across the charred earth of an apocalyptic future world, maneuvering around the remains of the less fortunate. I was startled to find a young girl, barely holding onto her life. She murmured something to me. I asked her to repeat it, and she said more loudly: "I...wish your Clojure projects didn't have such crappy documentation."
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
guitar: o3 b8 > c8 d4 < b > c < a b g a %1 | |
banjo: @1 o3 b8 > c8 d4 < b > c < a b g a %2 | |
guitar: @2 o3 b8 > c8 d4 < b > c < a b g a %3 | |
guitar: @3 d1 g4 g a b g b a1 %4 | |
banjo: @4 g4 g a b g1 %5 |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(defproject lein-paravim "0.1.0-SNAPSHOT" | |
:dependencies [[org.clojure/clojure "1.10.1"]] | |
; since paravim is in the `:dev` profile, | |
; it will launch when you do `lein run`. | |
; if you don't want that behavior, | |
; just change `:dev` to something else. | |
; if you change it to `:paravim`, you can | |
; launch it by doing `lein with-profile paravim run` | |
:profiles {:dev {:dependencies [[paravim "RELEASE"]] | |
:main paravim.start |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
{:deps {net.sekao/odoyle-rules {:mvn/version "RELEASE"}}} |
OlderNewer