mkakh

#!/bin/bash
# AUTHOR
#	2013/10/08  Nobu C. Shirai
#	2018/10/06  Akira Hasegawa

backer(){
	check_options $@
	Ind=1
	for TargetFile in ${ArgFiles[@]}
	do

mkakh

section .data
    text db "number> "
    nl   db 10

section .bss
    inputChar resb 1
    tmp resb 1

section .text
    global _start

mkakh

section .data
    text db "number> "
    nl   db 10

section .bss
    input1 resb 1
    input2 resb 1
    tmp resb 1

section .text

mkakh

#!/usr/bin/env python
import sys
import json
from optparse import OptionParser

# parseArgs :: (IO (), Dict, [String])
def parseArgs():
    parser = OptionParser(
            usage="Usage: %prog input_file.ipynb -o output_file.ipynb")
    parser.add_option(

mkakh

import System.Environment (getArgs)

primes = filterPrime [2..]
    where filterPrime (p:xs) = p : filterPrime [x | x <- xs, x `mod` p /= 0]

main :: IO ()
main = do
    args <- getArgs
    if length args < 1
    then

mkakh

#include <stdio.h>
#include <stdlib.h>

int main(int argc, char *argv[])
{
	int key;
	int i;
	int mode;
	char str[512];
	FILE *fp;

mkakh

#!/usr/bin/perl
$pdf_mode = 3;
$makeindex = 'mendex %O -o %D %S';
$pdf_update_method = 2;
$pdf_previewer = 'mupdf';
$new_viewer_always = 0;
$pdf_update_signal = 'SIGHUP';
$clean_full_ext = "%R.synctex.gz";
$clean_ext = "xmpdata";

mkakh

set nocompatible

"" UTF-8
set encoding=utf-8
set fileencoding=utf-8
set fileencodings=utf-8

"" SYNTAX
syntax enable
filetype indent on

mkakh

{-# LANGUAGE OverloadedStrings #-}
import qualified Data.Text as T
import Data.Attoparsec.Text hiding (take)
import Control.Applicative 
import System.Console.Haskeline
import System.Console.Haskeline.IO
import Control.Concurrent
import Control.Exception

data Expr = Add Expr Expr

mkakh

10 DIM Q(8) : WT=5
20 CLS 3
30 COLOR 7,0,0,7,3
40 GOSUB *FRAME
50 '
60 Q(4)=1 : Q(5)=1 :CL=2
70 FOR Y=0 TO 296 STEP 24
80 IF Y>=16 THEN Q(0)=1:Q(1)=1
90 IF Y>=104 THEN Q(3)=1:Q(6)=1:Q(0)=0:Q(5)=0:X=X-24
100 GOSUB *KABE