Advertisement
iful99

GERAK MELINGKAR DALAM CANVAS

Nov 16th, 2014
457
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. from appuifw import*
  2. from graphics import*
  3. from e32 import*
  4. from math import*
  5. from random import*
  6.  
  7. run = 1
  8. def quit():global run;run = 0
  9. app.exit_key_handler = quit
  10. app.screen = 'full'
  11. app.body = c = Canvas()
  12. X,Y = c.size
  13. im = Image.new((X,Y))
  14. im.clear(0)
  15. sx, sy, jari2 = X/2, Y/2, X/5.0
  16.  
  17. def radian(r):
  18.     return (float(r)*pi)/180.0
  19.    
  20. def gerak():
  21.     rad = radian(agl*6)
  22.     xp = cos(rad)*jari2 - sin(rad)*jari2
  23.     yp = sin(rad)*jari2 + cos(rad)*jari2
  24.     im.point((sx-xp,sy-yp),acak, width = 10)
  25.  
  26. agl = 0
  27. while run :
  28.     agl += 1
  29.     if agl >= 60 : agl = 0;im.clear(0)
  30.     acak=randint(0,0xffffff)
  31.     gerak()
  32.     c.blit(im)
  33.     ao_sleep(0.01)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement