Kyuubi

alias Search Engine { 
  dialog -m Search Search 
} 
menu * { 
  Search:/dialog -m Search Search 
} 
dialog Search { 
  title "Search Engine" 
  size -1 -1 175 100 
  option dbu 
  text "Made by Kyuubi", 1, 69 5 36 12 
  box "Choose your site:", 2, 1 10 173 91 
  button "Google", 3, 50 17 75 12 
  button "YouTube", 4, 50 30 75 12 
  button "Google Video", 5, 50 43 75 12 
  button "Close", 6, 50 60 75 12, Cancel 
} 
on *:dialog:Search:sclick:3: { 
  dialog -m Google Google 
  dialog -x Search Search 
} 
on *:dialog:Search:sclick:4: { 
  dialog -m YouTube YouTube 
  dialog -x Search Search 
} 
on *:dialog:Search:sclick:5: { 
  dialog -m VGoogle VGoogle 
  dialog -x Search Search 
} 

alias Google Machine { 
  dialog -m Google Google 
} 
dialog Google { 
  title "Google Search" 
  size -1 -1 175 100 
  option dbu 
  text "Made by Kyuubi", 1, 69 5 36 12 
  box "Search field:", 2, 1 10 173 91 
  edit "Search Field...", 3, 35 25 105 9 
  button "Web Search", 4, 12 36 54 12 
  button "Image Search", 5, 68 36 54 12 
  button "Close", 6, 124 36 38 12, Cancel 
} 
on *:dialog:Google:sclick:4:url http://www.google.com/search?hl=en&q= $+ $replace($did(3),$chr(32),+) 
on *:dialog:Google:sclick:5:url http://images.google.com/images?hl=en&q= $+ $replace($did(3),$chr(32),+) $+ &um=1&ie=UTF-8&sa=N&tab=wi 
on *:dialog:Google:sclick:6: { 
  dialog -m Search Search 
  dialog -x Google Google 
} 

alias YouTube { 
  dialog -m YouTube YouTube 
} 
dialog YouTube { 
  title "YouTube Search" 
  size -1 -1 175 100 
  option dbu 
  text "Made by Kyuubi", 1, 69 5 36 12 
  box "Search field:", 2, 1 10 173 91 
  edit "Search Field...", 3, 35 25 105 9 
  button "Search YouTube", 4, 35 36 52 12 
  button "Close", 5, 88 36 52 12, Cancel 
} 
on *:dialog:YouTube:sclick:4:url http://www.youtube.com/results?search_query= $+ $replace($did(3),$chr(32),+) 
on *:dialog:YouTube:sclick:5: { 
  dialog -m Search Search 
  dialog -x YouTube YouTube 
} 

alias VGoogle { 
  dialog -m VGoogle VGoogle 
} 
dialog VGoogle { 
  title "Google Video Search" 
  size -1 -1 175 100 
  option dbu 
  text "Made by Kyuubi", 1, 69 5 36 12 
  box "Search field:", 2, 1 10 173 91 
  edit "Search Field...", 3, 35 25 105 9 
  button "Search Google Videos", 4, 35 36 62 12 
  button "Close", 5, 98 36 42 12, Cancel 
} 
on *:dialog:VGoogle:sclick:4: url http://video.google.com/videosearch?q= $+ $replace($did(3),$chr(32),+) 
on *:dialog:VGoogle:sclick:5: { 
  dialog -m Search Search 
  dialog -x VGoogle VGoogle 
}