home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 5 / DATAFILE_PDCD5.iso / utilities / p / python / !Python / Lib / RiscLib / py / menu < prev    next >
Encoding:
Text File  |  1996-02-16  |  1.1 KB  |  35 lines
  1. # Menu interface
  2.  
  3. from swi import *
  4. from toolbox import *
  5.  
  6. class Menu(TBObject):
  7.       def settick(self,comp,tick):
  8.           swi(0x64ec6,"0i0ii",self.id,comp,tick)
  9.       def setfade(self,comp,fade):
  10.           swi(0x64ec6,"0i2ii",self.id,comp,fade)
  11.       def setentrytext(self,comp,text):
  12.           print "setentry ",self.id,comp,text
  13.           swi(0x64ec6,"0i4is",self.id,comp,text)
  14.       def setsubmenushow(self,comp,id):
  15.           swi(0x64ec6,"0i8ii",self.id,comp,id)
  16.       def getsubmenushow(self,comp):
  17.           return swi(0x64ec6,"0i9i;i",self.id,comp)
  18.       def addentry(self,name,where=-2,id=-1,flags=0,clickevent=0,subevent=0):
  19.           eb=block(10,[flags,id,name.start,name.length,0,0,\
  20.                        subevent,clickevent,-1,0])
  21.           return swi(0x64ec6,"0iiib;i",self.id,20,where,eb)
  22.       def removeentry(self,comp):
  23.           swi(0x64ec6,"0iii",self.id,21,comp)
  24.  
  25.  
  26. #Menu Events
  27.  
  28. E_AboutToBeShown=0x82a90
  29. E_Quit=0x82a91
  30. E_DialogueCompleted=0x82a92
  31. E_Cancel=0x82a93
  32. E_AboutToBeShown=0x828c0
  33. E_HasBeenHidden=0x828c1
  34. E_SubMenu=0x828c2
  35. E_Selection=0x828c3