w1k

July 12, 2014

ehm..total commander is only the one way on the planet for extracting archives......

fix normal method..

July 12, 2014

LOOOOOOOOL

INVALID ARCHIVE FILE.. NATIVE ERROR 0035

download oficial archive, then update..

LOOL

July 6, 2014

payed!

i will wait for eng

July 6, 2014

how to buy?

why deutch?

June 29, 2014

130XE, u1mb, SIDE II, sio2pc, xf551, bt-100 printer, dragon cart..

June 27, 2014



BYTE CL1=20, CL2=19, I

CARD J, TIME, SM, DL560

PROC TEST()

CL1=0

CL2=0

GRAPHICS(24)

COLOR(1)

FOR I=0 TO 191

DO

FOR J=0 TO 319

OD

PLOT (J,I)

OD

OD

SM=PEEKC(DL+4)

J=0

WHILE J<7680

DO

POKE(SM+J,0)

J==+1

OD

TIME=CL1+256*CL2

GRAPHICS(0)

PRINTE()

PRINT("CAS :")

PRINTC(TIME)

PRINTE("TAKTOV")







RETURN

June 27, 2014

some code still cant work

PROC DEMO2()
CARD A,B,C,D,X,Y,J,K,COL,I,Q
	Graphics(11)

  Poke(710,0)
  Color=00
  A=1 B=1 C=1 D=1
  X=Rand(70)+1
  Y=Rand(190)+1
  J=Rand(50)+1
  K=Rand(190)+1

  For I=1 TO 9400 
  DO
	 Plot(X,Y) 
	 Drawto(J,K)
	 Plot(J,Y) 
	 Drawto(X,K)
	 X==+A 
	 Y==+B 
	 J==+C 
	 K==+D 

	 Q=Rand(50)
	 IF Q>40 THEN  
		COL==+1  
	 FI  
	 IF COL>14 THEN 
		COL=1 
	 FI

	 COLOR=COL

	 IF X>=79 THEN A=-A X==+A  FI
	 IF J>=79 THEN C=-C J==+C FI
	 IF J<=0 THEN C=-C J==+C FI
	 IF X<=0 THEN A=-A X==+A FI
	 IF Y>=191 THEN B=-B Y==+B  FI
	 IF K>=191 THEN D=-D K==+D  FI
	 IF K<=0 THEN D=-D K==+D  FI
	 IF Y<=0 THEN B=-B Y==+B FI

  OD
RETURN