ZX-Ревю 1995 №2 - Спектрум в школе

ZX-Ревю 1995 №2

1994 г.

Спектрум в школе - Окна.

   (С) Вадим Пыльцов, г.Надым.      
                                    
              Окна.                 
                                    
   Эта программа,  строящая  "ок-   
на", может   быть   полезна   для   
оформления диалога  (меню) в сис-   
темах, создаваемых Вами.            
                                    
   10 REM WINDOWS                   
   20 LET X=3: LET Y=3: LET W=12:   
  LET H=8: LET V=1                  
   30 GO SUB 1000                   
   40 STOP                          
 1000 REM X,Y,W,H,V                 
 1010 LET T$="/": LET M$="/": LET   
  B$="Ы"                            
 1030 LET V$=""                     
 1040 FOR I=1 TO W                  
 1050 LET T$=T$+"/"                 
 1060 LET M$=M$+" "                 
 1070 LET B$=B$+"Ы"                 
 1080 NEXT I                        
 1090 LET T$=T$+"/": LET M$=M$+"/   
 "                                  
 1100 LET B$=B$+"Ы"                 
 1105 LET V$="": IF V=0 THEN  GO    
 TO 1500                            
 1110 FOR I=1 TO V                  
 1120 LET V$=V$+"ЫЫ"              
 1130 NEXT I                      
 1500 PRINT AT Y,X;T$             
 1510 FOR I=1 TO H                
 1520 PRINT AT Y+I,X;M$;: IF I>=V 
  THEN  PRINT V$                  
 1530 NEXT I                      
 1540 PRINT AT Y+I,X;T$;V$        
 1550 IF V=0 THEN  RETURN         
 1560 FOR I=1 TO V                
 1570 PRINT AT Y+H+I+1,X+V*2;B$   
 1580 NEXT I                      
 1590 RETURN                      
                                  
   В строке 20 задаются следующие 
параметры (в знакоместах):  X и Y 
- координаты верхнего левого угла 
окна; W - ширина окна; H - высота 
окна;  V -  ширина  отбрасываемой 
тени. В строках 1010, 1070, 1100, 
1120 используется символ  блочной 
графики CHR$ 143. В целом это до- 
вольно эффектная программа, кото- 
рую можно использовать почти вез- 
де,  модернизируя те или иные  ее 
части по мере надобности.

СОДЕРЖАНИЕ:

Темы: Игры, Программное обеспечение, Пресса, Аппаратное обеспечение, Сеть, Демосцена, Люди, Программирование

AD&D - начальные характеристики героев: Шаман.

Кодинг - Приведу быстрейшую процедуру вывода инверченной маски шириной в 2 знакоместа...

Тайник - глюки Sea Quest на Profi.

Demo scene - idiot by skrju: демо, показанное в калининграде на выставке ascii-работ группы galza.

В этот день... 1 января

SibNews #08, Woot! #01, Spectrum Magazine #01, ACNews #25, Psychoz #14, ACNews #14, Last 128 #08, Last 128 #06, Last 128 #05, Last 128 #04, Last 128 #03, Last 128 #02, Last 128 #09, Last 128 #3.5, Last 128 #8.025, Sinclair Club #05, Last 128 #M!R 01, Fantadrom #01, Buzz #20, Last 128 #01, DonNews #13, Nicron #120, Promised Land #01, Inferno #01, Marazm #25, Ultimathum #01, Marazm #21, Hooy Mag #02, KrNews #11, Marazm #22, Marazm #23, ZX Football 2000 #01, Codemania #01, Always #03, Bugs #02, IzhNews #08, Virtual Worlds #01, Listok #04, Scenergy #02, Flash Info #18, Marazm #16, Marazm #17, Zed #01, Balagan #02, ZX Format #08, ZX Power #03, Shock #01, Impulse #02, Deja Vu #03, ZX Club #08, ZX Club #06, Numberology #01, Marazm #13, Marazm #12, Marazm #14, Gorodok #02, Zodiac #01, Marazm #15, Deja Vu #07, Marazm #11, Deja Vu #07, Playboy #03, Crazy News #2, Crazy News #4, ZX Light #01, Crazy News #5, Playboy #02, ZX News #03, ZX Review #1-2, Read Me #02, Crazy News #3, Nicron #13, Read Me #01, Public Spirit #01, Faultless #06, Faultless #05, ZX Software #01, Stump #04, Speccy #07, Возраждение #0, Speccy #03, On-Line #17, Scene+ #01, Welcome Press #01, ZX Konig #04, Adventurer #01, Faultless #05, Faultless #04, Di Halt #01, Faultless #01, Playboy #01, Crazy News #1, Faultless #03, Pioneer #03, Sinclair Town #02, ZX Magazine #01, Eldorado #01, ZX Magazine #02, Spectron #01, ZX News #01, ZX Konig #02, 200 #W, Welcome Press #00, Dune #07, Subliminal Extacy #01, Subliminal Extacy #02, ZX Konig #01, Subliminal Extacy #00, Muchomor #01, Spectrofon #01, ZX Revija #02, Outlet #01, Outlet #1-3