//used when reseting maybe somethings wrong with it ;)
deSize = "15"  
deCH = "data/crosshair.png"
deHT = "data/hit.png"

//this is the magic
weapons = "noSize noCH noHT FiSize FiCH FiHT ShSize ShCH ShHT ChSize ChCH ChHT RkSize RkCH RkHT RfSize RfCH RfHT GrSize GrCH GrHT PiSize PiCH PiHT"

//if you accident do something to the weapon array run this
ResetWep = [ 
weapons = "noSize noCH noHT FiSize FiCH FiHT ShSize ShCH ShHT ChSize ChCH ChHT RkSize RkCH RkHT RfSize RfCH RfHT GrSize GrCH GrHT PiSize PiCH PiHT"
]
//resets one ... sometimes works some times errors :)... use with caution
resetCH = [
@( at $weapons (+ 0 ( $arg1 ) ) ) = $deSize
@( at $weapons (+ 1 ( $arg1 ) ) ) = $deCH
@( at $weapons (+ 2 ( $arg1 ) ) ) = $deHT
]
//resets all ... sometimes works some times errors :)... use with caution
resetAllCH = [
loop i 8 [
@( at $weapons (+ 0 (* ( $i ) 3 ) ) ) = $deSize
@( at $weapons (+ 1 (* ( $i ) 3 ) ) ) = $deCH
@( at $weapons (+ 2 (* ( $i ) 3 ) ) ) = $deHT
]
]

//runs all the menu protical
getCrossHairMenuInfo = [
 guitext "crosshair size"
 guislider (concatword (at $weapons $arg1 ) ) 1 50
 guibar
 guititle "Crosshair"
 guibar
guilist [
 loop row (div (+ (listlen $crosshairs) 6) 7) [
            loop col 7 [
                ch = (at $crosshairs (+ (* $row 7) $col))
                if (!=s $ch "") [
                    guiimage (at $ch 0) [ 
		      @(at $weapons (+ $arg1 1 ) ) = @(at $ch 0 ) 
                      @(at $weapons (+ $arg1 2 ) ) = @(at $ch (if (> (listlen $ch) 1) 1 0)) 
		      setWeaponCRH
                    ] 0.5
                ]
            ]
        ]
    ]
guibar 
guibutton "Reset" "resetCH $arg1"
]

newgui crosshair [
guistayopen [
 guilist [
    guicheckbox "Use Dynamic Cross Hairs" "use"
    if (= $use 1 ) [
      guibar
      guibutton "Setings" "showgui Ed" "
      guibar 
      guibutton "Reset All" "resetAllCH"
    ]
  ]

  if (= $use 0 ) [
    guibar
    guitext "crosshair size"
    guislider "crosshairsize" 0 50
    loop row (div (+ (listlen $crosshairs) 6) 7) [
        guilist [
            loop col 7 [
                ch = (at $crosshairs (+ (* $row 7) $col))
                if (!=s $ch "") [
                    guiimage (at $ch 0) [ 
                        cleargui 1
                        loadcrosshair @(at $ch 0) 0
                        loadcrosshair @(at $ch (if (> (listlen $ch) 1) 1 0)) 2
                    ] 0.5
                ]
            ]
        ]
    ]
  ]
  if (= $use 1 ) [
  guibar
  guitext "Modify All CH sizes"
  guislider modSize -10 10
  guibar
  guitext "Auto Check Weapon Switch"
  guislider autoCheck 100 2000
  ]
]
]

//use this script :) 
use = 1

//my menu
newgui Ed [
guistayopen [
normal = ( getCrossHairMenuInfo 0 )
    guitab "Shot"
(getCrossHairMenuInfo 6)
guitab "Chain Gun"
(getCrossHairMenuInfo 9)
    guitab "Rockets"
(getCrossHairMenuInfo 12)
    guitab "Rifle"
(getCrossHairMenuInfo 15)
    guitab "Grenades"
(getCrossHairMenuInfo 18)
    guitab "Pistol"
(getCrossHairMenuInfo 21)
    guitab "Fist"
(getCrossHairMenuInfo 3)
]
]
//remove and use following if runs slow also use bind below
//autoCheckCH = [ ]
autoCheckCH = [
setWeaponCRH 
sleep $autoCheck [
autoCheckCH 
]
]

//changes your CH based on your mode and weapon
setWeaponCRH = [ 
a = ( getweapon )
i = 0
if (= $editing 0 )[ 
if (= $use 1 ) [
loop i 7 [
if (= $a $i ) [
   crosshairsize (+ $modSize @(concatword "$" ( at $weapons (+ 0 (* (+ $i 1) 3 ) ) ) ) )
   loadcrosshair @(concatword "$" ( at $weapons (+ 1 (* (+ $i 1) 3 ) ) ) )
   loadcrosshair @(concatword "$" ( at $weapons (+ 2 (* (+ $i 1) 3 ) ) ) ) 2
]
]
] [
]
] [ 
   crosshairsize (+ $modSize $noSize )
   loadcrosshair $noCH
   loadcrosshair $noHT 2
]

]
// if your computer runs slow when runing this script use these binds and clear the autocheckCH function :)

//editbind "MOUSE4" [universaldelta 1]
//editbind "MOUSE5" [universaldelta -1]
//editbind "E" [edittoggle; setWeaponCRH ]
//bind "MOUSE4" [universaldelta 1; setWeaponCRH ]
//bind "MOUSE5" [universaldelta -1; setWeaponCRH ]
//bind "0" [setweapon FI; setWeaponCRH]
//bind "1" [setweapon SG; setWeaponCRH]
//bind "2" [setweapon CG; setWeaponCRH]
//bind "3" [setweapon RL; setWeaponCRH]
//bind "4" [setweapon RI; setWeaponCRH]
//bind "5" [setweapon GL; setWeaponCRH]
//bind "6" [setweapon PI; setWeaponCRH]
//bind "7" [setweapon FI; setWeaponCRH]
//bind "E" [edittoggle; setWeaponCRH ]

//runs code which detects change in weapons every $autoCheck mm 
autoCheckCH