added remaining LSL2 entities
This commit is contained in:
		
							
								
								
									
										11
									
								
								LSL2/OIEVENT/CLEAR/MSG_GROUPS..json
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										11
									
								
								LSL2/OIEVENT/CLEAR/MSG_GROUPS..json
									
									
									
									
									
										Normal file
									
								
							| @ -0,0 +1,11 @@ | ||||
| { | ||||
|     "header": { | ||||
|         "version": 1, | ||||
|         "type": "record" | ||||
|     }, | ||||
|     "body": { | ||||
|         "record1": { | ||||
|             "<1>": "declare function utility, fieldcount, set_property\r\n\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm )     \r\nfor i = 1 to Acnt         \r\n   ThisControl = AllControls<i>\r\n   if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n      void = set_property( ThisControl, 'ENABLED', 1 )\r\n   end           \r\nnext i \r\nRETURN 1" | ||||
|         } | ||||
|     } | ||||
| } | ||||
		Reference in New Issue
	
	Block a user