mIRC Home    About    Download    Register    News    Help

Print Thread
Joined: Jul 2004
Posts: 59
L
Babel fish
OP Offline
Babel fish
L
Joined: Jul 2004
Posts: 59
I created the below script to set fkeys to aliases used within my script. All worked well until today. Now when I attempt to open the dialog I get an the Error Error allocating stack memory (line 3, fkey.mrc) This also prevents the Control Panal from Opening. Any help would be welcomed.

SYSTEM: WINDOWS XP HOME
AMD TURION 64
512 Memory

******************** CODE ********************************

alias function { if ($dialog(function)) { return } | else { dialog -m function function } }

dialog function {
title "Configure F Keys"
size -1 -1 119 79
option dbu
icon 1, 3 6 15 15, $icons(f01.gif), 0, noborder
icon 2, 22 6 15 15, $icons(f02.gif), 0, noborder
icon 3, 41 6 15 15, $icons(f03.gif), 0, noborder
icon 4, 60 6 15 15, $icons(f04.gif), 0, noborder
icon 5, 79 6 15 15, $icons(f05.gif), 0, noborder
icon 6, 98 6 15 15, $icons(f06.gif), 0, noborder
icon 7, 3 26 15 15, $icons(f07.gif), 0, noborder
icon 8, 22 26 15 15, $icons(f08.gif), 0, noborder
icon 9, 41 26 15 15, $icons(f09.gif), 0, noborder
icon 10, 60 26 15 15, $icons(f10.gif), 0, noborder
icon 11, 79 26 15 15, $icons(f11.gif), 0, noborder
icon 12, 98 26 15 15, $icons(f12.gif), 0, noborder
button "Ok", 13, 42 61 37 12, ok cancel
text "Click the F Key to set ", 14, 34 47 53 8
}

on *:Dialog:fkeys:sclick:*: {
if $did = 1 {
Echo -a RESERVED FOR MIRC HELP
}
if $did = 2 {
did -g fkeys 2 $icons(f01.jpg)
did -g fkeys 2 $icons(f02.gif)
set %fkey f2
fkey_set
}
elseif $did = 3 {
did -g fkeys 3 $icons(f01.jpg)
did -g fkeys 3 $icons(f03.gif)
set %fkey f3
fkey_set
}
elseif $did = 4 {
did -g fkeys 4 $icons(f01.jpg)
did -g fkeys 4 $icons(f04.gif)
set %fkey f4
fkey_set
}
elseif $did = 5 {
did -g fkeys 5 $icons(f01.jpg)
did -g fkeys 5 $icons(f05.gif)
set %fkey f5
fkey_set
}
elseif $did = 6 {
did -g fkeys 6 $icons(f01.jpg)
did -g fkeys 6 $icons(f06.gif)
set %fkey f6
fkey_set
}
elseif $did = 7 {
did -g fkeys 7 $icons(f01.jpg)
did -g fkeys 7 $icons(f07.gif)
set %fkey f7
fkey_set
}
elseif $did = 8 {
did -g fkeys 8 $icons(f01.jpg)
did -g fkeys 8 $icons(f08.gif)
set %fkey f8
fkey_set
}
elseif $did = 9 {
did -g fkeys 9 $icons(f01.jpg)
did -g fkeys 9 $icons(f09.gif)
set %fkey f9
fkey_set
}
elseif $did = 10 {
did -g fkeys 10 $icons(f01.jpg)
did -g fkeys 10 $icons(f10.gif)
set %fkey f10
fkey_set
}
elseif $did = 11 {
did -g fkeys 11 $icons(f01.jpg)
did -g fkeys 11 $icons(f11.gif)
set %fkey f11
fkey_set
}
elseif $did = 12 {
did -g fkeys 12 $icons(f01.jpg)
did -g fkeys 12 $icons(f12.gif)
set %fkey f12
fkey_set
}
}

alias -l fkey_set { if ($dialog(fkey_set)) { return } | else { dialog -m fkey_set fkey_set } }

