05 May 2012

Ketawaaaaaaaaaaaaaaaaaaaaaaa

;;; Remote
menu channel,status,@input-List {
  GT`crewz™ Edit Input:inputlist
}
menu @input-List {
  GT`crewz™ Close:/close -@ $active
}

alias inputlist {
  if ($dialog(inputlist) == $null) { dialog -m inputlist inputlist }
  else { dialog -v inputlist inputlist }
}
dialog inputlist {
  size -1 -1 160 113
  title "Spiralkinetics Input List Setting"
  option dbu
  box "" 1, 3 0 154 110
  list 2, 8 10 60 100 , sort
  check "Enable input set" 3, 75 15 47 10
  edit "" 4, 72 38 80 10 , autohs
  edit "" 5, 72 58 80 10 , autohs
  text "Your Text:" 6, 72 30 30 8
  text "Input Will Be:" 7, 72 50 40 8
  button "Add" 8, 75 75 25 9
  button "Delete" 9, 125 75 25 9
  button "OK" 11, 74 92 35 10 ,cancel
  button "Show List" 12, 115 92 35 10
}
on 1:dialog:inputlist:*:*:{
  if ($devent == init) {
    if (%input == ON) { did -c $dname 3 }
    inputlistshow
    did -b $dname 9
  }
  if ($devent == sclick) {
    if ($did == 3) { inputon }
    if ($did == 2) && ($did(2).sel != $null) {
      did -e $dname 9
      did -ra $dname 4 $did(2).seltext
      did -ra $dname 5 %input [ $+ [ $did(2).seltext ] ]
      if ($active != @Input-List) { window -ak @Input-List }
      clear @Input-List
      echo @Input-List *** $did(2).seltext => %input [ $+ [ $did(2).seltext ] ]
    }
    if ($did == 8) {
      if (* * iswm $did(4)) { set %errorinadd Don't leave empty char! }
      elseif ($did(4) != $null) && ($did(5) != $null) {
        set %inputadd $did(4)
        set %input-add $did(5)
        inputadd
      }
    }
    if ($did == 9) && ($did(2).sel != $null) {
      set %inputdel $did(2).seltext
      inputdel
    }
    if ($did == 11) { window -c @inpu-set }
    if ($did == 12) { inputlistshoww }
  }
}
alias inputlistshow {
  did -r inputlist 2
  set %§in 0
  :inp
  inc %§in
  if (%§in > 500) { goto end }
  elseif (%input [ $+ [ %§in ] ] != $null) { did -a inputlist 2 %input [ $+ [ %§in ] ] }
  goto inp
  :end
  unset %§in
  did -b $dname 9
  did -r $dname 4
  did -r $dname 5
}
alias inputon {
  if (%input == ON) {
    set %input OFF
    if ($dialog(inputlist) != $null) { did -u inputlist 3 }
  }
  else {
    set %input ON
    if ($dialog(inputlist) != $null) { did -c inputlist 3 }
  }
}
alias inputadd {
  set %§in 0
  :inp
  inc %§in
  if (%§in > 500) { goto end }
  elseif (%input [ $+ [ %§in ] ] == %inputadd) {
    set %input [ $+ [ %§in ] ] %inputadd
    set %input [ $+ [ %inputadd ] ] %input-add
    goto end
  }
  elseif (%input [ $+ [ %§in ] ] == $null) {
    set %input [ $+ [ %§in ] ] %inputadd
    set %input [ $+ [ %inputadd ] ] %input-add
    goto end
  }
  else { goto inp }
  :end
  unset %§in %inputadd %input-add
  inputlistshow
}
alias inputdel {
  set %§in 0
  :inp
  inc %§in
  if (%§in > 500) { goto end }
  elseif (%input [ $+ [ %§in ] ] == %inputdel) {
    unset %input [ $+ [ %§in ] ] %input [ $+ [ %inputdel ] ]
    goto end
  }
  else { goto inp }
  :end
  unset %§in %inputdel
  inputlistshow
}
alias inputlistshoww {
  if ($active != @Input-List) { window -ak @Input-List }
  clear @Input-List
  set %§in 0
  :inp
  inc %§in
  if (%§in > 500) { goto end }
  elseif (%input [ $+ [ %§in ] ] != $null) {
    set %DanSip %input [ $+ [ %§in ] ]
    echo @Input-List 2 ***   %DanSip 2=> %input [ $+ [ %DanSip ] ]
  }
  goto inp
  :end
  unset %§in
}
on 1:input:*: {
  if ($left($1,1) = /) { return }
  elseif (%input == ON) && ($1 == %input1) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input2) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input3) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input4) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input5) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input6) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input7) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input8) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input9) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input10) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input11) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input12) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input13) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input14) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input15) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input16) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input17) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input18) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input19) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input20) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input21) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input22) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input23) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input24) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input25) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input26) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input27) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input28) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input29) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input30) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input31) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input32) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input33) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input34) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input35) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input36) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input37) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input38) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input39) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input40) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input41) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input42) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input43) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input44) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input45) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input46) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input47) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input48) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input49) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
  elseif (%input == ON) && ($1 == %input50) { msg $active %input [ $+ [ $1 ] ] $2- | halt }
}

