カラフル☆万年カレンダー

もう三ヶ月ぐらい前にとある課題で作ったもの

期限迫って出力の方法がひどい。実装時間3~4時間。
初め普通に縦に表示させて書いて、そこから年間表示にするのに手間取った。
シェルのcalコマンドのソースはどこにありますかね。

Ruby環境前提で、下のソースを.rbで保存して、
$ruby hoge.rb
してね。からふるからふる。

-------------------cal.rb-----------------

# -*- coding: utf-8 -*-
##leap method##############
def leap(y)
if !( y % 100 == 0 )&&( y % 4 == 0)
l=1
else
l=0
end
return l
end
#################
####Cal Class####
#################
class Cal
def initialize(mput,yput,lput)
m = mput
@m = mput
@y = yput
@l = lput
@c = 1
end
def zeller
d = 1
m = @m
y = @y
#adjust jan,feb
if m<=2
m += 12
y -= 1
end
##zeller function
h = ((d+(26*(m+1))/10)+y%100+((y%100)/4)+(5*(y/100))+((y/100)/4))%7
if h==0
h=7
end
return h
end
##daymax method###########
def daymax
m = @m
l = @l
 date = Array.new(10)
 case m
   when 2
   if l==1
     for i in (1..29)
       date[i]= i
     end
   end

   if l==0
     for i in (1..28)
       date[i]= i
     end
   end
   when 4,6,9,11
     for i in (1..30)
       date[i]= i
     end


   when 1,3,5,7,8,10,12
     for i in (1..31)
       date[i]= i
     end
   end
return date
end
## put line methods  ########
def putl1
 ##color=>White
printf "\e[37m============================" ##l1 28行
end
def putl2
if @m >=10
printf"month:#{@m}                    " else
printf"month:#{@m}                     " ##l2 21spaces
end
end
def putl3
printf"\e[31m Sun\e[37m Mon Tue Wed Thu Fri\e[34m Sat\e[37m"
end
def putl4
printf"----------------------------" ##l4
end
def putl5
makel5(daymax, zeller)
end
def putl6
makel6(daymax, zeller)
end
def putl7
makel7(daymax, zeller)
end
def putl8
makel8(daymax, zeller)
end
def putl9
makel9(daymax, zeller)
end
def putl10
makel10(daymax, zeller)
end

##Make Line Methods l5~l9 ####
def makel5(date, h)
 l5 = Array.new(7)
 k = 1
 while k<h do
   l5[k] = "    "
   k += 1
 end
 while k <= 7 do
   l5[k] = date[@c]
   k+=1
   @c += 1
 end
 for q in 1..7
  if q ==1
  printf("\e[31m%4s\e[37m",l5[q])
  elsif q==7
  printf("\e[34m%4s\e[37m",l5[q])
  else
    printf("\e[37m%4s",l5[q])
    end
   end
end
def makel6(date, h)
 l6 = Array.new(7)
 k=1
 while k <= 7
   l6[k] = date[@c]
   k+=1
   @c += 1
 end
  for q in 1..7
  if q ==1
  printf("\e[31m%4s\e[37m",l6[q])
  elsif q==7
  printf("\e[34m%4s\e[37m",l6[q])
  else
    printf("\e[37m%4s",l6[q])
    end
   end end
def makel7(date, h)
 l7 = Array.new(7)
 k=1
 while k <= 7
   l7[k] = date[@c]
   k+=1
   @c += 1
 end
  for q in 1..7
  if q ==1
  printf("\e[31m%4s\e[37m",l7[q])
  elsif q==7
  printf("\e[34m%4s\e[37m",l7[q])
  else
    printf("\e[37m%4s",l7[q])
    end
   end end

def makel8(date, h)
 l8 = Array.new(7)
 k=1
 while k <= 7
   l8[k] = date[@c]
   k+=1
   @c += 1
 end
  for q in 1..7
  if q ==1
  printf("\e[31m%4s\e[37m",l8[q])
  elsif q==7
  printf("\e[34m%4s\e[37m",l8[q])
  else
    printf("\e[37m%4s",l8[q])
    end
   end end

def makel9(date, h)
 l9 = Array.new(7)
 k=1
 while k <= 7
   l9[k] = date[@c]
   k+=1
   @c += 1
 end
  for q in 1..7
  if q ==1
  printf("\e[31m%4s\e[37m",l9[q])
  elsif q==7
  printf("\e[34m%4s\e[37m",l9[q])
  else
    printf("\e[37m%4s",l9[q])
    end
   end end
def makel10(date, h)
 l10 = Array.new(7)
 k=1
 while k <= 7
   l10[k] = date[@c]
   k+=1
   @c += 1
 end
  for q in 1..7
  if q ==1
  printf("\e[31m%4s\e[37m",l10[q])
  elsif q==7
  printf("\e[34m%4s\e[37m",l10[q])
  else
    printf("\e[37m%4s",l10[q])
    end
   end end
