Hirdetés
- Xiaomi 15T - reakció nélkül nincs egyensúly
- Telekom mobilszolgáltatások
- Mobil flották
- Szívós, szép és kitartó az új OnePlus óra
- Samsung Galaxy S25 - végre van kicsi!
- Xiaomi 14T Pro - teljes a család?
- Beköltözik a platformköltözés az iOS-be és az Androidba
- Honor Magic6 Pro - kör közepén számok
- Okosóra és okoskiegészítő topik
- Ezek a OnePlus 12 és 12R európai árai
Új hozzászólás Aktív témák
-
szandisas
őstag
-
szandisas
őstag
válasz
Rover623
#1770
üzenetére
''If (betu>='a') and (betu<='z') then dec(betu,ord('a')-ord('A'));''
ezt naggyából értem... valami normális leírást tudsz nekem linkelni ahol meg tudom tanulni ? év végén vizsga lesz, csak egy kettesre hajtok
MOD:
erre ez volt a tanár példája:
Var
ch : Char;
Begin
ch:=UpCase('a'); {ch = 'A'}
[Szerkesztve] -
Rover623
félisten
-
Gyuri16
senior tag
válasz
Rover623
#1276
üzenetére
veletlenul ezekhez nincs valami programod amibol megnezhetnem hogyan mukodik. Gondolok konkretan foleg az elso pontra, mert at sikerult kapcsolnom masik ablakba, de az valahogyan eltolta az elsot (nem tudom ertelmesen elmondani, kaptam egy mask ablakot, de az elso reszei valahogy benne voltak, csak eltolva), es nem igazan tudtam vele semmit se kezdeni.
-
Gyuri16
senior tag
válasz
Rover623
#1276
üzenetére
koszi, probalom a setviewportot, de nem teljesen megy. Graphresultba 11 es hibakodot kapok (Graphics error). Tudod mit jelenthet ez?
amit akarok csinalni: rajzolo program: font es lent menu, paletta stb.. azt akarom, hogy ha kort huzok, akkor az semmikepp se logjon bele. -
Lortech
addikt
válasz
Rover623
#1055
üzenetére
Én megnéztem egy sokszor lefutó ciklusba ágyazva, hogy inc(x); inc(x); vagy pedig x:=x+2 fut le gyorsabban, és majdnem kétszer gyorsabb volt az utóbbi. A konkrét feladatot is, ha leírod két inc-cel és x:=x+2-vel is, csak a szemléletesség kedvéért nagyobb elemszámmal, akkor az x:=x+2 a gyorsabb, szóval...
Nyilván csak akkor fordítódik inc-re, hogyha 8/16bites operandusokkal dolgozunk, mivel 8086 rendszer 8086-os fordítóban nincs 32bites inc.
INC(A,B)- nek nem néztem utána, de úgy gondoltam, hogy ugyanaz mintha B-szer inc(A)-t írtam volna, de így kifejezetten inc-ekre fordítja, nem add-ra.
Hogy őszinte legyek, nincs kedvem visszafordítgatni, aztán kibogarászni, de hétvégén megnézem majd, mikor rendelkezésre állnak a megfelelő eszközök (most gépteremből netezek.
).
''A különbség:
Inc(A,B) esetén a B-t betölti az akkumulátorba és az aksit közvetlenül adja az A változóhoz.''
Ezt nem nagyon értem egyébként, azt mondod, hogy van két operandusú inc, ami a leírt módon m
működik, vagy hogy fordítódik le ez, ha nem? -
QuarK
senior tag
válasz
Rover623
#1055
üzenetére
Érdekes; amit írsz, annak alapján tényleg az Inc() gyorsabb lenne, mint a sima összeadás, de mikor ciklusokban alkalmaztam (pl. textúrarajzolás, collision-detection, stb., tehát ami a program futási idejének 90%-át legalább mindig vitte), ott jó pár frame/sec-et javított, ha az összes Inc() utasítást kicseréltem sima mezei x := x + n;-re. Csak próbaképpen legeneráltam 1 millió képkockát, többször egymás után mindkét módszert alkalmazva, és nekem az utóbbi vált be, jóval gyorsabbnak bizonyult.
Gondolom, hogy (talán, nem akarok hülyeséget mondani) a processzor cache valahogy hatékonyabban hajtja végre -- vagy lövésem sincs.
megj.: véletlenszámokat nem használt a teszt, így mindig ugyanazt kellett végrehajtania; + két teszt között mindig restartolva volt a gép.
[Szerkesztve] -
Jester01
veterán
-
Lortech
addikt
válasz
Rover623
#1027
üzenetére
Ha csak nagyjából, akkor jöhet egy jobb megoldás, hadd tanuljak. (komolyan)
Ha +1-et kellett volna hozzáadni (ez sok esetben gyorsabb, mint az add, bár nem minden esetben), akkor ok, de +2-nél biztos vagy benne, hogy gyorsabb és hatékonyabb a két inc? Emlékeimt szerint nem.. -
-
QuarK
senior tag
válasz
Rover623
#565
üzenetére
Felőlem jöhet egy két ínyencség... Bár cserébe nem sokat tudok ajánlani... Amikor öcsike ismerkedett az fdisk-kel, akkor a 2001 előtti cuccosaim mind odavesztek, kivéve egy-két dolgot, ami a régi 286-oson megmaradt, nagymamánál...
De azért akad: xms, pcx betöltés, max. 256 byte hosszú kulccsal való tömörítés (crytp, decrypt), crc ellenőrzés, planéták térbeli helyzetét kiszámító, majd állatövön elhelyező (aka. horoszkóp készítő) progi...
Jah, és most jön a gonoszkodás![;]](//cdn.rios.hu/dl/s/v1.gif)
Bár ez pascal totyik, azért itt megjelenítem a témához, és szerintem nem nagy cucc átportolni pascalra (bár kell vele bajlódni, az fix)
double pow( double y, double x)
{
typedef union
{
double d;
unsigned u[4];
} DBL;
double z, w, p, p2, q, re;
unsigned ex;
int iz;
DBL *yp, *zp, *wp;
yp = ( DBL*)&y;
if ( yp->d <= 0.0)
y = -y;
z = 0.0;
zp = ( DBL*)&z;
zp->u[3] = yp->u[3] & ~0100017;
iz = ( zp->u[3] >> 4) - 1023;
if (( yp->d - zp->d) == 0.0)
z = ( double)iz;
else
{
yp->u[3] -= ++iz << 4;
yp->d *= 1.4142135623730950488;
p = ( yp->d - 1.0) / ( yp->d + 1.0);
p2 = p * p;
z = p * ( 2.000000000046727 +
p2 * ( 0.666666635059382 +
p2 * ( 0.4000059794795 +
p2 * ( 0.28525381498 +
p2 * 0.2376245609))));
z = z * 1.442695040888634 + ( double)iz - 0.5;
}
z *= x;
w = 0.0;
wp = ( DBL*)&w;
if ( zp->d > 1023.0 || zp->d < -1023.0)
return ( 1E307);
iz = ( int)zp->d;
wp->u[3] += iz + 1023 << 4;
wp->u[3] &= ~0100017;
if (( zp->d -= ( double)iz) == 0.0)
return ( wp->d);
while ( zp->d < 0.0)
{
wp->u[3] -= 1 << 4;
wp->u[3] &= ~0100017;
zp->d++;
}
if ( zp->d >= 0.5)
{
zp->d -= 0.5;
re = 1.41421356237309504880;
}
else
re = 1.0;
p2 = zp->d * zp->d;
p = zp->d * ( 7.2152891511493 + p2 * 0.0576900723731);
q = 20.8189237930062 + p2 ;
zp->d = re * wp->d * ( q + p) / ( q - p);
return(zp->d);
}
).
Gondolom, hogy (talán, nem akarok hülyeséget mondani) a processzor cache valahogy hatékonyabban hajtja végre -- vagy lövésem sincs.
![;]](http://cdn.rios.hu/dl/s/v1.gif)
Kizártnak tartom, hogy az Inc bármit is betöltene az akkumulátorba... MOD2: kivéve, ha a B nem konstans. De lehet olyan Inc-et írni?
Új hozzászólás Aktív témák
- Dell latitude 5420 i5-1145G7/ 16gb ddr4/ 250gb m.2 SSD
- Dell XPS 9350 13.4 /16:10/FHD+1920x1200/Intel Core Ultra 5 GEN2 226V/16GB/512GB SSD/ÚJ
- Számítógép, Laptop, I3-7.gen, 8GB DDR4, 240GB ssd, magyar bill, 15,6"-os Full HD kép, gyári töltő
- Apple Iphone 12 64gb Zöld
- Újszerű ELITE Xbox One Kontroller Series 2
- Astro A50 4th Gen wireless + base station fejhallgató
- Új és használt laptopok , üzletitől a gamerig , kedvező áron. Garanciával !
- iPhone 13 mini 128GB Green -1 ÉV GARANCIA -Kártyafüggetlen, MS3896, 95% Akkumulátor
- Asus laptop E1504F Ryzen 3
- Bomba ár! Dell Latitude 7280 - i5-6GEN I 8GB I 256SSD I 12,5" HD I HDMI I Cam I W11 I Garancia!
Állásajánlatok
Cég: BroadBit Hungary Kft.
Város: Budakeszi
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest