Script nya :
Cls
Color 11
For i = 1 to 79
Locate 1, i : Print chr$(196)
Delay (0.03)
next i
Locate 1 , 79 : Print chr$(191)
For i = 1 to 24
Locate i, 79 : Print chr$(179)
Delay (0.03)
Next i
Locate 24, 79 : Print chr$(217)
For i = 78 to 1 step -1
Locate 24, i : Print chr$(196)
Delay (0.03)
Next i
Locate 24, 1 : Print chr$(192)
For i = 23 to 1 step -1
Locate i, 1 : Print chr$(179)
Delay (0.03)
Next i
Locate 1, 1 : Print chr$(218)
End
0 blogger-facebook