= 0x81 && $ code1 <= 0xfE && $ code2> = 0x40 && $ code2 <= 0xfE && $ code2! = 0x7f) // Check if it is GBK Character $ Output. = Substr ($ Str, $ I , 2). $ INSERT ELSE IF ($ code1 == 0xd && $ code2 == 0xa) // Check if it is a carriage return $ Output. = SUBSTR ($ STR) $ I , 2); ELSE // Normal character $ output. = STR [$ I]. $ INSERT;} Return Substr ($ OTPUT, 0, Strlen ($ OUTPUT) -STRLEN ($ INSERT));}? >
