diff --git "a/\342\231\240 Spades/1 - Prolog.pl" "b/\342\231\240 Spades/1 - Prolog.pl"
index e6e91e9..0b68709 100644
--- "a/\342\231\240 Spades/1 - Prolog.pl"
+++ "b/\342\231\240 Spades/1 - Prolog.pl"
@@ -1,7 +1,7 @@
-name(Ace).
-suit(Spades).
-value(Ace, 1).
-card(X,Y) :- name(X),
- suit(Y).
+rank(ace).
+suit(spades).
+value(ace, 1).
-?- card(Ace, Spades).
+card(Rank, Suit) :-
+ rank(Rank),
+ suit(Suit).
\ No newline at end of file
diff --git "a/\342\231\240 Spades/11 - Go.go" "b/\342\231\240 Spades/11 - Go.go"
index da25e15..8e61b20 100644
--- "a/\342\231\240 Spades/11 - Go.go"
+++ "b/\342\231\240 Spades/11 - Go.go"
@@ -1,7 +1,8 @@
+package main
+
type Card struct {
- rank int
- name string
- suit string
+ Rank int
+ Suit string
}
-c := Card{11, "Jack", "spades"}
+var card := Card{Rank: 11, Suit: "spades"}
\ No newline at end of file
diff --git "a/\342\231\240 Spades/12 - Bash.sh" "b/\342\231\240 Spades/12 - Bash.sh"
old mode 100644
new mode 100755
index ed2e22a..e65d5c1
--- "a/\342\231\240 Spades/12 - Bash.sh"
+++ "b/\342\231\240 Spades/12 - Bash.sh"
@@ -1,5 +1,6 @@
-rm Spades;
-for i in {1..12};
- do echo $i >> Spades;
-done;
-wc -l Spades | sed 's/12/Queen of/'
+rm -f cards.txt
+for i in {1..13}; do
+ printf '%d\n' "$i" >> cards.txt
+done
+
+cat cards.txt | sed 's/^12$/Queen of spades/'
\ No newline at end of file
diff --git "a/\342\231\240 Spades/13 - SQL.sql" "b/\342\231\240 Spades/13 - SQL.sql"
index 1ed8c8b..2ecc050 100644
--- "a/\342\231\240 Spades/13 - SQL.sql"
+++ "b/\342\231\240 Spades/13 - SQL.sql"
@@ -1,4 +1,4 @@
-SELECT card FROM deck
- WHERE rank=13
- AND suit="spades"
- AND name="king";
\ No newline at end of file
+SELECT * FROM cards
+ WHERE rank = 13
+ AND suit = 'spades'
+ LIMIT 1;
\ No newline at end of file
diff --git "a/\342\231\240 Spades/2 - Assembly.txt" "b/\342\231\240 Spades/2 - Assembly.txt"
index 57a2823..7e4cfab 100644
--- "a/\342\231\240 Spades/2 - Assembly.txt"
+++ "b/\342\231\240 Spades/2 - Assembly.txt"
@@ -1,6 +1,8 @@
-.global card
-.data
-rank:
- .long 2
-suit:
- .string "spades"
+ .section .data
+ .globl card_rank, card_suit
+
+card_rank:
+ .long 2
+
+card_suit:
+ .asciz "spades"
\ No newline at end of file
diff --git "a/\342\231\240 Spades/3 - JavaScript.js" "b/\342\231\240 Spades/3 - JavaScript.js"
index 4d3e53c..712f9bd 100644
--- "a/\342\231\240 Spades/3 - JavaScript.js"
+++ "b/\342\231\240 Spades/3 - JavaScript.js"
@@ -1,6 +1,5 @@
-var card = {
+const card = {
rank: 3,
- suit: "spades"
+ suit: "spades",
};
-console.log(
- JSON.stringify(card));
+console.log(card);
diff --git "a/\342\231\240 Spades/5 - FORTRAN.f95" "b/\342\231\240 Spades/5 - FORTRAN.f95"
index dfe23ee..37784f9 100644
--- "a/\342\231\240 Spades/5 - FORTRAN.f95"
+++ "b/\342\231\240 Spades/5 - FORTRAN.f95"
@@ -1,8 +1,7 @@
TYPE :: Card
- integer :: Rank
- character(20) :: Suit
+ INTEGER :: Rank
+ CHARACTER(20) :: Suit
END TYPE Card
-TYPE(Card) :: Five
-Five%Rank = 5
-Five%Suit = 'spades'
+TYPE(Card) :: five
+five = Card(5, 'spades')
\ No newline at end of file
diff --git "a/\342\231\240 Spades/7 - F#.fs" "b/\342\231\240 Spades/7 - F#.fs"
index cddc921..05c8ee9 100644
--- "a/\342\231\240 Spades/7 - F#.fs"
+++ "b/\342\231\240 Spades/7 - F#.fs"
@@ -1,7 +1,9 @@
type card = {
- Rank : byte;
- Suit : string }
+ Rank : int;
+ Suit : string
+}
let card = {
Rank = 7;
- Suit = "spades" }
+ Suit = "spades"
+}
diff --git "a/\342\231\240 Spades/9 - Pascal.pas" "b/\342\231\240 Spades/9 - Pascal.pas"
index 18b5ac2..29a0859 100644
--- "a/\342\231\240 Spades/9 - Pascal.pas"
+++ "b/\342\231\240 Spades/9 - Pascal.pas"
@@ -1,12 +1,12 @@
type
TCard = record
- rank: integer;
- suit: string(10);
+ Rank : Integer;
+ Suit : String[10];
end;
var
- card: TCard;
+ Card : TCard;
begin
- card.rank := 9;
- card.suit := ‘spades’;
-end;
\ No newline at end of file
+ Card.Rank := 9;
+ Card.Suit := 'spades';
+end.
\ No newline at end of file
diff --git "a/\342\231\243 Clubs/1 - Julia.j" "b/\342\231\243 Clubs/1 - Julia.j"
index 0b67a5b..b599bf9 100644
--- "a/\342\231\243 Clubs/1 - Julia.j"
+++ "b/\342\231\243 Clubs/1 - Julia.j"
@@ -1,8 +1,11 @@
type Card
rank::Int
- suit::AbstractString
- name::AbstractString
+ suit::String
+ name::String
end
-card = Card(1, "Ace",
- "clubs")
+card = Card(
+ 1,
+ "Ace",
+ "clubs"
+)
diff --git "a/\342\231\243 Clubs/10 - Swift.swift" "b/\342\231\243 Clubs/10 - Swift.swift"
index d9b0caa..61caf6c 100644
--- "a/\342\231\243 Clubs/10 - Swift.swift"
+++ "b/\342\231\243 Clubs/10 - Swift.swift"
@@ -1,8 +1,11 @@
+enum Suit { case clubs, ... }
+
struct Card {
- var rank: UInt8
+ var rank: Int
var suit: Suit
}
let card = Card(
rank: 10,
- suit: .Clubs)
+ suit: .clubs
+)
diff --git "a/\342\231\243 Clubs/11 - C#.cs" "b/\342\231\243 Clubs/11 - C#.cs"
index 1e38b6d..8d65fff 100644
--- "a/\342\231\243 Clubs/11 - C#.cs"
+++ "b/\342\231\243 Clubs/11 - C#.cs"
@@ -1,6 +1,9 @@
-var card = new {
- rank = 11,
- name = "Jack",
- suit = "clubs"
-};
+record Card(int Rank, String Suit)
+{
+ public override string ToString() =>
+ $"{Rank.ToString()} of {Suit}";
+}
+
+var card = new Card(11, "clubs");
+
Console.WriteLine(card);
\ No newline at end of file
diff --git "a/\342\231\243 Clubs/12 - BASIC.b" "b/\342\231\243 Clubs/12 - BASIC.b"
index 772df21..35329bc 100644
--- "a/\342\231\243 Clubs/12 - BASIC.b"
+++ "b/\342\231\243 Clubs/12 - BASIC.b"
@@ -1,7 +1,5 @@
-LET $RANK = 12
-LET $NAME = "Queen"
-LET $SUIT = "clubs"
+LET Rank% = 12
+LET Name$ = "Queen"
+LET Suit$ = "clubs"
-Debug.Print $RANK,
- $NAME,
- $SUIT
+PRINT Name$; " of "; Suit$
\ No newline at end of file
diff --git "a/\342\231\243 Clubs/13 - XML.xml" "b/\342\231\243 Clubs/13 - XML.xml"
index 8cedfbf..cf38b52 100644
--- "a/\342\231\243 Clubs/13 - XML.xml"
+++ "b/\342\231\243 Clubs/13 - XML.xml"
@@ -1,4 +1,6 @@
-
- King
- clubs
-
+
+
+ 13
+ King
+ clubs
+
\ No newline at end of file
diff --git "a/\342\231\243 Clubs/2 - MIPS.s" "b/\342\231\243 Clubs/2 - MIPS.s"
index 4b8430c..af44b0a 100644
--- "a/\342\231\243 Clubs/2 - MIPS.s"
+++ "b/\342\231\243 Clubs/2 - MIPS.s"
@@ -1,3 +1,5 @@
-.data
- rank: .word 2
- suit: .asciiz "clubs"
\ No newline at end of file
+ .data
+ .globl card_rank, card_suit
+
+card_rank: .word 2
+card_suit: .asciiz "clubs"
\ No newline at end of file
diff --git "a/\342\231\243 Clubs/4 - Groovy.groovy" "b/\342\231\243 Clubs/4 - Groovy.groovy"
index 13e8005..9040d43 100644
--- "a/\342\231\243 Clubs/4 - Groovy.groovy"
+++ "b/\342\231\243 Clubs/4 - Groovy.groovy"
@@ -1,8 +1,8 @@
+@groovy.transform.Canonical
class Card {
- def rank, suit
- def show() {
- "${rank} of ${suit}"}
+ int rank
+ String suit
}
-def card =
- new Card(rank:4,
- suit:"clubs")
+
+def card = new Card(4, 'clubs')
+println card
\ No newline at end of file
diff --git "a/\342\231\243 Clubs/5 - Haxe.hx" "b/\342\231\243 Clubs/5 - Haxe.hx"
index 6778afb..a39947d 100644
--- "a/\342\231\243 Clubs/5 - Haxe.hx"
+++ "b/\342\231\243 Clubs/5 - Haxe.hx"
@@ -1,7 +1,9 @@
-var card:{
- rank: Int,
- suit: String }
-= {
- rank: 5,
- suit: "clubs"
-};
+typedef Card = {
+ var rank:Int;
+ var suit:String;
+}
+
+var card:Card = {
+ rank: 5,
+ suit: "clubs"
+};
\ No newline at end of file
diff --git "a/\342\231\243 Clubs/6 - PHP.php" "b/\342\231\243 Clubs/6 - PHP.php"
index d297fcb..021032b 100644
--- "a/\342\231\243 Clubs/6 - PHP.php"
+++ "b/\342\231\243 Clubs/6 - PHP.php"
@@ -1,8 +1,10 @@
+nul
+
+rem
+set "Rank=1" rem 1 = Ace
+set "Name=Ace"
+set "Suit=hearts"
+
+echo !Name! of !Suit!
+
+pause >nul
\ No newline at end of file
diff --git "a/\342\231\245 Hearts/10 - Powershell.ps1" "b/\342\231\245 Hearts/10 - Powershell.ps1"
index 7ba9472..49578c6 100644
--- "a/\342\231\245 Hearts/10 - Powershell.ps1"
+++ "b/\342\231\245 Hearts/10 - Powershell.ps1"
@@ -1,7 +1,7 @@
-function card(
- [int] $rank,
- [string] $suit) {
- Wscript.Echo rank
- Wscript.Echo suit
-}
-card(10, "hearts")
+function Card{
+param(
+ [int]$r,
+ [string]$s)
+"$r of $s"}
+
+Card 10 'hearts'
\ No newline at end of file
diff --git "a/\342\231\245 Hearts/13 - Regex.txt" "b/\342\231\245 Hearts/13 - Regex.txt"
index 77776ac..4b63e0e 100644
--- "a/\342\231\245 Hearts/13 - Regex.txt"
+++ "b/\342\231\245 Hearts/13 - Regex.txt"
@@ -1 +1 @@
-/^([Kk]ing|13)(?:of)?([hH]earts)$/
\ No newline at end of file
+/^([Kk]ing|13)(?:of )?([hH]earts)$/i
\ No newline at end of file
diff --git "a/\342\231\245 Hearts/2 - Lua.lua" "b/\342\231\245 Hearts/2 - Lua.lua"
index 039c355..1491f45 100644
--- "a/\342\231\245 Hearts/2 - Lua.lua"
+++ "b/\342\231\245 Hearts/2 - Lua.lua"
@@ -1,7 +1,9 @@
-Card = {
+local Card = {
rank = 2,
suit = "hearts",
- print = function (self)
- print rank..suit
+ show = function(self)
+ print(self.rank .. " of " .. self.suit)
end
}
+
+Card:show()
\ No newline at end of file
diff --git "a/\342\231\245 Hearts/3 - Delphi.pas" "b/\342\231\245 Hearts/3 - Delphi.pas"
index eadc277..0773aef 100644
--- "a/\342\231\245 Hearts/3 - Delphi.pas"
+++ "b/\342\231\245 Hearts/3 - Delphi.pas"
@@ -5,4 +5,5 @@ TCard = class(TObject)
constructor Create
(AName: String);
end;
-Card:=TCard.Create('3♥');
+var
+ Card: TCard = (Name: '3 of hearts');
diff --git "a/\342\231\245 Hearts/4 - Haskell.hs" "b/\342\231\245 Hearts/4 - Haskell.hs"
index 1aca984..770a994 100644
--- "a/\342\231\245 Hearts/4 - Haskell.hs"
+++ "b/\342\231\245 Hearts/4 - Haskell.hs"
@@ -1,7 +1,10 @@
-data Card = Card {
- rank :: Int,
- suit :: String }
- deriving (Show)
+newtype Suit = Suit String
+ deriving (Show, Eq)
-card = Card { rank = 4,
- suit = "Hearts" }
+data Card = Card
+ { rank :: Int
+ , suit :: Suit
+ } deriving (Show, Eq)
+
+card :: Card
+card = Card 4 (Suit "Hearts")
\ No newline at end of file
diff --git "a/\342\231\245 Hearts/5 - Lisp.el" "b/\342\231\245 Hearts/5 - Lisp.el"
index 6bfebd8..35731ae 100644
--- "a/\342\231\245 Hearts/5 - Lisp.el"
+++ "b/\342\231\245 Hearts/5 - Lisp.el"
@@ -1,7 +1,11 @@
-(defstruct card {
- :rank :suit })
+(defstruct card
+ rank
+ suit)
-(setq card (make-card
- :rank "5"
- :suit "hearts"))
-(write card)
+(let ((c (make-card
+ :rank 5
+ :suit 'hearts)))
+ (format t
+ "~a of ~a~%"
+ (card-rank c)
+ (card-suit c)))
\ No newline at end of file
diff --git "a/\342\231\245 Hearts/7 - Perl.pl" "b/\342\231\245 Hearts/7 - Perl.pl"
index fddcf74..36d6b8d 100644
--- "a/\342\231\245 Hearts/7 - Perl.pl"
+++ "b/\342\231\245 Hearts/7 - Perl.pl"
@@ -1,7 +1,7 @@
-my $card = {
- rank => 7,
- suit => "hearts"
-}
+my $card = {
+ rank => 7,
+ suit => 'hearts'
+};
-print "$card{$rank} of
- $card{$suit}"
+print "$card->{rank} ",
+ "of $card->{suit}\n";
\ No newline at end of file
diff --git "a/\342\231\245 Hearts/8 - CoffeeScript.coffee" "b/\342\231\245 Hearts/8 - CoffeeScript.coffee"
index e7225d8..b507da3 100644
--- "a/\342\231\245 Hearts/8 - CoffeeScript.coffee"
+++ "b/\342\231\245 Hearts/8 - CoffeeScript.coffee"
@@ -1,6 +1,8 @@
class Card
- constructor:(@rank,
- @suit) ->
-
-card = new Card 8,"hearts"
-console.log(card)
+ constructor: (@rank,
+ @suit) ->
+
+card = new Card 8,
+ 'hearts'
+
+console.log card
\ No newline at end of file
diff --git "a/\342\231\246 Diamonds/1 - HTML.html" "b/\342\231\246 Diamonds/1 - HTML.html"
index 60c3c51..3b96af5 100644
--- "a/\342\231\246 Diamonds/1 - HTML.html"
+++ "b/\342\231\246 Diamonds/1 - HTML.html"
@@ -1,6 +1,6 @@
- Ace of Diamonds
+ Ace of diamonds
diff --git "a/\342\231\246 Diamonds/10 - Elixir.ex" "b/\342\231\246 Diamonds/10 - Elixir.ex"
index ee92f70..62f0631 100644
--- "a/\342\231\246 Diamonds/10 - Elixir.ex"
+++ "b/\342\231\246 Diamonds/10 - Elixir.ex"
@@ -1,7 +1,7 @@
defmodule Card do
def rank, do: 10
- def suit, do:'diamonds'
+ def suit, do: 'diamonds'
IO.puts rank <> 'of'
<> suit
-end
+end
\ No newline at end of file
diff --git "a/\342\231\246 Diamonds/11 - Ruby.rb" "b/\342\231\246 Diamonds/11 - Ruby.rb"
index 794a594..bc6423f 100644
--- "a/\342\231\246 Diamonds/11 - Ruby.rb"
+++ "b/\342\231\246 Diamonds/11 - Ruby.rb"
@@ -1,7 +1,10 @@
-class < Card
- def initialize
- @name = 'Jack'
- @value = 11
- @suit = 'diamonds'
+class Card
+ attr_reader :rank, :suit
+
+ def initialize(rank, suit)
+ @rank = rank
+ @suit = suit
end
end
+
+card = Card.new('Jack', 'diamonds')
\ No newline at end of file
diff --git "a/\342\231\246 Diamonds/12 - Erlang.erl" "b/\342\231\246 Diamonds/12 - Erlang.erl"
index add872d..2adde68 100644
--- "a/\342\231\246 Diamonds/12 - Erlang.erl"
+++ "b/\342\231\246 Diamonds/12 - Erlang.erl"
@@ -1,7 +1,8 @@
Card = #{
rank => 12,
- name => "Queen",
- suit => "diamonds"},
-
-io:fwrite("~15p~n",
- [Card]),
+ suit => diamonds,
+ name => <<"Queen">>
+},
+io:format(
+ "~p~n",
+ [Card]).
\ No newline at end of file
diff --git "a/\342\231\246 Diamonds/13 - Cobol.cbl" "b/\342\231\246 Diamonds/13 - Cobol.cbl"
index 738686b..4dabb47 100644
--- "a/\342\231\246 Diamonds/13 - Cobol.cbl"
+++ "b/\342\231\246 Diamonds/13 - Cobol.cbl"
@@ -1,4 +1,8 @@
-01 x-Diamonds AS CONSTANT 'Diamonds'.
-01 x-card.
-02 x-rank pic 13 value 1.
-02 x-suit pic x(7) value x-Diamonds.
\ No newline at end of file
+78 DN VALUE
+ "Diamonds".
+01 CARD.
+ 05 RANK PIC 99
+ VALUE 12.
+ 05 SUIT PIC
+ X(8)
+ VALUE DN.
\ No newline at end of file
diff --git "a/\342\231\246 Diamonds/3 - Visual Basic.vbs" "b/\342\231\246 Diamonds/3 - Visual Basic.vbs"
index f5ead1b..1743609 100644
--- "a/\342\231\246 Diamonds/3 - Visual Basic.vbs"
+++ "b/\342\231\246 Diamonds/3 - Visual Basic.vbs"
@@ -1,6 +1,9 @@
-Dim card = New With {
- .rank = 3,
- .suit = "diamonds"
-}
+Dim card =
+ New With {
+ .Rank = 3,
+ .Suit = "diamonds"
+ }
-Printer.Print(card)
+Console.WriteLine(
+ $"{card.Rank} of " &
+ card.Suit)
\ No newline at end of file
diff --git "a/\342\231\246 Diamonds/4 - R.r" "b/\342\231\246 Diamonds/4 - R.r"
index fd8dbb6..c7001ff 100644
--- "a/\342\231\246 Diamonds/4 - R.r"
+++ "b/\342\231\246 Diamonds/4 - R.r"
@@ -5,4 +5,4 @@ deck <- data.frame(
Four.of.Diamond <-
deck$card[
deck$suit=="diamonds"
- & deck$rank=="4"]
+ & deck$rank==4]
\ No newline at end of file
diff --git "a/\342\231\246 Diamonds/5 - Dart.dart" "b/\342\231\246 Diamonds/5 - Dart.dart"
index 7598a8c..78cff79 100644
--- "a/\342\231\246 Diamonds/5 - Dart.dart"
+++ "b/\342\231\246 Diamonds/5 - Dart.dart"
@@ -1,6 +1,11 @@
-var card = {
- 'rank': 5,
- 'suit': 'diamonds'
-};
+class Card{
+ int rank;
+ String suit;
+ Card(this.rank,
+ this.suit);
+ String toString()=>
+ '$rank of $suit';
+}
-print(card);
+final card=
+ Card(5,'diamonds');
\ No newline at end of file
diff --git "a/\342\231\246 Diamonds/6 - CSS.css" "b/\342\231\246 Diamonds/6 - CSS.css"
index 3e4759f..d06acd7 100644
--- "a/\342\231\246 Diamonds/6 - CSS.css"
+++ "b/\342\231\246 Diamonds/6 - CSS.css"
@@ -1,6 +1,8 @@
-.diamonds {
- color: rgb(255, 0, 0);
+.diamonds::before {
+ content: "6♦";
+ background: rgb(255, 0, 0);
font-family: Roboto;
- background: #fff;
+ color: #fff;
border-radius: 30px;
+ padding: 10px;
}
diff --git "a/\342\231\246 Diamonds/7 - D.d" "b/\342\231\246 Diamonds/7 - D.d"
index 3d3bc0e..4aba417 100644
--- "a/\342\231\246 Diamonds/7 - D.d"
+++ "b/\342\231\246 Diamonds/7 - D.d"
@@ -1,6 +1,8 @@
+import std.stdio;
+
struct Card {
int rank;
string suit;
}
auto card =
- Card(7, "diamonds");
+ Card(7, "diamonds");
\ No newline at end of file
diff --git "a/\342\231\246 Diamonds/8 - Java.java" "b/\342\231\246 Diamonds/8 - Java.java"
index 6c7d987..b18a259 100644
--- "a/\342\231\246 Diamonds/8 - Java.java"
+++ "b/\342\231\246 Diamonds/8 - Java.java"
@@ -1,7 +1,10 @@
import deck.Suit;
-public class Card {
- int rank = 8;
- Suit suit =
- Suit.DIAMONDS;
-}
+public record Card(
+ int rank,
+ Suit suit
+) {}
+
+Card card =
+ new Card(9,
+ Suit.CLUBS);
\ No newline at end of file