;;; Variables
;;; cut and paste
;;; you know what i mean~!!
%input1 akum
%inputakum 14A 15ssalamualaikum 0....
%input2 ws
%inputws 14W 15aalaikumussalam w 0. 15b 0. 15t 0....
%input3 brb
%inputbrb 14B 15e 14R 15ight 14B 15ack 0....
%input4 wb
%inputwb 14W 15elcome 14B 15ack 0....
%input5 brboc
%inputbrboc 14B 15e 14R 15ight 14B 15ack 14O 15n 14C 15all 0...
%input6 hahaha
%inputhahaha 0,1H 2a 3H 4a 5H 6a 7H 8a 9... 0H 2a 3H 4a 5H 6a 7H 8a 9... 0H 2a 3H 4a 5H 6a 7H 8a 9... 0H 2a 3H 4a 5H 6a 7H 8a 9... 0H 2a 3H 4a 5H 6a 7H 8a 9... 0H 2a 3H 4a 5H 6a 7H 8a 9... 0H 2a 3H 4a 5H 6a 7H 8a 9... 0H 2a 3H 4a 5H 6a 7H 8a
%input7 kahkah
%inputkahkah 14K 15ah 14K 15ah 14K 15ah 14K 15ah 0...! 14K 15ah 14K 15ah 14K 15ah 14K 15ah 0...! 14K 15ah 14K 15ah 14K 15ah 14K 15ah 0...! 14K 15ah 14K 15ah 14K 15ah 14K 15ah 0...! 14K 15ah 14K 15ah 14K 15ah 14K 15ah 0...! 14K 15ah 14K 15ah 14K 15ah 14K 15ah 0...! 14K 15ah 14K 15ah 14K 15ah 14K 15ah 0...!
%input8 haha
%inputhaha 14H 15a 14H 15a 14H 15a 14H 15a 14H 15a 14H 15a 0... 14G 15elak tergolek golek 0~~
%input9 hehe
%inputhehe 14H 15e 14H 15e 14H 15e 14H 15e 14H 15e 14H 15e 0... 14K 15etawa sambil tutup mulut.
%input10 keke
%inputkeke 14K 15e 14K 15e 14K 15e 14K 15e 14K 15e 14K 15e 0...
%input11 huhu
%inputhuhu 14H 15u 14H 15u 14H 15u 14H 15u 14H 15u 14H 15u 0...
%input12 hak
%inputhak 14H 15ak 14H 15ak 14H 15ak 14H 15aktuuihhhh 0!
%input13 nm
%inputnm 14N 15ever 14M 15ind
%input14 np
%inputnp 14N 15o 14P 15roblem
%input15 wee
%inputwee 1,1w 2e 3e 4e 5e 6e 7e 8e 9e 10e 11e 12e 13e 14e 15e 1e 2e 3e 4e 5e 6e 7e 8e 9e 10e 11e 12e 13e 14e 15e 1e 2e 3. 4. 5. 6. 7. 8. 9. 10. .
%input16 k
%inputk 14O 15kay 0...
%input17 uiks
%inputuiks 14Ù 15 i k s 14S 15 s 0¿
%input18 hye
%inputhye 14H 15ye 0...
%input19 yw
%inputyw 14Y 15our 14W 15elcome 0...
%input20 aiseh
%inputaiseh 14A 15iissseehhhhh 0...
%input21 huh
%inputhuh 14H 15uhh 0...
%input22 hoh
%inputhoh 14H 15ohh 0...
%input23 hi
%inputhi 14H 15i 0...
%input24 bye
%inputbye 14B 15ybye 0...
%input25 oit
%inputoit 14O 15itt 0...
%input26 hihiks
%inputhihiks 14H 15ihiks 0...
%input27 ahaks
%inputahaks 14A 15hakss 0..
%input28 hor
%inputhor 14H 15orr
%input29 erm
%inputerm 14E 15rmmm 0...
%input30 hurm
%inputhurm 14H 15urmmmm 0...
%input31 akhe
%inputakhe 14A 15khe 14A 15khe 14A 15khe 14A 15khe 14A 15khe 14A 15khe 14A 15khe
%input32 n
%inputn 14E 15nd 14C 15hatting 0...
%input33 tk
%inputtk 14T 15erima 14K 15asih 0...
%input34 ty
%inputty 14T 15hank 14Y 15ou 0..
%input35 y
%inputy 15ya ya
%input36 lol
%inputlol 15£äûghiñg øût £øûd
%input37 rofl
%inputrofl 15rø££iñg øñ f£øør £äûghiñg
%input38 lmao
%inputlmao 15£ûäghiñg mÿ äss øff
%input39 lmfao
%inputlmfao 15£äûghiñg mÿ fûçkiñg äss øff
%input40 gtg
%inputgtg 15gøt tø gø
%input41 beref
%inputberef 14B 15eref 0.. 14B 15eref 0....
%input42 steady
%inputsteady 14S 15teady 0.. 14S 15teady 0......
%input43 muaha
%inputmuaha 14M 15uahahahahahahahahahahahahaha 14H 15alimah 14J 15ongang 0...

No comments: