changeset 3377 | a3f0849f26bc |
parent 3365 | 37ac593e9027 |
child 3381 | f8800c44b3de |
3376:faee68a28b82 | 3377:a3f0849f26bc |
---|---|
766 |
766 |
767 ScreenFade := sfNone; |
767 ScreenFade := sfNone; |
768 {$IFDEF DEBUGFILE} |
768 {$IFDEF DEBUGFILE} |
769 {$I-} |
769 {$I-} |
770 {$IFDEF IPHONEOS} |
770 {$IFDEF IPHONEOS} |
771 f:= stderr; |
771 Assign(f,'../Documents/debug.txt'); |
772 Rewrite(f); |
|
772 {$ELSE} |
773 {$ELSE} |
773 if ParamStr(1) <> '' then |
774 if ParamStr(1) <> '' then |
774 begin |
775 begin |
775 for i:= 0 to 7 do |
776 for i:= 0 to 7 do |
776 begin |
777 begin |