dialog fkey_set {
title "Select Option"
size -1 -1 158 256
option dbu
icon 1, 5 7 15 15, $icons(abc.ico), 0, noborder
icon 2, 5 28 15 15, $icons(abrv.ico), 0, noborder
icon 3, 5 49 15 15, $icons(ajoin.ico), 0, noborder
icon 4, 5 70 15 15, $icons(away.ico), 0, noborder
icon 5, 5 91 15 15, $icons(fonts.ico), 0, noborder
icon 6, 5 111 15 15, $icons(help.ico), 0, noborder
icon 7, 5 132 15 15, $icons(lock.ico), 0, noborder
icon 8, 5 153 15 15, $icons(MorePeople.ico), 0, noborder
icon 9, 5 174 15 15, $icons(mp3.ico), 0, noborder
icon 10, 5 195 15 15, $icons(ops.ico), 0, noborder
icon 11, 82 7 15 15, $icons(photo.ico), 0, noborder
icon 12, 82 28 15 15, $icons(pray.ico), 0, noborder
icon 13, 82 49 15 15, $icons(prot.ico), 0, noborder
icon 14, 82 70 15 15, $icons(scanner.ico), 0, noborder
icon 15, 82 91 15 15, $icons(sep.ico), 0, noborder
icon 16, 82 112 15 15, $icons(sound.ico), 0, noborder
icon 17, 82 153 15 15, $icons(vcard.ico), 0, noborder
icon 18, 82 174 15 15, $icons(voice.ico), 0, noborder
icon 19, 82 132 15 15, $icons(unotice.ico), 0, noborder
icon 20, 82 195 15 15, $icons(edit.ico), 0, noborder
button "Finished", 21, 58 238 37 12, cancel
radio "Spell Check", 22, 27 11 42 10
radio "Abbreviatons", 23, 27 32 44 10
radio "Auto Join", 24, 27 52 37 10
radio "Away Options", 25, 27 72 50 10
radio "Color Talkers", 26, 27 94 50 10
radio "Help System", 27, 27 112 50 10
radio "Auto ID", 28, 27 134 50 10
radio "Private Chat", 29, 27 155 50 10
radio "mp3 Player", 30, 27 177 50 10
radio "Op Notice Styles", 31, 27 198 50 10
radio "Pic Viewer", 32, 105 12 42 10
radio "Prayer Journal", 33, 105 33 44 10
radio "Clone Scanner", 34, 105 73 50 10
radio "Flood Protection", 35, 105 53 62 10
radio "Bible Settings", 36, 105 95 50 10
radio "Sound Settings", 37, 105 113 50 10
radio "User Notices", 38, 105 135 50 10
radio "Your Stats", 39, 105 156 50 10
radio "Auto Voice", 40, 105 178 50 10
radio "Nick Completion", 41, 105 199 50 10
edit "", 42, 52 221 90 10
text "Add My Own", 43, 12 222 36 8
}

on *:Dialog:fkey_set:init:0:{
if ($readini($mircdirSettings\settings.ini, fkeys, %fkey) == /spman) { did -c fkey_set 22 }
elseif ($readini($mircdirSettings\settings.ini, fkeys, %fkey) == /abbman) { did -c fkey_set 23 }
elseif ($readini($mircdirSettings\settings.ini, fkeys, %fkey) == /CIRCC_AJ) { did -c fkey_set 24 }
elseif ($readini($mircdirSettings\settings.ini, fkeys, %fkey) == /awaysys) { did -c fkey_set 25 }
elseif ($readini($mircdirSettings\settings.ini, fkeys, %fkey) == /ct) { did -c fkey_set 26 }
elseif ($readini($mircdirSettings\settings.ini, fkeys, %fkey) == /run $mircdirCIRCC.chm) { did -c fkey_set 27 }
elseif ($readini($mircdirSettings\settings.ini, fkeys, %fkey) == /autoid) { did -c fkey_set 28 }
elseif ($readini($mircdirSettings\settings.ini, fkeys, %fkey) == /pc) { did -c fkey_set 29 }
elseif ($readini($mircdirSettings\settings.ini, fkeys, %fkey) == /bmp3) { did -c fkey_set 30 }
elseif ($readini($mircdirSettings\settings.ini, fkeys, %fkey) == /opsmsgd) { did -c fkey_set 31 }
elseif ($readini($mircdirSettings\settings.ini, fkeys, %fkey) == /picv) { did -c fkey_set 32 }
elseif ($readini($mircdirSettings\settings.ini, fkeys, %fkey) == /Journal_Settings) { did -c fkey_set 33 }
elseif ($readini($mircdirSettings\settings.ini, fkeys, %fkey) == /cs_) { did -c fkey_set 34 }
elseif ($readini($mircdirSettings\settings.ini, fkeys, %fkey) == /fp) { did -c fkey_set 35 }
elseif ($readini($mircdirSettings\settings.ini, fkeys, %fkey) == /bibleset) { did -c fkey_set 36 }
elseif ($readini($mircdirSettings\settings.ini, fkeys, %fkey) == /soundmanage) { did -c fkey_set 37 }
elseif ($readini($mircdirSettings\settings.ini, fkeys, %fkey) == /unotice) { did -c fkey_set 38 }
elseif ($readini($mircdirSettings\settings.ini, fkeys, %fkey) == /ustats) { did -c fkey_set 39 }
elseif ($readini($mircdirSettings\settings.ini, fkeys, %fkey) == /autovoice) { did -c fkey_set 40 }
elseif ($readini($mircdirSettings\settings.ini, fkeys, %fkey) == /nickcomp) { did -c fkey_set 41 }
else { did -a fkey_set 42 $readini($mircdirSettings\settings.ini, fkeys, %fkey)
}
}
on *:Dialog:fkey_set:edit:42: {
did -u fkey_set 23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41
}

