Die WigHelper.exe darf nicht gepatcht werden.
Diese müsst ihr wieder durch die Originale (ungepatchte) ersetzen, dann geht auch der Ton.
Windows 8
Re: Windows 8
01100100 00100111 01101111 01101000 00100001
-
Gamewiggle
- Beiträge: 8
- Registriert: Fr 29. Mär 2013, 15:19
Re: Windows 8
Hi. Melde mich erst spät aber lieber spät als nie.
Haben beide einen asus lappy
Intel core i7 3630m 2,4 ghz with turbo boost up to 3,4 ghz
Nvidia geforce gt 640m 2 gb dedicated vram
8 gb ddr3 memory
Natürlich habe ich die wig helper exe von der cd genommen und sie nicht gepatcht. Steht ja auch so in der anleitung
Haben beide einen asus lappy
Intel core i7 3630m 2,4 ghz with turbo boost up to 3,4 ghz
Nvidia geforce gt 640m 2 gb dedicated vram
8 gb ddr3 memory
Natürlich habe ich die wig helper exe von der cd genommen und sie nicht gepatcht. Steht ja auch so in der anleitung
Re: Windows 8
Hallo. Nach laaaanger Zeit wollte ich mein Wiggles installieren. Habe alles gemacht wie bei den Anleitungen angegeben ist. Nach dem kurzen Ladebildschirm, mit Sound und Versionsanzeige, bekomme ich einen "fatal init Error"
Habe mit und ohne No-CD Dateien gestartet. Ohne No-CD gehts gar nicht.
Hier der Auszug aus meiner tclerrors.txt:
Error(3401):can't unset "attribs": no such variable
while executing
"unset attribs materials tools fail item cn tttsection_tocall ttfile expfile explst":
proc MakeTTEntry {file name materials tools places attribs} {
set category [get_class_category $name]
set type [get_class_type $name]
set era [get_class_era $name]
set flags [get_class_flags $name]
puts $file "{\n$name $category $type $era $flags\n"
puts $file "// Materials\n{$materials}"
puts $file "// Tools\n{$tools}"
puts $file "// Places\n{$places}"
puts $file "// Attribs\n{$attribs}"
puts $file "}\n"
}
proc MakeExpEntry {file attribs atrlst} {
set bitwert 0
for {set i 0} {$i<[llength $atrlst]} {incr i} {
if [string match "*[lindex $atrlst $i]*" $attribs] {
set bitwert [expr int($bitwert+pow(2,$i))]
}
}
set firstwert $bitwert
if {2<[llength $attribs]} {
for {set i 0} {$i<[llength $atrlst]} {incr i} {
if {int(pow(2,$i))&$firstwert} {
lappend bitwert [expr int(pow(2,$i))^$firstwert]
}
}
}
if [string index $bitwert 0] {
foreach nextwert $bitwert {
seek $file 0 start
if {-1==[lsearch [gets $file] $nextwert]} {
seek $file 0 end
puts -nonewline $file "$nextwert "
}
}
}
}
set ttfile [open "data/scripts/gameplay/gen_tt.tcl" w]
set expfile [open "data/scripts/gameplay/gen_exp.lst" w+]
puts -nonewline $expfile "1 2 4 8 16 32 64 128 "
set explst "[get_expattrib 0] atr_Kampf"
# [catch {}] == 0 -> okay
foreach cn [ClassList] {
#log "Class: $cn\n";
if { ![regexp {^CObj*|^CTclRoot*} $cn] } {
# log "Testing Class: $cn\n";
set fail [catch {
set items [call_method_static $cn prod_items]
}]
if {$fail==0} {
# log "Techtree Class: $cn\n";
# log "$cn $items\n";
foreach item $items {
# log " Item: $item\n";
if {[string first [get_class_type $cn] "productionstoreenergyprotection"]!=-1&&[string first $cn "Zelt"]==-1} {
set tttsection_tocall $item
call scripts/misc/techtreetunes.tcl
set materials [subst \$tttmaterial_$item]
set tools [subst \$tttinfluence_$item]
set attribs [subst \$tttinvent_$item]
catch {unset tttmaterial_$item tttinvent_$item tttgain_$item tttinfluence_$item}
catch {unset tttpreinv_$item tttitems_$item}
catch {unset tttenergycons_$item}
catch {unset tttenergyrange_$item tttenergyvalue_$item tttenergystore_$item tttenergyminstore_$item tttenergyyield_$item}
catch {unset tttnumber2produce_$item}
} else {
set materials [call_method_static $cn prod_item_materials $item]
set tools
Habe mit und ohne No-CD Dateien gestartet. Ohne No-CD gehts gar nicht.
Hier der Auszug aus meiner tclerrors.txt:
Error(3401):can't unset "attribs": no such variable
while executing
"unset attribs materials tools fail item cn tttsection_tocall ttfile expfile explst":
proc MakeTTEntry {file name materials tools places attribs} {
set category [get_class_category $name]
set type [get_class_type $name]
set era [get_class_era $name]
set flags [get_class_flags $name]
puts $file "{\n$name $category $type $era $flags\n"
puts $file "// Materials\n{$materials}"
puts $file "// Tools\n{$tools}"
puts $file "// Places\n{$places}"
puts $file "// Attribs\n{$attribs}"
puts $file "}\n"
}
proc MakeExpEntry {file attribs atrlst} {
set bitwert 0
for {set i 0} {$i<[llength $atrlst]} {incr i} {
if [string match "*[lindex $atrlst $i]*" $attribs] {
set bitwert [expr int($bitwert+pow(2,$i))]
}
}
set firstwert $bitwert
if {2<[llength $attribs]} {
for {set i 0} {$i<[llength $atrlst]} {incr i} {
if {int(pow(2,$i))&$firstwert} {
lappend bitwert [expr int(pow(2,$i))^$firstwert]
}
}
}
if [string index $bitwert 0] {
foreach nextwert $bitwert {
seek $file 0 start
if {-1==[lsearch [gets $file] $nextwert]} {
seek $file 0 end
puts -nonewline $file "$nextwert "
}
}
}
}
set ttfile [open "data/scripts/gameplay/gen_tt.tcl" w]
set expfile [open "data/scripts/gameplay/gen_exp.lst" w+]
puts -nonewline $expfile "1 2 4 8 16 32 64 128 "
set explst "[get_expattrib 0] atr_Kampf"
# [catch {}] == 0 -> okay
foreach cn [ClassList] {
#log "Class: $cn\n";
if { ![regexp {^CObj*|^CTclRoot*} $cn] } {
# log "Testing Class: $cn\n";
set fail [catch {
set items [call_method_static $cn prod_items]
}]
if {$fail==0} {
# log "Techtree Class: $cn\n";
# log "$cn $items\n";
foreach item $items {
# log " Item: $item\n";
if {[string first [get_class_type $cn] "productionstoreenergyprotection"]!=-1&&[string first $cn "Zelt"]==-1} {
set tttsection_tocall $item
call scripts/misc/techtreetunes.tcl
set materials [subst \$tttmaterial_$item]
set tools [subst \$tttinfluence_$item]
set attribs [subst \$tttinvent_$item]
catch {unset tttmaterial_$item tttinvent_$item tttgain_$item tttinfluence_$item}
catch {unset tttpreinv_$item tttitems_$item}
catch {unset tttenergycons_$item}
catch {unset tttenergyrange_$item tttenergyvalue_$item tttenergystore_$item tttenergyminstore_$item tttenergyyield_$item}
catch {unset tttnumber2produce_$item}
} else {
set materials [call_method_static $cn prod_item_materials $item]
set tools
- # log " materials: $materials\n";
if { [check_method $cn prod_item_attribs] } {
set attribs [call_method_static $cn prod_item_attribs $item]
} else {
set attribs- }
}
set matlist $materials
set materials ""
set donelist ""
foreach mattype $matlist {
if {[lsearch $donelist $mattype] < 0} {
lappend donelist $mattype
foreach listitem $matlist {
if {$listitem == $mattype} {
lappend materials $listitem
}
}
}
}
MakeTTEntry $ttfile $item $materials $tools [list $cn] $attribs
MakeExpEntry $expfile $attribs $explst
}
}
}
}
close $ttfile
seek $expfile 0 start
log "[llength [gets $expfile]] Attributkombinationen zum Erfinden nötig!"
close $expfile
unset attribs materials tools fail item cn tttsection_tocall ttfile expfile explst
Error(2550):can't unset "attribs": no such variable
while executing
"unset attribs materials tools fail item cn tttsection_tocall ttfile expfile explst"
invoked from within
"call scripts/init/makettree.tcl":
log "parse systeminit script"
log "minimal:[minimalrun]"
# log_mask -* +system +tclerror +gui
;# logmod Tcl ;# print only Tcl logs
logdebug off
if { ![minimalrun] } {
call scripts/init/customcommands.tcl
}
set info "[lmsg Language] Full version"
log "Loading $info"
set_run_info $info
;# useful procedures
proc ? { args } { print [eval {$args}] }
call scripts/init/shader.tcl
call scripts/init/txtinit.tcl
call scripts/init/animinit.tcl
call scripts/init/classinit.tcl
load_info "[lmsg "Classes done"]"
if { ![minimalrun] } {
call scripts/init/soundinit.tcl
load_info "[lmsg "Soundinit done"]"
call scripts/init/adaptiveinit.tcl
load_info "[lmsg "Musicinit done"]"
call scripts/init/lginit.tcl
load_info "[lmsg "LGInit done"]"
call scripts/init/talkinit.tcl
call scripts/init/claninit.tcl
call scripts/init/makettree.tcl
init_techtree scripts/gameplay/gen_tt.tcl
load_info "[lmsg "Techtree done"]"
}
if { ![minimalrun] } {
call scripts/init/fight.tcl
load_info "[lmsg "Fightinit done"]"
}
#log "initializing artificial inteligence"
ai init 0 data/scripts/ai/std_ai.tcl
set aideflevel [perfoptions playeraidefault]
if { $aideflevel != 0 } {
log "ai enabled"
ai enable 0
}
#log "AI initialized"
;# create map and excute procedure gameinit
# map create 128 128 { }
map create 64 64 { }
# call data/gamesave/preset_Urwald.tcl
# call data/gamesave/preset_Urwald_a.tcl
if { [file exists data/userstartup.tcl] } {
call userstartup.tcl
} else {
if { ![minimalrun] && ![get_mapedit] } {
call data/templates/unq_menue.tcl
MapTemplateSet 25 28
call templates/urw_gng_021_a.tcl
MapTemplateSet 21 40
call templates/urw_gng_022_a.tcl
MapTemplateSet 45 40
set_view 32.368 40.858 1.38 -0.355 0.165 ;# set inital camera view (x y zoom)
sel /obj
set FR [new FogRemover]
set pos { 32.368 39.5 10 }
set_pos $FR [vector_add $pos {0 0 0}]
call_method $FR fog_remove 0 50 50
call_method $FR timer_delete -1
adaptive_sound marker menue $pos
adaptive_sound primary menue
sel /obj
set ts [new Trigger_StartScreen]
call_method $ts validate
call_method $ts disable_logging
} else {
perfoptions simplecontrol 0
}
gui_new_game
}
show_loading no
gametime start
load_done
log "systeminit script succesfully parsed"
Mein System:
AMD Phenom II X4 965, 8 GB Gddr³ Ram, Sapphire Radeon HD 7870 Ghz Edition 2 GB GDDR5 RAM, Sound Realtek onBoard, Windows 8 64bit pro.
- }
Re: Windows 8
In welchem Ordner hast Du das Spiel installiert?
Kamen während der Installation irgendwelche Fehlermeldungen?
Hast Du das Spiel von einer Original-CD installiert?
LG Arthur
Kamen während der Installation irgendwelche Fehlermeldungen?
Hast Du das Spiel von einer Original-CD installiert?
LG Arthur
Re: Windows 8
Das Thema ist zwar schon etwas älter, aber ich habe meine Wiggles leider erst jetzt wieder herausgekramt und stehe vor einem neuen Problem.
Ich habe alle Anweisungen befolgt, wie sie hier stehen. Das einzige was ich nicht ändern kann ist die zwerge.tcl Datei. Wenn ich was eingegeben habe und speichern will, bekomme ich die Meldung, ich hätte keine Schreibberechtigung.
Nach Überprüfung meines Nutzerkontos stelle ich jedoch fest, dass ich (wie nicht anders zu erwarten) Administrator bin, da einziges Benutzerkonto. Oh Wunder. Auch wenn ich unter zwerge.tcl Einstellungen eingebe, dass die in der Datei rumgeschrieben werden darf, funktioniert das mit dem Speichern nicht.
Habe dennoch einfach mal versucht das Spiel zu starten.
Über den Ladebildschirm komme ich allerdings nicht hinaus. Bekomme dann die Meldung, dass ein Problem aufgetreten sei und das Programm jetzt beendet wird.
Und nun?
Liegt es vielleicht an Windows 8.1?
Ich habe alle Anweisungen befolgt, wie sie hier stehen. Das einzige was ich nicht ändern kann ist die zwerge.tcl Datei. Wenn ich was eingegeben habe und speichern will, bekomme ich die Meldung, ich hätte keine Schreibberechtigung.
Nach Überprüfung meines Nutzerkontos stelle ich jedoch fest, dass ich (wie nicht anders zu erwarten) Administrator bin, da einziges Benutzerkonto. Oh Wunder. Auch wenn ich unter zwerge.tcl Einstellungen eingebe, dass die in der Datei rumgeschrieben werden darf, funktioniert das mit dem Speichern nicht.
Habe dennoch einfach mal versucht das Spiel zu starten.
Über den Ladebildschirm komme ich allerdings nicht hinaus. Bekomme dann die Meldung, dass ein Problem aufgetreten sei und das Programm jetzt beendet wird.
Und nun?
Liegt es vielleicht an Windows 8.1?
Re: Windows 8
Wie gesagt, ich habe mich an die instalationsanweisung gehalten und auch die setmode heruntergeladen und eingefügt.
Re: Windows 8
Kannst du den Schreibschutz vom gesamten Ordner entfernen?
Auf die Dateien wird ja zugegriffen - somit sollten diese auch Lese- und Schreibrechte haben.
LG Arthur
Auf die Dateien wird ja zugegriffen - somit sollten diese auch Lese- und Schreibrechte haben.
LG Arthur
-
KillermuffinLP
- Beiträge: 1
- Registriert: Do 31. Jul 2014, 22:03
Re: Windows 8
Du musst entweder im Fenstermodus spielen Oder dein bildschirm ist bis 1280x1024 pixel groß dann müsste es klappen hab auch win 8
-
BringerOfDoom
- Beiträge: 3
- Registriert: Do 18. Sep 2014, 14:38
Re: Windows 8
Hallo Leute
Habe das gleiche Problem wie Tammy25 mit dem Crash vor Erreichen des Hauptmenüs nachdem ich alles gemäß Vorschrift im FixWiggles-Ordner (http://wiggles.ruka.at/forum/viewtopic.php?f=2&t=66 Post von Rangordo) gemacht habe
wenn ich alle Änderungen wieder rückgängig mache (originale tcl's usw.) kann ich zwar spielen aber ohne Sprachausgabe in den Clips im Spiel (Intro läuft Einwandfrei nach den Tips von Rangordo). Kann uns/mir da jemand helfen? ? Die Sache mit der Bildschirmauflösung von 1280x1024 habe ich auch erfolglos probiert .Meine Systemdaten: OS: Win7 Pro SP1, GraKa: Radeon HD 7870 OC, Mainboar: ASRock Z68 Extreme4 Gen3, CPU: Intel Core i5 2500K 4x 3.30GHz
Habe das gleiche Problem wie Tammy25 mit dem Crash vor Erreichen des Hauptmenüs nachdem ich alles gemäß Vorschrift im FixWiggles-Ordner (http://wiggles.ruka.at/forum/viewtopic.php?f=2&t=66 Post von Rangordo) gemacht habe
wenn ich alle Änderungen wieder rückgängig mache (originale tcl's usw.) kann ich zwar spielen aber ohne Sprachausgabe in den Clips im Spiel (Intro läuft Einwandfrei nach den Tips von Rangordo). Kann uns/mir da jemand helfen? ? Die Sache mit der Bildschirmauflösung von 1280x1024 habe ich auch erfolglos probiert .Meine Systemdaten: OS: Win7 Pro SP1, GraKa: Radeon HD 7870 OC, Mainboar: ASRock Z68 Extreme4 Gen3, CPU: Intel Core i5 2500K 4x 3.30GHz
Besten Dank schonmal vorabTammy25 hat geschrieben: Hier der Auszug aus meiner tclerrors.txt:
Error(3401):can't unset "attribs": no such variable
while executing
"unset attribs materials tools fail item cn tttsection_tocall ttfile expfile explst":
proc MakeTTEntry {file name materials tools places attribs} {
set category [get_class_category $name]
set type [get_class_type $name]
set era [get_class_era $name]
set flags [get_class_flags $name]
puts $file "{\n$name $category $type $era $flags\n"
puts $file "// Materials\n{$materials}"
puts $file "// Tools\n{$tools}"
puts $file "// Places\n{$places}"
puts $file "// Attribs\n{$attribs}"
puts $file "}\n"
}
proc MakeExpEntry {file attribs atrlst} {
set bitwert 0
for {set i 0} {$i<[llength $atrlst]} {incr i} {
if [string match "*[lindex $atrlst $i]*" $attribs] {
set bitwert [expr int($bitwert+pow(2,$i))]
}
}
set firstwert $bitwert
if {2<[llength $attribs]} {
for {set i 0} {$i<[llength $atrlst]} {incr i} {
if {int(pow(2,$i))&$firstwert} {
lappend bitwert [expr int(pow(2,$i))^$firstwert]
}
}
}
if [string index $bitwert 0] {
foreach nextwert $bitwert {
seek $file 0 start
if {-1==[lsearch [gets $file] $nextwert]} {
seek $file 0 end
puts -nonewline $file "$nextwert "
}
}
}
}
set ttfile [open "data/scripts/gameplay/gen_tt.tcl" w]
set expfile [open "data/scripts/gameplay/gen_exp.lst" w+]
puts -nonewline $expfile "1 2 4 8 16 32 64 128 "
set explst "[get_expattrib 0] atr_Kampf"
# [catch {}] == 0 -> okay
foreach cn [ClassList] {
#log "Class: $cn\n";
if { ![regexp {^CObj*|^CTclRoot*} $cn] } {
# log "Testing Class: $cn\n";
set fail [catch {
set items [call_method_static $cn prod_items]
}]
if {$fail==0} {
# log "Techtree Class: $cn\n";
# log "$cn $items\n";
foreach item $items {
# log " Item: $item\n";
if {[string first [get_class_type $cn] "productionstoreenergyprotection"]!=-1&&[string first $cn "Zelt"]==-1} {
set tttsection_tocall $item
call scripts/misc/techtreetunes.tcl
set materials [subst \$tttmaterial_$item]
set tools [subst \$tttinfluence_$item]
set attribs [subst \$tttinvent_$item]
catch {unset tttmaterial_$item tttinvent_$item tttgain_$item tttinfluence_$item}
catch {unset tttpreinv_$item tttitems_$item}
catch {unset tttenergycons_$item}
catch {unset tttenergyrange_$item tttenergyvalue_$item tttenergystore_$item tttenergyminstore_$item tttenergyyield_$item}
catch {unset tttnumber2produce_$item}
} else {
set materials [call_method_static $cn prod_item_materials $item]
set tools
- # log " materials: $materials\n";
if { [check_method $cn prod_item_attribs] } {
set attribs [call_method_static $cn prod_item_attribs $item]
} else {
set attribs
- }
}
set matlist $materials
set materials ""
set donelist ""
foreach mattype $matlist {
if {[lsearch $donelist $mattype] < 0} {
lappend donelist $mattype
foreach listitem $matlist {
if {$listitem == $mattype} {
lappend materials $listitem
}
}
}
}
MakeTTEntry $ttfile $item $materials $tools [list $cn] $attribs
MakeExpEntry $expfile $attribs $explst
}
}
}
}
close $ttfile
seek $expfile 0 start
log "[llength [gets $expfile]] Attributkombinationen zum Erfinden nötig!"
close $expfile
unset attribs materials tools fail item cn tttsection_tocall ttfile expfile explst
Error(2550):can't unset "attribs": no such variable
while executing
"unset attribs materials tools fail item cn tttsection_tocall ttfile expfile explst"
invoked from within
"call scripts/init/makettree.tcl":
log "parse systeminit script"
log "minimal:[minimalrun]"
# log_mask -* +system +tclerror +gui
;# logmod Tcl ;# print only Tcl logs
logdebug off
if { ![minimalrun] } {
call scripts/init/customcommands.tcl
}
set info "[lmsg Language] Full version"
log "Loading $info"
set_run_info $info
;# useful procedures
proc ? { args } { print [eval {$args}] }
call scripts/init/shader.tcl
call scripts/init/txtinit.tcl
call scripts/init/animinit.tcl
call scripts/init/classinit.tcl
load_info "[lmsg "Classes done"]"
if { ![minimalrun] } {
call scripts/init/soundinit.tcl
load_info "[lmsg "Soundinit done"]"
call scripts/init/adaptiveinit.tcl
load_info "[lmsg "Musicinit done"]"
call scripts/init/lginit.tcl
load_info "[lmsg "LGInit done"]"
call scripts/init/talkinit.tcl
call scripts/init/claninit.tcl
call scripts/init/makettree.tcl
init_techtree scripts/gameplay/gen_tt.tcl
load_info "[lmsg "Techtree done"]"
}
if { ![minimalrun] } {
call scripts/init/fight.tcl
load_info "[lmsg "Fightinit done"]"
}
#log "initializing artificial inteligence"
ai init 0 data/scripts/ai/std_ai.tcl
set aideflevel [perfoptions playeraidefault]
if { $aideflevel != 0 } {
log "ai enabled"
ai enable 0
}
#log "AI initialized"
;# create map and excute procedure gameinit
# map create 128 128 { }
map create 64 64 { }
# call data/gamesave/preset_Urwald.tcl
# call data/gamesave/preset_Urwald_a.tcl
if { [file exists data/userstartup.tcl] } {
call userstartup.tcl
} else {
if { ![minimalrun] && ![get_mapedit] } {
call data/templates/unq_menue.tcl
MapTemplateSet 25 28
call templates/urw_gng_021_a.tcl
MapTemplateSet 21 40
call templates/urw_gng_022_a.tcl
MapTemplateSet 45 40
set_view 32.368 40.858 1.38 -0.355 0.165 ;# set inital camera view (x y zoom)
sel /obj
set FR [new FogRemover]
set pos { 32.368 39.5 10 }
set_pos $FR [vector_add $pos {0 0 0}]
call_method $FR fog_remove 0 50 50
call_method $FR timer_delete -1
adaptive_sound marker menue $pos
adaptive_sound primary menue
sel /obj
set ts [new Trigger_StartScreen]
call_method $ts validate
call_method $ts disable_logging
} else {
perfoptions simplecontrol 0
}
gui_new_game
}
show_loading no
gametime start
load_done
log "systeminit script succesfully parsed"
Re: Windows 8
Wenn du rausfindest, in welcher tcl der Fehler auftritt, kann ich dir diese Datei hochladen.
LG Arthur
LG Arthur