RSAみたいな

require 'rational'

def n_fact(p, q)
$n = p * q
print "N = ", $n, "\n"

$l = (p-1).lcm(q-1)
print "L = ", $l, "\n"

$e = 1
continue_e = true
while continue_e do
 $e += 1
 if $e.gcd($l) == 1 then
  print "E = ", $e, "\n"
  continue_e = false
 end
end

$d = 1
continue_d = true
while continue_d do
 $d += 1
 if $e * $d % $l == 1 then
  print "D = ", $d, "\n"
  continue_d = false
 end
end
end

#Encrypt(plain text(ascii))
def e(p)
p p**$e % $n
end

#Decode(code(num))
def d(c)
p c**$d % $n
end

こんな感じなんかなぁ。

n_fact()に素数のペア渡してあげたら暗号化と復号に要る数を出してくれるみたいです

なんか間違っとるとこあったら教えてください...

もちろん実用性は皆無です

ASCIIコード表作った

ちょっと欲しくなって探してみたけどあんま良いのがなかったんで作った

ダウンロードはここから

Emacs広島勉強会

良の塊みたいな人たちが丁寧に教えてくれました
あんな感じでスパンスパン使いこなせるようになるのは何時やら。。

OZ風ついったービューワ

ハッシュの値に配列入れようとしたんですが型違いでできません

めちゃくちゃなソース
http://www1.axfc.net/uploader/Sc/so/166373

リプライだったら吹き出しのとんがりの向きを変えたいんだけどなぁ

C言語のポインタ

Brainfu*kという言語を教えてもらったんだけど、C言語のポインタの概念的なのを掴むのにうってつけだと思う。と、素人がほざいている。
なんで用いられないのかなぁと。やっぱり名前かなぁ。と、素人がほざいている。
Beginner's Pointer Instruction CodeみたいにBASIC的なノリでやれば必ずウケる。と、しろうry

ONLINE BrainF*ck interpreter for JavaScript
http://cfs.maxn.jp/neta/onlineBrainFuck.html

+++++++++++[>+++[>++<-]<-]>>.<<+++[>+++<-]>[<++>-]<[>>>++++++>++++++>++++++>++++++<<<<<<-]>>>.>---.<<<<+++[>>>>>----<<<<<-]>>>>>+.>++.

今思った一回出力したら残しとく必要無いじゃんorz
[0]と[1]は作業用的な...orz