Delphi Skyline
شنبه 06 مرداد 1386, 01:12 صبح
با سلام ...... .
یه چند مدتی بود جناب Inprise صحبت از روبی می کرد . ما هم گفتیم یه نگاهی بهش بندازیم . ولی ...... با نیم ساعت کار اول متوجه جذابیت فوق العاده این زبان شدم .
گفتم آموزشش رو شروع کنم (آموزشش رو خودم نوشتم ) . امروز 8 تا درس رو می زارم . آموزش به سبک کلاسیک نیست و با مثال و اونم مثال های کوچک .
خواهشمند ام نظرتونو درباری آموزش و سبکش بگید .
ممنون .
#Lesson1======================================
#This is a Comment
puts "Salam"
print "Salam"
#\n = new line
print "Salam"
#Lesson2======================================
$variable1 = 0;
$variable2 = true;
$variable3 = "SALAM";
puts $variable1
print $variable2
$variable3 = gets
puts $variable3
#Note : globat vars without $
variable = 0;
#Lesson3======================================
#Note : #a is var , #A is Const
$Const1 = 0;
$Const2 = false;
$Const3 = "SaLaM";
#Lesson4======================================
#if sentence
if $variable1 == 0 then
puts "GOOD"
else
puts "BAD !"
end
if not $variable1 == 1 then
puts "GOOD"
end
if $variable1 == 1 or $variable2 == true then
puts "GOOD"
end
if $variable1 == 1 and $variable3 == "SALAM" then
puts "GOOD"
end
#Lesson5======================================
while $variable1 < 100 do
print $variable1;
print "\n";
$variable1 = $variable1 + 1;
end
#Lesson6======================================
def procedure
puts "This is a Method"
end
def function
puts "This is a Method"
return 100;
end
def procedure1 par1,par2
puts par1 + par2
end
#call Method
procedure;
procedure1 2,3;
puts function;
#Lesson7======================================
#Note : Class name must be Constant
class A
def procedure
puts "This is a Method in Class A"
end
def function
puts "This is a Method in Class A"
return 100;
end
end
AA = A.new();
puts AA.function
AA.procedure
#Lesson8======================================
#End Program
__END__
یه چند مدتی بود جناب Inprise صحبت از روبی می کرد . ما هم گفتیم یه نگاهی بهش بندازیم . ولی ...... با نیم ساعت کار اول متوجه جذابیت فوق العاده این زبان شدم .
گفتم آموزشش رو شروع کنم (آموزشش رو خودم نوشتم ) . امروز 8 تا درس رو می زارم . آموزش به سبک کلاسیک نیست و با مثال و اونم مثال های کوچک .
خواهشمند ام نظرتونو درباری آموزش و سبکش بگید .
ممنون .
#Lesson1======================================
#This is a Comment
puts "Salam"
print "Salam"
#\n = new line
print "Salam"
#Lesson2======================================
$variable1 = 0;
$variable2 = true;
$variable3 = "SALAM";
puts $variable1
print $variable2
$variable3 = gets
puts $variable3
#Note : globat vars without $
variable = 0;
#Lesson3======================================
#Note : #a is var , #A is Const
$Const1 = 0;
$Const2 = false;
$Const3 = "SaLaM";
#Lesson4======================================
#if sentence
if $variable1 == 0 then
puts "GOOD"
else
puts "BAD !"
end
if not $variable1 == 1 then
puts "GOOD"
end
if $variable1 == 1 or $variable2 == true then
puts "GOOD"
end
if $variable1 == 1 and $variable3 == "SALAM" then
puts "GOOD"
end
#Lesson5======================================
while $variable1 < 100 do
print $variable1;
print "\n";
$variable1 = $variable1 + 1;
end
#Lesson6======================================
def procedure
puts "This is a Method"
end
def function
puts "This is a Method"
return 100;
end
def procedure1 par1,par2
puts par1 + par2
end
#call Method
procedure;
procedure1 2,3;
puts function;
#Lesson7======================================
#Note : Class name must be Constant
class A
def procedure
puts "This is a Method in Class A"
end
def function
puts "This is a Method in Class A"
return 100;
end
end
AA = A.new();
puts AA.function
AA.procedure
#Lesson8======================================
#End Program
__END__