- {l Code}: {l Select All Code}
guilist [
guistrut 40 1
guislider var 0 100
]
That reminds me,
- {l Code}: {l Select All Code}
guistrut 40 1
is equivalent to,
- {l Code}: {l Select All Code}
guilist [guistrut 40]
srbs
guilist [
guistrut 40 1
guislider var 0 100
]
guistrut 40 1
guilist [guistrut 40]
// Around Line 1675-ish. Right above "newgui options ["
crosshairlist = ""
loopfiles crosshairs crosshairs.test png [
crosshairlist = (concat $crosshairlist $crosshairs)
]
[ . . . ]
// Just after "Zoom Crosshair Size"; around Line 1890:
guistrut 1
crosshairscount = 24
guinoautotab [
guitext "Crosshair Texture"
guicontainer [
numcrosshairs = (- (listlen $crosshairlist) 1)
guilist [
guilist [
guilist [ guistrut (listlen $crosshairlist) ] // not sure on this value. set random for now
crosshairindex = (min (max 0 (- $numcrosshairs $crosshairscount)) $crosshairindex)
guilist [
guilist [ guistrut 34 ]
guilistsplit n 6 $crosshairlist [
guiimage (format "crosshairs.test/%1" $n) [crosshairtex (format "crosshairs.test/%1" @n)] 1.5 1
]
]
]
]
guistrut 2
guislider crosshairindex 0 (max (- $numcrosshairs $crosshairlist) 0) [] 1 1
] [ guistrut 38; guilist [ guistrut (+f (listlen $crosshairlist) 3.5) ] ]
]
crosshairlist = ""
crosshairindex = 0
newgui crosshair [
guistayopen [
crosshaircount = 5
numcrosshairs = (- (listlen $crosshairlist) 1)
guilist [
guilist [
guicomb [
guitext "Crosshair Texture"
guistrut 1
]
guilist [
guilist [ guistrut (*f $crosshaircount 4) ]
guilist [
guilist [ guistrut 30 ]
crosshairindex = (min (max 0 (- $numcrosshairs $crosshaircount)) $crosshairindex) //safeguard
break = 0
loopwhile i $crosshaircount [if (= $break 0) [ 1 ] [ 0 ]] [
q = (+ $crosshairindex $i)
curcrosshair = (at $crosshairlist $q)
crosshairname = (concatword "crosshairs/" $curcrosshair)
guibody [
guilist [
guistrut 0.5
guilist [
guiimage $crosshairname [] 1.5 1
guistrut 1
guilist [
guistrut 1
guibutton (format "%1%2" (? (strcmp $crosshairtex $crosshairname) "^fy" "^fa") $curcrosshair) []
]
]
guistrut 0.5
]
] [ crosshairtex @crosshairname ] [ crosshairtex @crosshairname ]
if (= $q $numcrosshairs) [ break = 1 ]
]
]
guislider crosshairindex 0 (max 0 (- $numcrosshairs $crosshaircount)) [] 1 1
]
]
]
]
] [
if (= $guipasses 0) [
crosshairlist = ""
loopfiles crosshairs crosshairs png [
crosshairlist = (concat $crosshairlist $crosshairs)
]
crosshairindex = (listfind mcurcrosshair $crosshairlist [strcmp (concatword "crosshairs/" $mcurcrosshair) $crosshairtex])
]
]
// Again, this is JUST before "newgui options [", just after "macro resbutton"
crosshairlist = ""
crosshairindex = 0
newgui crosshair [
guiheader "Crosshair"
guistayopen [
crosshaircount = 5
numcrosshairs = (- (listlen $crosshairlist) 1)
guilist [
guilist [
guicomb [
guitext "Crosshair Texture"
guistrut 1
]
guilist [
guilist [ guistrut (*f $crosshaircount 4) ]
guilist [
guilist [ guistrut 30 ]
crosshairindex = (min (max 0 (- $numcrosshairs $crosshaircount)) $crosshairindex) //safeguard
break = 0
loopwhile i $crosshaircount [if (= $break 0) [ 1 ] [ 0 ]] [
q = (+ $crosshairindex $i)
curcrosshair = (at $crosshairlist $q)
crosshairname = (concatword "crosshairs/" $curcrosshair)
guibody [
guilist [
guistrut 0.5
guilist [
guiimage $crosshairname [] 1.5 1
guistrut 1
guilist [
guistrut 1
guibutton (format "%1%2" (? (strcmp $crosshairtex $crosshairname) "^fy" "^fa") $curcrosshair) []
]
]
guistrut 0.5
]
] [ crosshairtex @crosshairname ] [ crosshairtex @crosshairname ]
if (= $q $numcrosshairs) [ break = 1 ]
]
]
guislider crosshairindex 0 (max 0 (- $numcrosshairs $crosshaircount)) [] 1 1
]
]
]
if (= $guipasses 0) [
crosshairlist = ""
loopfiles crosshairs crosshairs png [
crosshairlist = (concat $crosshairlist $crosshairs)
]
crosshairindex = (listfind mcurcrosshair $crosshairlist [strcmp (concatword "crosshairs/" $mcurcrosshair) $crosshairtex])
]
]
guitab "Hit-Crosshair"
guistayopen [
hitcrosshaircount = 5
numhitcrosshairs = (- (listlen $hitcrosshairlist) 1)
guilist [
guilist [
guicomb [
guitext "Hit-Crosshair Texture"
guistrut 1
]
guilist [
guilist [ guistrut (*f $hitcrosshaircount 4) ]
guilist [
guilist [ guistrut 30 ]
hitcrosshairindex = (min (max 0 (- $numhitcrosshairs $hitcrosshaircount)) $hitcrosshairindex) //safeguard
break = 0
loopwhile i $hitcrosshaircount [if (= $break 0) [ 1 ] [ 0 ]] [
q = (+ $hitcrosshairindex $i)
curhitcrosshair = (at $hitcrosshairlist $q)
hitcrosshairname = (concatword "crosshairs/" $curhitcrosshair)
guibody [
guilist [
guistrut 0.5
guilist [
guiimage $hitcrosshairname [] 1.5 1
guistrut 1
guilist [
guistrut 1
guibutton (format "%1%2" (? (strcmp $hitcrosshairtex $hitcrosshairname) "^fy" "^fa") $curhitcrosshair) []
]
]
guistrut 0.5
]
] [ hitcrosshairtex @hitcrosshairname ] [ hitcrosshairtex @hitcrosshairname ]
if (= $q $numhitcrosshairs) [ break = 1 ]
]
]
guislider hitcrosshairindex 0 (max 0 (- $numhitcrosshairs $hitcrosshaircount)) [] 1 1
]
]
]
]
] [ if (= $guipasses 0) [
hitcrosshairlist = ""
loopfiles hitcrosshairs crosshairs png [
hitcrosshairlist = (concat $hitcrosshairlist $hitcrosshairs)
]
hitcrosshairindex = (listfind mcurhitcrosshair $hitcrosshairlist [strcmp (concatword "crosshairs/" $mcurhitcrosshair) $hitcrosshairtex])
]
]
guistrut 1 // I don't remember if that was always there, or if I added it...
guibutton "Crosshair Texture" [showgui crosshair]
qreeves {l Wrote}:
- {l Code}: {l Select All Code}
loopwhile i $crosshaircount [if (= $break 0) [ 1 ] [ 0 ]] [..]
loopwhile i $crosshaircount [! $break] [..]
Users browsing this forum: No registered users and 0 guests