zettacode 0.1.0

data/zettacode.files/arithmetic.integer/tuscript.txt

@@ -0,0 +1,9 @@
+
+$$ MODE TUSCRIPT
+=5
+b=3
+c=+b
+c=-b
+c=*b
+c=b
+c=%b

data/zettacode.files/arithmetic.integer/unix_shell.txt

@@ -0,0 +1,29 @@
+
+T U    c u c ,   , uc  ''''  u  f c ccu  qu:
+
+{{ |Bu S}}
+{{ |Aqu SH}}
+#!b
+   b
+c "+b     = "  ` $  +  $b`
+c "-b     = "  ` $  -  $b`
+c "*b     = "  ` $ \*  $b`
+c "b     = "  ` $    $b` # uc  0
+c "  b = "  ` $  %  $b` #    f 
+
+N: U  ` (bcc ,  b   Bu    ''$(...)'' )  u    u   b    ffc  b . T c u     '''' c  u  qu    qu u  qu  c  ''*'' cc  ,    b "bb" --- f  f  ''*''   c cc.
+
+W SUS3  :
+
+{{ |Bu A SH|3.2}}
+{{ ||5.2.14}}
+{{ |Z SH}}
+#!b
+   b
+c "+b     = $((+b))"
+c "-b     = $((-b))"
+c "*b     = $((*b))"
+c "b     = $((b))" # uc  0
+c "  b = $((%b))" #    f 
+
+N: c   ''$((...))''     qu  ''$((...))'' c b   u  ub qu, bu  `...`  f  u  c  b   u  ub qu.

data/zettacode.files/arithmetic.integer/ursa.txt

@@ -0,0 +1,27 @@
+#
+#  c
+#
+
+c   
+u "ub 1: " c
+  (  c)
+u "ub 2: " c
+  (  c)
+
+u "\u:\" ( (+  ))  c
+u "ff:\" ( (-  ))  c
+u ":\" ( (*  ))  c
+# qu ' u  , bu   fuc u u
+u "qu:\" ( (  ))  c
+#     f 
+u ":\" ( (  ))  c
+
+S :
+ub 1: 15
+ub 2: 7
+
+u:	22
+ff:	8
+:	105
+qu:	2
+:	1

data/zettacode.files/arithmetic.integer/v_(vlang).txt

@@ -0,0 +1,29 @@
+ Amc-  V (V)
+ Tcc:  u c-.
+u 
+ 
+ 
+
+  
+ub f () {
+    u  := 0
+    u b := 0
+
+      ub f c
+    ("E   ub,  b  c: ")
+     := .__()
+    u := .(' ')
+     = u[0].()
+    b = u[1].()
+
+     4 bc, ,   
+    ("u:            $, b $b")
+    ("u:               + b = ${ + b}")
+    ("ffc:        - b = ${ - b}")
+    ("uc:           * b = ${ * b}")
+    (" qu:   b = ${  b}, uc")
+    (":         % b = ${ % b},  f ")
+
+    ("  ")
+    ("  .:    (,b) = ${.(,b)}")
+}

data/zettacode.files/arithmetic.integer/vba.txt

@@ -0,0 +1,19 @@
+
+'Ac - I
+Sub RAcI()
+D  A V,  A I, b A I
+O E Ru N
+
+ = CI(IuB("E f ", "XLSM | Ac"))
+b = CI(IuB("E c ", "XLSM | Ac"))
+
+Dbu.P " =" , "b=" b, bC
+F Ec  I S("+ - *  \  ^", " ")
+    Sc C 
+        C "":     Dbu.P "  b",  "" b,  M b
+        C "\":       Dbu.P " \ b",  "\" b,  \ b
+        C E:      Dbu.P " "  " b",   b, Eu(    b)
+    E Sc
+N 
+E Sub
+

data/zettacode.files/arithmetic.integer/vbscript.txt

