#!/usr/bin/env python
import sys
try:
 from OpenGL.GL import *
 from OpenGL.GLUT import *
except ImportError:
 print "It seems that you don't have OpenGL.GL/GLUT bindings. Please install PyOpenGL."
 sys.exit(1)
from math import *
from time import *
from AppKit import NSSound
from threading import *
p=[]
t=l=q=i=j=0
R=[1]*3
f=22050
b=''
glutInit(0)
glutInitDisplayMode(2)
glutGameModeString("1024x768:32")
if not glutGameModeGet(GLUT_GAME_MODE_POSSIBLE):
 print "Game mode not possible"
 sys.exit(0)
glutEnterGameMode()
class P:
 pass
def K(*a):
 global f
 f=0
 glutLeaveGameMode()
 sys.exit(0)
def D():
 global l,t,q,i,j,R
 t=time()-z
 d=t-l
 glClear(16384)
 b=sin(t/1.5)*.6+sin(t*5)*.4
 h=(sin(t*.77)+sin(t))*pi
 x=cos(h)*b
 y=sin(h)*b
 r=[max(.5,min(1,R[0]+d*sin(t*4))),max(.5,min(1,R[1]+d*sin(t*7))),max(.5,min(1,R[2]+d*sin(t*9)))]
 q+=d*150
 n=int(q)
 for c in range(n):
  a=P()
  h=c/q
  a.x=i+h*(x-i)
  a.y=j+h*(y-j)
  a.U=sin(h*t*4)*.01
  a.T=cos(h*t*7)*.01
  a.s=30
  a.r=R[0]+h*(r[0]-R[0])
  a.g=R[1]+h*(r[1]-R[1])
  a.b=R[2]+h*(r[2]-R[2])
  a.a=1
  p.append(a)
 i=x
 j=y
 R=r
 q-=n
 for a in p:
  a.x+=a.U*d
  a.y+=a.T*d
  a.a-=d/7
  a.s+=d*4
  glColor4f(a.r,a.g,a.b,a.a)
  glPointSize(a.s)
  glBegin(0)
  glVertex2f(a.x,a.y)
  glEnd()
 del p[0:-1500]
 l=t
 glutSwapBuffers()
 glutPostRedisplay()
glutDisplayFunc(D)
glutKeyboardFunc(K)
d=[]
for y in range(32):
 for x in range(32):
  s=sqrt((16-x)**2+(16-y)**2)
  v=max(1-.0625*s,0)
  d.append(1)
  d.append(v)
glBindTexture(3553,glGenTextures(1))
glTexParameteri(3553,33169,1)
glTexImage2D(3553,0,6408,32,32,0,6410,5126,d)
glTexEnvi(34913,34914,1)
glEnable(3042)
glEnable(34913)
glEnable(3553)
glBlendFunc(770,771)
glMatrixMode(5889)
glOrtho(-1.2,1.2,-1.2,1.2,-1,1)
glMatrixMode(5888)
def k():
 while f:
  if not sound.isPlaying():
   sound.play()
  sleep(0.001)
h=1.059
s=(5,12,8,12,5,12,8,7,0,7,3,7,0,7,2,3)
o=['F','O','R','M',chr(0x0),chr(0x2),chr(0xB1),chr(0x4E),'A','I','F','C','F','V','E','R',chr(0),chr(0),chr(0),chr(4),chr(0xA2),chr(0x80),chr(0x51),chr(0x40),'C','O','M','M',chr(0),chr(0),chr(0),chr(38),chr(0),chr(1),chr(0x0),chr(0x1),chr(0x58),chr(0x80),chr(0x0),chr(16),chr(0x40),chr(0x0d),chr(0xac),chr(0x44),chr(0x0),chr(0x0),chr(0x0),chr(0x0),chr(0x0),chr(0x0),'N','O','N','E',chr(14),'n','o','t',' ','c','o','m','p','r','e','s','s','e','d',chr(0),'S','S','N','D',chr(0),chr(0x02),chr(0xB1),chr(0x08),chr(0),chr(0),chr(0),chr(0),chr(0),chr(0),chr(0),chr(0)]
for t in o: b+=t
o=chr(0)*5512
for n in s:
 t=''
 g=.125*h**n
 for y in range(2756):
  v=int(2e4*sin(g*y))
  t+=chr((v&0xff00)>>8)+chr(v&0xff)
 b+=t
 b+=o
aifff = open('1kintro_macosx.aiff', 'wb')
aifff.write(b)
aifff.close()
sound = NSSound.alloc()
sound.initWithContentsOfFile_byReference_("1kintro_macosx.aiff", True)
try:
 sound.setLoops_(True)
 sound.play()
except AttributeError:
 Thread(target=k).start()
z=time()
glutMainLoop()