end


##main##
puts "input the year"
y = gets.to_i
l = leap(y)
jan = Cal.new(1,y,l)
feb = Cal.new(2,y,l)
mar = Cal.new(3,y,l)
apr = Cal.new(4,y,l)
may = Cal.new(5,y,l)
jun = Cal.new(6,y,l)
jul = Cal.new(7,y,l)
aug = Cal.new(8,y,l)
sep = Cal.new(9,y,l)
oct = Cal.new(10,y,l)
nov = Cal.new(11,y,l)
dec = Cal.new(12,y,l)


jan.putl1; printf"=";
feb.putl1; printf"=";
mar.putl1; printf"=";
puts
jan.putl2; printf"|";
feb.putl2; printf"|";
mar.putl2; printf"|";
puts
jan.putl3; printf"|";
feb.putl3; printf"|";
mar.putl3; printf"|";
puts
jan.putl4; printf"|";
feb.putl4; printf"|";
mar.putl4; printf"|";
puts
jan.putl5; printf"|";
feb.putl5; printf"|";
mar.putl5; printf"|";
puts
jan.putl6; printf"|";
feb.putl6; printf"|";
mar.putl6; printf"|";
puts
jan.putl7; printf"|";
feb.putl7; printf"|";
mar.putl7; printf"|";
puts
jan.putl8; printf"|";
feb.putl8; printf"|";
mar.putl8; printf"|";
puts
jan.putl9; printf"|";
feb.putl9; printf"|";
mar.putl9; printf"|";
puts
jan.putl10; printf"|";
feb.putl10; printf"|";
mar.putl10; printf"|";
puts


apr.putl1; printf"|";
may.putl1; printf"|";
jun.putl1; printf"|";
puts
apr.putl2; printf"|";
may.putl2; printf"|";
jun.putl2; printf"|";
puts
apr.putl3; printf"|";
may.putl3; printf"|";
jun.putl3; printf"|";
puts
apr.putl4; printf"|";
may.putl4; printf"|";
jun.putl4; printf"|";
puts
apr.putl5; printf"|";
may.putl5; printf"|";
jun.putl5; printf"|";
puts
apr.putl6; printf"|";
may.putl6; printf"|";
jun.putl6; printf"|";
puts
apr.putl7; printf"|";
may.putl7; printf"|";
jun.putl7; printf"|";
puts
apr.putl8; printf"|";
may.putl8; printf"|";
jun.putl8; printf"|";
puts
apr.putl9; printf"|";
may.putl9; printf"|";
jun.putl9; printf"|";
puts
apr.putl10; printf"|";
may.putl10; printf"|";
jun.putl10; printf"|";
puts


jul.putl1; printf"|";
aug.putl1; printf"|";
sep.putl1; printf"|";
puts
jul.putl2; printf"|";
aug.putl2; printf"|";
sep.putl2; printf"|";
puts
jul.putl3; printf"|";
aug.putl3; printf"|";
sep.putl3; printf"|";
puts
jul.putl4; printf"|";
aug.putl4; printf"|";
sep.putl4; printf"|";
puts
jul.putl5; printf"|";
aug.putl5; printf"|";
sep.putl5; printf"|";
puts
jul.putl6; printf"|";
aug.putl6; printf"|";
sep.putl6; printf"|";
puts
jul.putl7; printf"|";
aug.putl7; printf"|";
sep.putl7; printf"|";
puts
jul.putl8; printf"|";
aug.putl8; printf"|";
sep.putl8; printf"|";
puts
jul.putl9; printf"|";
aug.putl9; printf"|";
sep.putl9; printf"|";
puts
jul.putl10; printf"|";
aug.putl10; printf"|";
sep.putl10; printf"|";
puts




oct.putl1; printf"|";
nov.putl1; printf"|";
dec.putl1; printf"|";
puts
oct.putl2; printf"|";
nov.putl2; printf"|";
dec.putl2; printf"|";
puts
oct.putl3; printf"|";
nov.putl3; printf"|";
dec.putl3; printf"|";
puts
oct.putl4; printf"|";
nov.putl4; printf"|";
dec.putl4; printf"|";
puts
oct.putl5; printf"|";
nov.putl5; printf"|";
dec.putl5; printf"|";
puts
oct.putl6; printf"|";
nov.putl6; printf"|";
dec.putl6; printf"|";
puts
oct.putl7; printf"|";
nov.putl7; printf"|";
dec.putl7; printf"|";
puts
oct.putl8; printf"|";
nov.putl8; printf"|";
dec.putl8; printf"|";
puts
oct.putl9; printf"|";
nov.putl9; printf"|";
dec.putl9; printf"|";
puts
oct.putl10; printf"|";
nov.putl10; printf"|";
dec.putl10; printf"|";
puts
3.times{
printf"\e[37m=============================\e[39m"
}
puts