@@ -0,0 +1,51 @@
+VBSc' b   V. W  u     b c    f   .
+
+===I===
+oo c
+ , b
+c.u. "A? "
+ = c..
+c.u. "B? "
+b = c..
+
+ = (  )
+b = ( b )
+
+c.c " + b=",  + b
+c.c " - b=",  - b
+c.c " * b=",  * b
+c.c "  b=",   b
+c.c " \ b=",  \ b
+c.c "  b=",   b
+c.c " ^ b=",  ^ b
+
+===A I===
+G   uu f   u. I b P .
+oo c
+ , b
+c.u. "A? "
+ = c..
+c.u. "B? "
+b = c..
+
+ = (  )
+b = ( b )
+
+ 
+f c   ("+ - *  \  ^", " ")
+	c.c "",,"b=",( " "    " b")
+
+
+===Ic===
+
+C:\fc.b
+A? 45
+B? 11
+ + b= 4511
+ - b= 34
+ * b= 495
+  b= 4.09090909090909
+ \ b= 4
+  b= 1
+ ^ b= 1.5322783012207E+18
+

data/zettacode.files/arithmetic.integer/vedit_macro_language.txt

@@ -0,0 +1,8 @@
+#1 = G_Num("Gv umb : ")
+#2 = G_Nu("G ub b: ")
+M(" + b = ") Nu_T(#1 + #2)
+M(" - b = ") Nu_T(#1 - #2)
+M(" * b = ") Nu_T(#1 * #2)
+M("  b = ") Nu_T(#1  #2)
+M(" % b = ") Nu_T(#1 % #2)
+

data/zettacode.files/arithmetic.integer/verilog.txt

@@ -0,0 +1,26 @@
+modu m
+   , b
+   u, , uc
+   , , 
+  
+   b
+     = -12
+    b = 7
+    
+    u =  + b
+     =  - b
+    uc =  * b
+     =   b
+     =  % b
+     =  ** b
+    
+    $("S    = -12  b = 7")
+    $("       u   + b = ", u)
+    $("         - b = ", )
+    $("   uc   * b = ", uc)
+    $("   ó    b = ", )
+    $("        b = ", )
+    $("ccó  ^ b = ", )
+    $f 
+  
+u

data/zettacode.files/arithmetic.integer/vim_script.txt

@@ -0,0 +1,10 @@
+  = fo2(u("Numb 1: ") + 0)
+ b = f2(u("Nub 2: ") + 0)
+c "\Su: " . ( + b)
+c "Dffc: " . ( - b)
+c "Puc: " . ( * b)
+" T u f     uc
+c "Qu: " . (  b)
+" T  f  u f    c   f 
+"  f  
+c "R: " . ( % b)

data/zettacode.files/arithmetic.integer/visual_basic_.net.txt

@@ -0,0 +1,14 @@
+Imo Sm.Coo
+Mu Mu1
+  Sub M
+    D  = CI(RL)
+    D b = CI(RL)
+    WL("Su "   + b)
+    WL("Dffc "   - b)
+    WL("Puc "   - b)
+    WL("Qu "    b)
+    WL("I Qu "   \ b)
+    WL("R "   M b)
+    WL("E "   ^ b)
+  E Sub
+E Mu

data/zettacode.files/arithmetic.integer/wart.txt

@@ -0,0 +1,9 @@
+ - (d)
+b - ()
+ "u: " +b
+ "ffc: " -b
+ "uc: " *b
+ "qu: " b
+ " qu: " ( b)
+ ": " %b
+ ": " ^b

data/zettacode.files/arithmetic.integer/wren.txt

@@ -0,0 +1,16 @@
+I W  qu  ''   u bu,   ''f''      u,  u    .
+
+T  f    '%' c   f  f .
+mo "o" fo Sd, Sdou
+S.("f ub:     ")
+Su.fu()
+  = Nu.fS(S.L())
+S.("c ub:    ")
+Su.fu()
+ b = Nu.fS(S.L())
+S.("u:              %( + b)")
+S.("ffc:       %( - b)")
+S.("uc:          %( * b)")
+S.(" qu: %((  b).f)")
+S.(":        %( % b)")
+S.(":   %(.(b))")

data/zettacode.files/arithmetic.integer/x86_assembly.txt

@@ -0,0 +1,23 @@
+Iu  uu u b OS-cfc    . T u    16-b 8086,      32-b  64-b ucc:  cu b  f  f 32-b  64-b c  c    u. T qu  uc  z      f  f .
+m: mov      c,          
+              b,          b
+              ,          
+        
+              ,          c
+              ,          b
+              u,         
+        
+              ,          c
+        u     b
+              uc,     
+        
+              ,          c
+        ub      ,          b
+              ffc,  
+        
+              ,          c
+             b
+              qu,    
+              ,   
+
+        

data/zettacode.files/arithmetic.integer/xlisp.txt

@@ -0,0 +1,17 @@
+(DEFUN INTEGER-ARITHMETIC ()
+    (DISPLAY "E    b  c.")
+    (NEWLINE)
+    (DISPLAY " ")
+    (DEFINE A (READ))
+    (DEFINE B (READ))
+    (DISPLAY `(SUM ,(+ A B)))
+    (NEWLINE)
+    (DISPLAY `(DIFFERENCE ,(- A B)))
+    (NEWLINE)
+    (DISPLAY `(PRODUCT ,(* A B)))
+    (NEWLINE)
+    (DISPLAY `(QUOTIENT ,(QUOTIENT A B)))  uc  z
+    (NEWLINE)
+    (DISPLAY `(REMAINDER ,(REM A B)))    f f 
+    (NEWLINE)
+    (DISPLAY `(EXPONENTIATION ,(EXPT A B))))

data/zettacode.files/arithmetic.integer/xpl0.txt

@@ -0,0 +1,10 @@
+cud c:\c\cod
+ A, B
+[A:= II(0)
+ B:= II(0)
+IOu(0, A+B) CLf(0)
+IOu(0, A-B) CLf(0)
+IOu(0, A*B) CLf(0)
+IOu(0, AB) CLf(0)        \uc  z
+IOu(0, (0)) CLf(0)     \'  c f  (A)
+]

data/zettacode.files/arithmetic.integer/xslt.txt

@@ -0,0 +1,10 @@
+:m m="mc"
+  : =""5:
+  : ="b"2:
+  f:bc + b = :u-f c="$ + $b"f:bc
+  f:bc - b = :u-f c="$ - $b"f:bc
+  f:bc * b = :u-f c="$ * $b"f:bc
+  f:bc  b = :u-f c="u($  $b)"f:bc
+  f:bc  b = :u-f c="$  $b"f:bc
+ :
+

data/zettacode.files/arithmetic.integer/yabasic.txt

@@ -0,0 +1,11 @@
+u " u umo? " 
+u "  u? " b
+
+ "u      ", , " + ", b, " = ", ( + b)
+ "     ", , " - ", b, " = ", ( - b)
+ "uc  ", , " * ", b, " = ", ( * b)
+ "  ", , " \ ", b, " = ", (  b)
+ "u    ", , " % ", b, " = ", (, b)
+ "c  ", , " ^ ", b, " = ", ( ^ b)
+
+

data/zettacode.files/arithmetic.integer/yorick.txt

@@ -0,0 +1,8 @@
+ =  = 0
+, , 
+, " +  =",  + 
+, " -  =",  - 
+, " *  =",  * 
+, "   =",     u  z
+, " %  =",  %    c  f f   '  ff
+, " ^  =",  ^   

data/zettacode.files/arithmetic.integer/zkl.txt

@@ -0,0 +1,7 @@
+,:=k("Two : ").(" ").("oI")
+("+ = ", + )
+("- = ", - )
+("* = ", * )
+(" = ",  )  u  z
+("% = ", % )   c  f f   '  ff
+(".() = ",.())  (,)   b

data/zettacode.files/arithmetic.integer/zonnon.txt

@@ -0,0 +1,13 @@
+
+u M
+
+	,j: 
+b
+	("A ?:")()
+	("?: ")(j)
+	("u: ", + j)
+	("ffc: ",  - j)
+	("uc: ",  * j)
+	("qu: ",   j)
+	(": ",   j)
+ M.

data/zettacode.files/arithmetic.integer/zx_spectrum_basic.txt

@@ -0,0 +1,11 @@
+5 LET =5: LET b=3
+10 PRINT " + "b" = "+b
+20 PRINT " - "b" = "-b
+30 PRINT " * "b" = "*b
+40 PRINT "  "b" = "INT (b)
+50 PRINT "  "b" = "-INT (b)*b
+60 PRINT "    f "b" = "^b
+
+      1ju20012b49596cj51
+    
+  

data/zettacode.files/arithmetic.integer//320/274/320/272-61-52.txt

@@ -0,0 +1,7 @@
+П1	-	П0
++	СП
+ИП0	ИП1	-	СП
+ИП0	ИП1	*	СП
+ИП0	ИП1		[]	СП
+ИП0	^	ИП1		[]	ИП1	*	-	СП
+ИП1	ИП0	^	СП

data/zettacode.files/hello_world.text/0815.txt

@@ -0,0 +1,7 @@
+
+:48::65:=:6C:$=$=$$~:03:+
+$~:ffffffffffffffb1:+$:77:~$
+~:fffffffffffff8:+$~:03:+$~
+:06:-$:0:-$=:43:-$
+
+

data/zettacode.files/hello_world.text/11l.txt

@@ -0,0 +1 @@
+(‘Ho wod!’)

data/zettacode.files/hello_world.text/360_assembly.txt

@@ -0,0 +1,17 @@
+U  SVC (Su C)     c:
+ ="360 b"
+HELLO    CSECT 
+         USING HELLO,15
+         LA    1,MSGAREA     P R 1   
+         SVC   35            I SVC 35 (W  O) 
+         BR    14            Ru
+MSGAREA  EQU   *             M A
+         DC    AL2(19)       T   = 19 (Pf :4 + D L:15) 
+         DC    XL2'00'       2 b b f z
+         DC    C'H !'  T  b    c
+         END
+U WTO Mc   SVC 35   :
+ ="360 b"         WTO   'H !'
+         BR    14            Ru
+         END
+

data/zettacode.files/hello_world.text/4dos_batch.txt

@@ -0,0 +1 @@
+co Ho wod!

data/zettacode.files/hello_world.text/6502_assembly.txt

@@ -0,0 +1,22 @@
+ oodbwod. fo C= 8-b mc, c65 mb fom.
+ S     f 256 cc  .
+
+_c	= $0		 C u.
+bu	= $ff2		 C64 KERNEL ROM, uu  cc  cu c.
+			 u $f f A 2, $ff3 (c)  $ff () f BBC.
+	.c
+
+	 #0		 S  0  X .
+:
+	 ,	 G cc f .
+	bq 	 If    0 ' .
+	j bu	 Ouu cc. 
+			 Ic    cc.
+	b 	 R f  ' f  0.
+:
+			 Ru f ubu.
+
+	.
+
+:
+	.b	"H !", _c, 0

data/zettacode.files/hello_world.text/6800_assembly.txt

@@ -0,0 +1,31 @@
+        .c  6800
+        .f  b6800.bj,AP1
+        .f  b6800
+=====================================================
+        H ! f  M 6800        
+                 b b 2013-03-17                
+-----------------------------------------------------
+ P   "H !"   c    
+    (c) cc   1970    
+   SWTPC 6800 , c    c f 
+    b.                                    
+ M  :                                     
+   c.c f  Mc H' cu! 
+   bjc.c f   c b!         
+   cu.c f   cb u!         
+                               
+     c c  b uu             
+-----------------------------------------------------
+u   =   $11      ROM: c uc u
+        .  $0f00
+-----------------------------------------------------
+      #    P   
+        b  u           
+u    j  u     E   c
+                     Ac   
+u     ,         L   cc
+        b  u       P  f -u
+                        u   
+=====================================================
+  .  "H !",#13,#10,#0
+        .

data/zettacode.files/hello_world.text/8080_assembly.txt

@@ -0,0 +1,12 @@
+
+	 T  Ho Wod, w  8080 mb o u ud CPM
+	 A u c ,      8086,  CPM  
+	   DOS      c.
+		100	 CPM .COM    100 -  DOS
+		c,9	 C   c, 9 =   -  DOS
+		,	 DE      
+	j	5	 CPM c  cc u  ju  05
+	 N u' CALL , bu c u'    b RETu,
+	 JMP   b (f u'   64 f  c u  
+	  b). 
+:	b	'H !$'

data/zettacode.files/hello_world.text/8086_assembly.txt

@@ -0,0 +1,30 @@
+
+DOSSEG
+.MODEL TINY
+.DATA
+TXT DB "H !$"
+.CODE
+START:
+	MOV , @DATA
+	MOV , 
+	
+	MOV , 09		  uu fuc
+	MOV , OFFSET TXT	  ff
+	INT 21			 uu  TXT
+	
+	MOV AX, 4C00 		  bc  DOS
+	INT 21
+END START
+
+W A86  NASM :
+   100
+
+   , 
+   , 9
+   21
+
+   , 4c00
+   21
+
+:
+  b "H !$"

data/zettacode.files/hello_world.text/8th.txt

@@ -0,0 +1 @@
+"Ho wod!\" . b

data/zettacode.files/hello_world.text/aarch64_assembly.txt

@@ -0,0 +1,22 @@
+.qu STDOUT, 1
+.qu SVC_WRITE, 64
+.qu SVC_EXIT, 93
+
+.
+.b _
+
+_:
+	 29, 30, [, -16]!
+	 0, #STDOUT
+	 1, =
+	 2, 13
+	 8, #SVC_WRITE
+	 29, 
+	c #0  (u, , 13)
+	 29, 30, [], 16
+	 0, #0
+	 8, #SVC_EXIT
+	c #0  (0)
+
+:	.c "H W!\"
+. 4

data/zettacode.files/hello_world.text/abap.txt

@@ -0,0 +1,2 @@
+REPORT zoodbwod.
+  WRITE 'H !'.

data/zettacode.files/hello_world.text/acl2.txt

@@ -0,0 +1,2 @@
+(cw "Ho wod!~%")
+

data/zettacode.files/hello_world.text/action!.txt

@@ -0,0 +1,3 @@
+ ="c!"Pc M()
+ P("H !")
+Ru

data/zettacode.files/hello_world.text/actionscript.txt

@@ -0,0 +1 @@
+c("Ho wod!")

data/zettacode.files/hello_world.text/ada.txt

@@ -0,0 +1,6 @@
+{{ |GCC|4.1.2}}
+w Ad.T_IO u Ad.T_IO
+cu M 
+b
+  Pu_L ("H !")
+ M

data/zettacode.files/hello_world.text/agda.txt

@@ -0,0 +1,14 @@
+F A 2.6.2, b   [:.c.2.6.2--. cu].
+modu owod w
+
+  A.Bu.IO u (IO)
+  A.Bu.U  (⊤  U)
+  A.Bu.S u (S)
+
+u uSL : S - IO U
+{-# FOREIGN GHC  quf D.T  T #-}
+{-# COMPILE GHC uSL = uSL . T.uc #-}
+
+ : IO U
+ = uSL "H !"
+

data/zettacode.files/hello_world.text/agena.txt

@@ -0,0 +1 @@
+( "Ho wod!" )

data/zettacode.files/hello_world.text/aime.txt

@@ -0,0 +1,11 @@
+o_("Ho wod!\")
+
+:
+
+
+()
+{
+    _("H !\")
+
+    u 0
+}

data/zettacode.files/hello_world.text/algae.txt

@@ -0,0 +1 @@
+f("Ho wod!\")

data/zettacode.files/hello_world.text/algol-m.txt

@@ -0,0 +1,3 @@
+BEGIN
+    WRITE( "H !" )
+END

data/zettacode.files/hello_world.text/algol_60.txt

@@ -0,0 +1,4 @@
+'BEGIN'
+    OUTSTRING(1,'('H !')')
+    SYSACT(1,14,1)
+'END'

data/zettacode.files/hello_world.text/algol_68.txt

@@ -0,0 +1,3 @@
+m: (
+  f($"H !"$)
+)

data/zettacode.files/hello_world.text/algol_w.txt

@@ -0,0 +1,3 @@
+b
+    ( "H !" )
+.

data/zettacode.files/hello_world.text/alore.txt

@@ -0,0 +1 @@
+P('Ho wod!')

data/zettacode.files/hello_world.text/amazing_hopper.txt

@@ -0,0 +1,21 @@
+
+1)
+ ="z "
+:
+   {"H !\"}
+(0)
+
+cu :   .c
+2)
+ ="z "
+#cu .
+:
+   ("H !\")
+
+cu :   .c -
+3)
+ ="z "
+:
+  {"H !\"}u
+
+cu :   .c -

data/zettacode.files/hello_world.text/ambienttalk.txt

@@ -0,0 +1 @@
+m.("Ho wod!")

data/zettacode.files/hello_world.text/amigae.txt

@@ -0,0 +1,3 @@
+PROC m()
+  WF('H !\')
+ENDPROC

data/zettacode.files/hello_world.text/angelscript.txt

@@ -0,0 +1 @@
+vod m() { ("Ho wod\") }