gtasase, Sh? Я наверное отстал, но што ето? Юзай spritehit

Maxxxl123, Spritehit сокращенно sh

gtasase, Bчитался, поржал, then expected near , вау , они хотят штоб ты поставил then

gtasase, if sh(bla, bla) = 1 then..

Всем спасибо ошибку нашол сам

Подскажите как сделать сохранение в разных кодировках?

MoonDX9, Читай википедию и реализуй алгоритм)
Работа с текстом.
Везде использую переменную F
$.
Открываем текст из
файловой системы:
0 F$=""
1 OPEN #1,"file:///c:/other/
win1251.txt","inрut"
2 TRAP 7
3 GET #1,BAIT%
4 IF BAIT%<0 THEN BAIT%=BAIT%
+1104
5 F$=F$+CHR$(BAIT%)
6 GOTO 3
7 CLOSE #1
__________
Сохранить в кодировке utf-8:
1 OPEN #1,"file:///c:/other/
utf8.txt","output"
2 FOR I%=1 TO LEN(F$)
3 PUT #1,ASC(MID$(F$,I%,1))
4 NEXT I%
5 CLOSE #1
__________
З.Ы. Русский текст так не
сохранишь.
Русский текст
надо в win1251 сохранять.
Это делается вот так:
та же переменная F$:
1 OPEN #1,"file:///c:/other/
win1251.txt","OUTPUT"
2 FOR I%=1 TO LEN(F$)
3 SC%=ASC(MID$(F$,I%,1))
4 FOR SWA%=1104 TO 1040 STEP
-1
5 IF SC%=SWA% THEN SC%=SC
%-848:GOTO 7
6 NEXT SWA%
7 PUT #1,SC%
8 NEXT I%
9 CLOSE #1

MoonDX9, Сейчас с явы портанул

kiriman, Большое спасибо))

А вот есть же команда, которая случайные числа выдает, а как сделать, чтобы вместо чисел слова были?