Chinese zodiac: Difference between revisions

Content added Content deleted

Inline

@@ Line 4,372: / Line 4,372: @@
 dim @a(12)                             ' the animals
-Push Dup("yang"), Dup("yin")           ' fill Ying/Yang table
+Push "yang", "yin"                     ' fill Ying/Yang table
-For i = 1 to 0 step -1 : @y(i) = Pop() : Next i
+For i = 1 to 0 Step -1 : @y(i) = Pop() : Next i
                                        ' fill Elements table
-Push Dup("Wood"), Dup("Fire"), Dup("Earth"), Dup("Metal"), Dup("Water")
+Push "Wood", "Fire", "Earth", "Metal", "Water"
-For i = 4 to 0 step -1 : @e(i) = Pop() : Next i
+For i = 4 to 0 Step -1 : @e(i) = Pop() : Next i
                                        ' fill Animals table
-Push Dup("Rat"),   Dup("Ox"),    Dup("Tiger"), Dup("Rabbit"), Dup("Dragon")
+Push "Rat",   "Ox",   "Tiger",  "Rabbit",  "Dragon", "Snake"
-Push Dup("Snake"), Dup("Horse"), Dup("Goat"),  Dup("Monkey"), Dup("Rooster")
+Push "Horse", "Goat", "Monkey", "Rooster", "Dog",    "Pig"
-Push Dup("Dog"),   Dup("Pig")
 For i = 11 to 0 step -1 : @a(i) = Pop() : Next i
@@ Line 4,412: / Line 4,411: @@
 OK, 0:1047
 </pre>
 =={{header|UNIX Shell}}==
 {{works with|Bash|4+}}