This document pertains to the free version of Dwarf Fortress with DFHack. These commands will not work in the Steam version (yet!)
[descriptions based on v4]
fine ultra-detailed realistic
- Can be a bit grainy and "ropey" but increases detail generationultra photorealistic
- Simiar to "fine ultra-detailed realistic"Hasselblad H6D
- Sharper focus on subect; shadows are deepenedhigh definition
- Shadows are lightened; more fanciful and saturated colors8k
- Lighting tends to be more extreme; colors even more saturated and computer-generated looking than "high definition"cinematic
- Shadows tend to be more extreme (though not darker); objects a bit thicker; more poster-like
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
[ | |
{ | |
"amount_left" : 5, | |
"amount_total" : 5, | |
"frequency" : "Daily", | |
"id" : 46, | |
"is_active" : false, | |
"is_validated" : true, | |
"item_conditions" : | |
[ |
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
use MONKEY; | |
role Numericish [::Basis] does Numeric is export { | |
has Basis $.value; | |
method new(Basis $value) { self.bless :$value, |%_ } | |
multi method gist() { "{self.WHAT.perl}({self.value})" } | |
my @overrides = < | |
Bool Complex DUMP FatRat Int Num Rat Real Str abs acos |
I'm not going to wax poetic. I'm a professional Python programmer who has worked with the language for about 10 years and a former Perl 5 developer who also worked with the developers of Perl 6 for a few years.
I have no illusions about Perl 5's ... age, let's say. It was a solid tool for the day, but Python aged well and Perl 5 did not. Perl 6, on the other hand... well, it's a bag of tricks, and not all of those tricks are ones you want played on you. But, I think there are lessons here. Let's get to them.
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
# Perl 6 Example from: https://examples.perl6.org/categories/parsers/SimpleStrings.html | |
# 6pad-ified | |
# Note: Until this issue is fixed: | |
# https://github.com/perl6/6pad/issues/2 | |
# You must reload this 6pad between runs, otherwise the | |
# grammar conflicts with itself as a redefinition. | |
use v6; |
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
use v6; | |
# Empty list sorts to the empty list | |
multi quicksort([]) { () } | |
# Called on a scalar item (not a list of one item) return it as a list | |
multi quicksort($item) { $item, } | |
# Otherwise, extract first item as pivot... | |
multi quicksort([$pivot, *@rest]) { |
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
$ perl6 -e 'role Thrower { submethod BUILD(|c) { die; } }; use Test; for <Any Hash Set Int List Routine Mu> -> $name { my $type = ::($name); my $thing = $type.^mixin(Thrower); dies-ok {$thing.new }, "Expect BUILD on ({$thing.perl})" }' | |
ok 1 - Expect BUILD on (Any+{Thrower}) | |
not ok 2 - Expect BUILD on (Hash+{Thrower}) | |
# Failed test 'Expect BUILD on (Hash+{Thrower})' | |
# at -e line 1 | |
not ok 3 - Expect BUILD on (Set+{Thrower}) | |
# Failed test 'Expect BUILD on (Set+{Thrower})' | |
# at -e line 1 |
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
#!/usr/bin/env perl6 | |
# | |
# Demonstrate a bug in defualt handling. One failure: | |
# | |
# ok 1 - My something isa Something | |
# ok 2 - My something does Pingable | |
# ok 3 - Something starts at zero | |
# ok 4 - Ping the something | |
# ok 5 - Something incremented to 1 | |
# not ok 6 - Starts at zero |
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
class ArgTrie is Hash { | |
# A simple Trie that builds a tree from input words (command-line arguments) | |
# and can generate a list of unique prefixes mapped to the full words. | |
has $.count is rw = 0; | |
method gist() { "\{ count={self.count.gist} {self.pairs.gist} \}" } | |
method insert(Str $word) { | |
my $letter = $word.substr(0,1); |
NewerOlder