on *:Dialog:fkey_set:sclick:*: {
if $did = 22 { $rgc_settingsW(fkeys, %fkey, /spman) }
elseif $did = 23 { $rgc_settingsW(fkeys, %fkey, /abbman) }
elseif $did = 24 { $rgc_settingsW(fkeys, %fkey, /CIRCC_AJ) }
elseif $did = 25 { $rgc_settingsW(fkeys, %fkey, /awaysys) }
elseif $did = 26 { $rgc_settingsW(fkeys, %fkey, /ct) }
elseif $did = 27 { $rgc_settingsW(fkeys, %fkey, /run $mircdirCIRCC.chm) }
elseif $did = 28 { $rgc_settingsW(fkeys, %fkey, /autoid) }
elseif $did = 29 { $rgc_settingsW(fkeys, %fkey, /pc) }
elseif $did = 30 { $rgc_settingsW(fkeys, %fkey, /bmp3) }
elseif $did = 31 { $rgc_settingsW(fkeys, %fkey, /opsmsgd) }
elseif $did = 32 { $rgc_settingsW(fkeys, %fkey, /picv) }
elseif $did = 33 { $rgc_settingsW(fkeys, %fkey, /Journal_Settings) }
elseif $did = 34 { $rgc_settingsW(fkeys, %fkey, /cs_) }
elseif $did = 35 { $rgc_settingsW(fkeys, %fkey, /fp) }
elseif $did = 36 { $rgc_settingsW(fkeys, %fkey, /bibleset) }
elseif $did = 37 { $rgc_settingsW(fkeys, %fkey, /soundmanage) }
elseif $did = 38 { $rgc_settingsW(fkeys, %fkey, /unotice) }
elseif $did = 39 { $rgc_settingsW(fkeys, %fkey, /ustats) }
elseif $did = 40 { $rgc_settingsW(fkeys, %fkey, /autovoice) }
elseif $did = 41 { $rgc_settingsW(fkeys, %fkey, /nickcomp) }
elseif ($did(42) != $null) { $rgc_settingsW(fkeys, %fkey, $did(42)) }
}

/*
** Function Key Bindings
*/
alias f1 $readini($mircdirSettings\settings.ini, fkeys, f1)
alias f2 $readini($mircdirSettings\settings.ini, fkeys, f2)
alias f3 $readini($mircdirSettings\settings.ini, fkeys, f3)
alias f4 $readini($mircdirSettings\settings.ini, fkeys, f4)
alias f5 $readini($mircdirSettings\settings.ini, fkeys, f5)
alias f6 $readini($mircdirSettings\settings.ini, fkeys, f6)
alias f7 $readini($mircdirSettings\settings.ini, fkeys, f7)
alias f8 $readini($mircdirSettings\settings.ini, fkeys, f8)
alias f9 $readini($mircdirSettings\settings.ini, fkeys, f9)
alias f10 $readini($mircdirSettings\settings.ini, fkeys, f10)
alias f11 $readini($mircdirSettings\settings.ini, fkeys, f11)
alias f12 $readini($mircdirSettings\settings.ini, fkeys, f12)
/*
** End Function Key's

Joined: Jan 2004
Posts: 509
L
Fjord artisan
Offline
Fjord artisan
L
Joined: Jan 2004
Posts: 509
Originally Posted By: LittleJohn
alias function { if ($dialog(function)) { return } | else { dialog -m function function } }

dialog function {


So... line 3 is the dialog function..?

Joined: Jul 2004
Posts: 59
L
Babel fish
OP Offline
Babel fish
L
Joined: Jul 2004
Posts: 59
Yes Line 3 is the dialog function.

Joined: Oct 2004
Posts: 8,330
Hoopy frood
Offline
Hoopy frood
Joined: Oct 2004
Posts: 8,330
His point is that everywhere else, you're using fkeys instead of function. That said, that wouldn't cause the error you're getting.


Invision Support
#Invision on irc.irchighway.net

Link Copied to Clipboard