Example “InstantBlockmic”
This example reproduce the Blockmic predefined action on shortcut.
Script:
program InstantBlockmic; begin LastSpeaker:=Speaker; SetTarget(Speaker); SendRoom('/blockmic '+Speaker,false); end.
Example “InstantUnblockmic”
This example reproduce the Unblockmic predefined action on shortcut.
Script:
program InstantUnblockmic; begin if (LastSpeaker<>'') then begin SendRoom('/unblockmic '+LastSpeaker,false); LastSpeaker:=''; end; end.
Example “BlockUnblockMic”
This example block and unblock the mic of the user speaking on shortcut.
Script:
program BlockUnblockMic; begin if (Speaker<>'') then begin SendRoom('/blockmic '+Speaker,false); SendRoom('/unblockmic '+Speaker,false); end; end.
Example “KickAll”
This example kicks all users except you on shortcut.
Script:
program KickAll; var x:integer; begin for x:=0 to RoomUsers.count-1 do begin if (uppercase(RoomUsers[x]))<>(uppercase(MyUsername)) then begin SendRoom('/kick '+RoomUsers[x],true); end; end; end.
Example “Change caption on startup”
This example change your IceOp main box title on starup event.
“onStartup” script:
program onStartup; begin SetCaption('IceOp rulz!'); end.
Example “Alternate Join/Quit”
This example sends Join/Quit in the room. (deprecated)
“onJoin” script:
program onJoin; begin if (JoinCount>0) then begin SendRoom('Join: '+TARGET,true); end; end.
“onQuit” script:
program onQuit; begin SendRoom('Quit: '+TARGET,true); end.

