Yes the error looks like that. I'm not coming much further without knowing what variable is causing the problem.
The error is probably caused by something in my JSON script:
/* data_add_from_json(data,jsonstr) * Add data from JSON. */ var data,jsonstr,jsonlen,level,_char,i,str,endchar,control,searchname,_str; data=argument[0] jsonstr=argument[1]
with(data) { jsonlen=string_length(jsonstr) level=1 array=(string_char_at(jsonstr,1)="[") searchname=!array i=1 while(i<=string_length(jsonstr)) { _char=string_char_at(jsonstr,i) //show_message(searchname*"Searching name..."+"#"+string_copy(jsonstr,i-7,7)) if _char="," { if !array searchname=1 i+=1 } else if string_pos(_char,"-1234567890.") { str=_char i+=1 _char=string_char_at(jsonstr,i) while(string_pos(_char,"1234567890.")) { str+=_char i+=1 _char=string_char_at(jsonstr,i) } value[length]=real(str) length+=1 } else if string_pos(_char,"abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ_1234567890$") { str="" while(string_pos(_char,"abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ_1234567890$")) { str+=_char i+=1 _char=string_char_at(jsonstr,i) } if str="true" str=1 else if str="false" str=0 else if str="ord" { if string_char_at(jsonstr,i+1)="(" { i+=2 endchar=string_char_at(jsonstr,i) i+=1 control=0 _char=string_char_at(jsonstr,i) while(_char!=endchar&&i<=string_length(jsonstr)) { if _char="\" control=1 else { if control { if _char="r" str+=chr(13) else if _char="n" str+=chr(10) else if _char="t" str+=chr(9) else if _char="\" str+="\" else if _char='"' str+='"' else str+="\"+_char control=0 } else str+=_char } i+=2 _char=string_char_at(jsonstr,i) } i+=1 _char=string_char_at(jsonstr,i) str=ord(str) } } else if string_copy(str,1,3)="vk_" { if str="vk_control" str=vk_control else if str="vk_alt" str=vk_alt else if str="vk_shift" str=vk_shift else if str="vk_rcontrol" str=vk_rcontrol else if str="vk_ralt" str=vk_ralt else if str="vk_rshift" str=vk_rshift else if str="vk_lwin" str=vk_lwin else if str="vk_rwin" str=vk_rwin else if str="vk_space" str=vk_space } if !searchname { value[length]=str length+=1 } else name[length]=str searchname=0 } else if _char='"'||_char="'" { endchar=_char i+=1 _char=string_char_at(jsonstr,i) str="" control=0 if endchar='"' while((_char!=endchar||control)&&i!=jsonlen) { if _char="\" control=1 else { if control { if _char="r" str+=chr(13) else if _char="n" str+=chr(10) else if _char="t" str+=chr(9) else if _char="\" str+="\" else if _char='"' str+='"' else str+="\"+_char control=0 } else str+=_char } i+=1 _char=string_char_at(jsonstr,i) } else while(_char!=endchar&&i!=jsonlen) { str+=_char i+=1 _char=string_char_at(jsonstr,i) } if !searchname { value[length]=str length+=1 } else name[length]=str searchname=0 i+=1 _char=string_char_at(jsonstr,i) } else if _char="{"&&i!=1 { i+=1 _char=string_char_at(jsonstr,i) value[length]=data_from_json(string_copy(jsonstr,i,string_length(jsonstr)-i+1),id) length+=1 i+=skip } else if _char="}"||_char="]" { if argument[2]!=0 argument[2].skip=i break } else if _char="["&&i!=1 { value[length]=data_from_json(string_copy(jsonstr,i,string_length(jsonstr)-i+1),id) length+=1 i+=skip } else i+=1 } return id; } If I press Ignore 4 times, the script ends. Maybe you could do something with that?
|