Category : Science and Education
Archive : BIRDBODY.ZIP
Filename : BIRD.BAS
Output of file : BIRD.BAS contained in archive : BIRDBODY.ZIP
É Ý:È , HY1((),HX1((),HY2((),HX2((),HY((),HX((),PRON$() 9 HEAD$(
),BODY$(),WING$(
),ORDER$(6),PASS$() ¤ Iç Ì
: HEAD$(I):: Iç Ì : BODY$(I): I: Iç Ì
: WING$(I): I: Iç Ì : ORDER$(I): I À# Iç Ì : PASS$(I): !( Iç Ì (: HY1(I): HX1(I): HY2(I): HX2(I): HY(I): HX(I): I: Iç Ì : PRON$(I): I 9P Pà :ÙBIRD CALL IZ ¹(TL): 0u ¢d ° (X1,Y1)ê(X2,Y2),:þ (X2,Y2),,:±é Þç"":²:Ê ,: ÿ():Ê ,: ÿ():Ê ,: Ðn Lçêÿ(ORDER$(I))ì:L1çêÿ(PRON$(I))ì ùo Ê ,: A2$;: Ræ Í ú :¡ #p FLAGç: FLAG1ç Í q :¡ è: r Yq @:Ê , : I;ORDER$(I)" (";PRON$(I);")": t r Ê ,L: ORDER$(I):Ê ,L1ê: "(";PRON$(I);")" ºt A$çÞ: A$ç"" Í t :¡ A$çÿ() Í FLAGç u FLAG1ç Í v :¡ Ê ,: ÿ('): Ê ,: ÿ(#):þ(X,Y),SCRN%: w v þ (È,2),SCRN% w Mx FLAGç:° (X1,Y1)ê(X2,Y2),:þ (X2,Y2),, |z A$çÞ: A$ç"" Í z :¡ A$çÿ() Í FLAGç | Ê ,: ÿ("):Ê , ~ ß ° (X1,Y1)ê(X2,Y2),:þ (X2,Y2),,: Ê ,: ÿ("):Ê ,: # ° (X1,Y1)ê(X2,Y2),:þ (X2,Y2),,: Ê ,: ÿ("):Ê ,: gª ° (X1,Y1)ê(X2,Y2),:þ (X2,Y2),,: Ê ,: ÿ("):Ê ,: È I%çÿ (ÿëPé): I%ç Í È Ò Ê ,: ÿ(") ªÜ :Ù-----> Ìæ Zçÿ (ÿëPé): Zç Í æ :¡ 6ú QçQê:Ä d,: Qèæ Í Ê ,: ÿ(');:Ê ,: R;"SILHOUETTES IN THIS ORDER-";Q;"LEFT";: "";: gÿ Ê ,: "Press any key to continue";ÿ( ); m Ê ,: "Press any key to continue";ÿ( );: ,COUNTç: È :A$ç"":B$ç"":Ê ,: HEAD$(I%):Ê ,: "Part Number?";ÿ();:Ê ,: "_ ";:Ê , ;. A$çÞ: A$ç"" Í . :¡ A$çÿ() Í FLAG ç: Q0 A$çÿ(
) Í @ 2B$çB$éA$: ÿ(B$)æ Í B$ç"":Ê ,: "_ ";:Ê ,: . 4 A$;: . ¼@A%çÿ(B$): A%çI% Í h TÄ -,:Ê ,: "_ ";:A$ç"":B$ç"":Ê ,,:COUNTçCOUNTé: COUNTç Í h :¡ . ChÊ ,: "The correct answer is:";I%;:Ê , r "Please press any key to continue";:±é Þç"":²:Ê ,: ÿ(#);:Ê ,: ÿ(&);: , COUNTç: È :A$ç"":B$ç"":Ê ,: BODY$(I%):Ê ,: "Part Number?";:Ê ,: "_ ";:Ê , 2 A$çÞ: A$ç"" Í :¡ A$çÿ() Í FLAGç: H A$çÿ(
) Í ¤ B$çB$éA$: ÿ(B$)æ Í B$ç"":Ê ,: "_ ";:Ê ,: A$;: ³¤A%çÿ(B$): A%çI% Í ¸Ä -,:Ê ,: "_ ";:A$ç"":B$ç"":Ê ,,:COUNTçCOUNTé: COUNTç Í Ì :¡ ;ÌÊ , : "The correct answer is:";I%:Ê , Ö "Please press any key to continue";:±é Þç"":²:Ê ,: ÿ( ):Ê ,: ÿ(&);: öôCOUNTç: È :A$ç"":B$ç"":Ê ,: WING$(I%):Ê ,: "Part Number?";:Ê ,: "_ ";:Ê , (ö A$çÞ: A$ç"" Í ö :¡ A$çÿ() Í FLAGç: >ø A$çÿ(
) Í }úB$çB$éA$: ÿ(B$)æ Í B$ç"":Ê ,: "_ ";:Ê ,: ö ü A$;: ö ©A%çÿ(B$): A%çI% Í ô ÿ Ä -,:Ê ,: "_ ";:A$ç"":B$ç"":Ê ,,:COUNTçCOUNTé: COUNTç Í 0 :¡ ö 00Ê , : "The correct answer is:";I%:Ê , : "Please press any key to continue";:±é Þç"":²:Ê , : ÿ( ):Ê ,: ÿ(&);: ô íXCOUNTç: È :A$ç"":B$ç"":Ê ,: WING$(I%);:Ê ,: "Part Number?";:Ê ,: "_ ";:Ê , Z A$çÞ: A$ç"" Í Z :¡ A$çÿ() Í FLAGç: 5\ A$çÿ(
) Í l t^B$çB$éA$: ÿ(B$)æ Í B$ç"":Ê ,: "_ ";:Ê ,: Z ` A$;: Z lA%çÿ(B$): A%çI% Í X öÄ -,:Ê ,: "_ ";:A$ç"":B$ç"":Ê ,,:COUNTçCOUNTé: COUNTç Í 0 :¡ Z ' Ê , : "The correct answer is:";I%:Ê , "Please press any key to continue";:±é Þç"":²:Ê , : ÿ( ):Ê ,: ÿ(&);: X Ò èÈ : (: SEG:ADDR%çÚ(SCRN%()):à PIC$,ADDR%: þ(X,Y),SCRN%,Æ: :Ù-----> òÈ : (: SEG:ADDR%çÚ(SN%()):à PIC$,ADDR%: þ(X,Y),SN%,Æ: :Ù-----> I ° SEG:ADDR%çÚ(SCRN%()):à PIC$,ADDR%: ÜÈ : (: SEG:ADDR%çÚ(SCRN%()):à PIC$,ADDR%: :Ù-----> Ï @ SEG:ADDR%çÚ(SCRN%()):à PIC$,ADDR%:þ (È,2),SCRN%: :Ù-----> - Ð Z Õ,Ú,ß,î, , ,%,*,C,H,a,,,,§,»,Å,Ù,ã,í,ü 9 ÑPIC$çF$ ? Ô T ÕF$ç"sill1.pic": i ÚF$ç"sill2.pic": w ßPç: È ¬ ä I%ç Í F$ç"sill3.pic" :¡ F$ç"sill3a.pic": » î Pç: È Û ó I%ç Í F$ç"sill4.pic" ü ø I%ç Í F$ç"sill4a.pic" ý I%ç Í F$ç"sill4b.pic" > I%ç Í F$ç"sill4c.pic" _ I%ç Í F$ç"sill4d.pic" I%ç Í F$ç"sill4E.pic" :Ù-------> ¡ Pç: È À I%ç Í F$ç"SILL5.PIC" à I%ç Í F$ç"SILL5A.PIC" I%ç Í F$ç"SILL5B.PIC" :Ù-------> ' F$ç"SILL6.PIC": < %F$ç"SILL7.PIC": J *Pç: È i / I%ç Í F$ç"SILL8.PIC" 4 I%ç Í F$ç"SILL8A.PIC" © 9 I%ç Í F$ç"SILL8B.PIC" » > :Ù-------> Ø CPç:F$ç"SILL9.PIC": È ø E F$ç"SILL9A.PIC": È : !HPç: È &!M I%ç Í F$ç"SILL10.PIC" G!R I%ç Í F$ç"SILL10A.PIC" h!W I%ç Í F$ç"SILL10B.PIC" |!\ :Ù---------> !a Pç: È ¬!f I%ç Í F$ç"sill11.pic" Î!k I%ç Í F$ç"sill11a.pic" ð!p I%ç Í F$ç"sill11b.pic" "u I%ç Í F$ç"sill11c.pic" 4"z I%ç Í F$ç"sill11d.pic" V" I%ç Í F$ç"sill11E.pic" h" :Ù-------> |"F$ç"SILL12.PIC" " :Ù-------> ¢"F$ç"SILL13.PIC" ´" :Ù-------> È"F$ç"SILL14.PIC" Ú"¢ :Ù-------> è"§Pç: È #¬ I%ç Í F$ç"SILL15.PIC" )#± I%ç Í F$ç"SILL15A.PIC" :#¶ :Ù------> N#»F$ç"SILL16.PIC" _#À :Ù------> m#ÅPç: È #Ê I%ç Í F$ç"SILL17.PIC" ®#Ï I%ç Í F$ç"SILL17A.PIC" ¿#Ô :Ù------> Ó#ÙF$ç"SILL18.PIC" ä#Þ :Ù------> ø#ãF$ç"SILL19.PIC" $è :Ù------> $íF$ç"SILL20.PIC" .$ò :Ù------> =$üPç: È N$ F$çPASS$(I%) ^$ :Ù-----> $¸ Rç:PIC$ç"SILL1.PIC": n : $º PIC$ç"SILL2.PIC": n : é$¼ Rç:Qç:PIC$ç"SILL3.PIC": n : FLAGç Í :¡ PIC$ç"SILL3A.PIC": n : A%À Rç:Qç:PIC$ç"SILL4.PIC": n : FLAGç Í :¡ PIC$ç"SILL4A.PIC": n : FLAGç Í %Ä PIC$ç"SILL4B.PIC": n : FLAGç Í :¡ PIC$ç"SILL4C.PIC": n : FLAGç Í Ø%È PIC$ç"SILL4D.PIC": n : FLAGç Í :¡ PIC$ç"SILL4E.PIC": n : -&Ê Rç:Qç:PIC$ç"SILL5.PIC": n : FLAGç Í :PIC$ç"SILL5A.PIC": n : FLAGç Í L&Ë PIC$ç"SILL5B.PIC" : n : j&Ì PIC$ç"SILL6.PIC" : n : &Î PIC$ç"SILL7.PIC" : n : á&Ð Rç:Qç:PIC$ç"SILL8.PIC" : n : FLAGç Í :¡ PIC$ç"SILL8A.PIC": n : FLAGç Í ÿ&Ò PIC$ç"SILL8B.PIC": n : L'Ô Rç:Qç:PIC$ç"SILL9.PIC": n : FLAGç Í :¡ PIC$ç"SILL9A.PIC": n : ¦'Ö Rç:Qç:PIC$ç"SILL10.PIC": n : FLAGç Í :¡ PIC$ç"SILL10A.PIC": n : FLAGç Í Å'Ø PIC$ç"SILL10B.PIC": n : (Ú Rç:Qç:PIC$ç"SILL11.PIC": n : FLAGç Í :¡ PIC$ç"SILL11A.PIC": n : FLAGç Í r(Ü PIC$ç"SILL11B.PIC": n : FLAGç Í :¡ PIC$ç"SILL11C.PIC": n : FLAGç Í (Þ PIC$ç"SILL11D.PIC": n : ¯(à PIC$ç"SILL12.PIC": n : Í(â PIC$ç"SILL13.PIC": n : ë(ä PIC$ç"SILL14.PIC": n : :)æ Rç:Qç:PIC$ç"SILL15.PIC": n : FLAGç Í :¡ PIC$ç"SILL15A.PIC": n : X)è PIC$ç"SILL16.PIC": n : §)ê Rç:Qç:PIC$ç"SILL17.PIC": n : FLAGç Í :¡ PIC$ç"SILL17A.PIC": n : Å)ì PIC$ç"SILL18.PIC": n : ã)î PIC$ç"SILL19.PIC": n : *ð PIC$ç"SILL20.PIC": n : D*ò Rç:Qç: Jç Ì :PIC$çPASS$(J): n : FLAGç Í :¡ J: Y*:Ù main routine *Xç:Yç:FLAGç:PIC$ç"part1.pic": ò ¯*A$çÞ: A$ç"" Í :¡ A$çÿ() Í Ä Ü* ': FLAGç Í Ä :Ùhead sequence + *N: FLAGç Í Ä :Ùhead view 2+ ØY: FLAGç Í Ä :Ùhead practice _+¦ ': FLAGç Í Ä :Ùbody sequence +¨ èN: FLAGç Í Ä :Ùbody view µ+ª Z: FLAGç Í Ä :Ùbody practice â+° ç': FLAGç Í Ä :Ùwing sequence ,² R: FLAGç Í Ä :Ùwing ,´ c[ &,Ä :Ù -------> .,':Ù [,'FLAGç:¿ ,:PIC$ç"head.pic":À:Xç:Yç* y,$'Ê ,: "Parts of a Bird" ,.'° (,
)ê( ,
), ¾,8'Ê ,: "The Head":° (, )ê( ,,),,B ô,B' è:Ê ,: " 1. Malar streak ": " Mustache b-L' " 2. Throat": " 3. Chin": " 4. Lower mandible": " 5. Upper manidible": " 6. Lores": " 7. Forehead" Ñ-V' " 8. Median crown stripe": " 9. Crown": "10. Eyebrow": "11. Eye-ring": "12. Nape": "13. Ear coverts ÷-`'Ê ,
: "- The head has 13 parts $.t'Ê ,: "Please press the [ENTER] key"; Y.~'A$çÞ: A$ç"" Í ~' :¡ A$çÿ() Í FLAGç: ' p.' A$èæÿ(
) Í ~' v.' §.'FLAGç:È :¿ ,:PIC$ç"Body.pic":À:Xçq:Yç* ¿.'° (,
)ê( ,
), ì.'Ê ,: "The Body":° (, )ê( ,,),,B /¦' è:Ê ,: " 1. Breast" z/°' " 2. Lesser wing coverts/": " Shoulder": " 3. Backs": " 4. Scapulars": " 5. Belly": " 6. Flanks" Å/º' " 7. Primaries": " 8. Leg/Tarsus": " 9. Wing bars": "10. Tertials 0¿' "11. Rump": "12. Secondaries": "13. Uppertail coverts": "14. Outer tail feathers u0Â' "15. Undertail coverts": "16. Median wing coverts": "17. Greater wing coverts 0Ä'Ê ,
: "- The Body has 17 parts È0Ø'Ê ,: "Please press the [ENTER] key"; ý0â'A$çÞ: A$ç"" Í â' :¡ A$çÿ() Í FLAGç: ä' 1ã' A$èæÿ(
) Í â' 1ä' D1ç'È :¿ ,:PIC$ç"wing.pic":À:Xçx:Yç* \1ö'° (,
)ê( ,
), 1 (Ê ,: "The Wing":° (, )ê( ,,),,B «1
( è:Ê ,: " 1. Primaries" *2( " 2. Primary coverts": " 3. Alula": " 4. Wrist": " 5. Lesser wing": " coverts": " 6. Median wing": " coverts 2 ( " 7. Scapulars": " 8. Greater wing":" coverts": " 9. Tertials": "10. Secondaries" ¯2((Ê ,
: "- The Wing has 10 parts Ü2<(Ê ,: "Please press the [ENTER] key"; 3F(A$çÞ: A$ç"" Í F( :¡ A$çÿ() Í FLAGç: K( (3H( A$èæÿ(
) Í F( .3K( C3::Ù main routine K3 N:Ù x3*N¿ ,:PIC$ç"head.pic":À:þ (X,Y),SCRN%,Æ 34NÊ ,: "The 13 parts of the head" æ38N° (, )ê( ,,),,B:Ê ,: "Please press any key to continue"; W4CN Iç Ì
:Ê ,: HEAD$(I):Ê HY(I),HX(I)ê: I:X1çHX1(I):X2çHX2(I):Y1çHY1(I):Y2çHY2(I): x : FLAGç Í \N _4RN I e4\N {4»N :Ù----------- 4èNÀ: SEG: þ(2,2),SCRN% ¬4òN¿ ,:Xç:Yç* Ó4üNÊ ,: "The 17 Parts of the Body" 5O° (,
)ê( ,
),:Ê ,: "Please press any key to continue"; 5 O Iç Ì :Ê ,: BODY$(Iê
):Ê HY(I),HX(I)ê: Iê
:X1çHX1(I):X2çHX2(I):Y1çHY1(I):Y2çHY2(I): x 5O FLAGç Í ÄO 5O I ¯5ÄO :Ù--------> æ5R¿ ,:PIC$ç"wing.pic":À:Xç- :Yç4:þ(-,4),SCRN% "6
R° (,
)ê( ,
), :Ê ,: "The 10 parts of the Wing" <6 R° (, )ê( ,,),,B F6RÊ , n6 R° (0,°)ê(º,°):° (0,^)ê(0,°) 6 R° (,°)ê(,): ° (º,°)ê(º, ) 7+R Iç Ì (:Ê ,: WING$(Iê ):Ê HY(I),HX(I)ê: Iê ;:X1çHX1(I):X2çHX2(I):Y1çHY1(I):Y2çHY2(I): x : I 7R :Ù--------> i7ðU:ÙFLAG=0:SCREEN 1:COLOR 0,2:X=0:Y=0:PIC$="part2.pic":GOSUB 1010:GOSUB 22250 |7ñU FLAGç Í ^V ¡7òUÈ :X1ç:Y1ç:¿ ,:À:XçA :Yç4 Ñ7ôU° (,
)ê( ,
), :Ê ,: "BIRD ORDERS" û7øU:ÙINE (2,12)-(300,25),1,B:LOCATE 3,3 8úU Iç Ì :Qç m8V I ¸ ,º ,¼ ,À ,Ê ,Ì ,Î ,Ð ,Ô ,Ö ,Ú ,à ,â ,ä ,æ ,è ,ê ,ì ,î ,ð ,ò 8V FLAGç Í ^V 8TV I 8^V 8hV À] 8àV :Ù---------> â8êV FLAGç:È :¿ ,:Xç:Yç:PIC$ç"part2.pic": ò 9ëVÊ ,: "Do you wish to: .9ìVÊ ,: "1. View a Specific Bird Order?" U9îVÊ ,: "2. View all the Orders?" }9ïVÊ ,: "Please make a selection"; ®9ðVA$çÞ: A$ç"" Í ðV :¡ A$çÿ() Í FLAGç: Ì9ñV A$èæ"1" î A$èæ"2" Í ðV á9òV A$ç"1" Í þV ö9ôV A$ç"2" Í ðU :öV FLAGç Í
:øV #:þVXç-:Yç4:FLAG1ç z: WFLAG1ç: P:À:Ê ,: Iç Ì : " ";I;ORDER$(I): I: Iç
Ì : I;ORDER$(I): I Æ:WÊ ,: "Please enter your choice and press [ENTER]";:Ê ,.: "_ "; ß:WÊ ,.:A$ç"":B$ç"": ;WA$çÞ: A$ç"" Í W :¡ A$çÿ() Í FLAGç:FLAG1ç: 9;W A$çÿ(
) Í Içÿ(B$): W ;
WB$çB$éA$: ÿ(B$)æ Í B$ç"":Ä -,:Ê ,.: "_ ";:Ê ,.: W ; W A$;: W ö;WRç:Qç: I ¸ ,º ,¼ ,À ,Ê ,Ì ,Î ,Ð ,Ô ,Ö ,Ú ,à ,â ,ä ,æ ,è ,ê ,ì ,î ,ð ,ò þ;W:Ù
:PIC$ç"head.pic":À: SEG:Xç:Yç*: è =öYÊ ,: "The 13 parts of the head" /= Z° (, )ê( ,,),,B =Z Iç Ì
:Ê ,: HEAD$(I):Ê HY(I),HX(I)ê: I;:X1çHX1(I):X2çHX2(I):Y1çHY1(I):Y2çHY2(I): : I =
Z , °=Z :Ù-----> ú=ZPç:È : P:À:Ê ,,: SEGç ¸: Ø, :Ã "PRAC2.PIC", @: Ø, ) $>ZA$çÞ: A$ç"" Í Z :¡ A$çÿ() Í ;>Z A$èæÿ(
) Í Z `>ZÀ:È : (: SEG:þ(2,2),SCRN% t>Z¿ ,:Xç:Yç* > ZÊ ,: "The 17 Parts of the Body" ³>ªZ° (,
)ê( ,
), Ó>´ZÊ ,:° (, )ê( ,,),,B G?¹Z Iç Ì :Ê ,: BODY$(Iê
):Ê HY(I),HX(I)ê: Iê
:X1çHX1(I):X2çHX2(I):Y1çHY1(I):Y2çHY2(I): : I: M?`[ ?c[Pç
:È : P:À:Ê ,,: SEGç ¸: Ø, :Ã "PRAC3.PIC", @: Ø, ) Á?e[A$çÞ: A$ç"" Í e[ :¡ A$çÿ() Í Ø?f[ A$èæÿ(
) Í e[ @h[È : (:¿ ,:À:Xç- :Yç4:þ(X,Y),SCRN% B@r[° (,
)ê( ,
), :Ê ,: "The 10 parts of the Wing" \@|[° (, )ê( ,,),,B m@[ è :Ê , @[° (0,°)ê(º,°):° (0,^)ê(0,°) ¾@[° (,°)ê(,): ° (º,°)ê(º, ) 3A[ Iç Ì (:Ê ,: WING$(Iê ):Ê HY(I),HX(I)ê: Iê ;:X1çHX1(I):X2çHX2(I):Y1çHY1(I):Y2çHY2(I): : I: X 9A¤[ KAÀ]:Ù SIL FLASH SAÁ]:Ù AÊ]Pç:È :Ê ,: "PRESS ANY KEY TO FLASH SILHOUETTE" ¸AÔ] A$çÞ: A$ç"" Í Ô] :¡ A$çÿ() Í ÕAè]À:¿ : æ : Ð : ° øAü]¿ ,:À:þ (2,2),SCRN%:¿ , "B$^ Iç Ì d: I:À:¿ , :Ùflash off WB.^Ê ,: "Would you like to see it again? (Y/N)" nB8^A$çÞ: A$ç"" Í 8^ BB^ A$çÿ() Í BL^ A$ç"y" Í ü] ¨BV^ A$ç"Y" Í ü] »B`^ A$ç"n" Í P_ ÎBj^ A$ç"N" Í P_ ØBt^ 8^ 'CP_COUNTç: P: Iç Ì : " ";I;ORDER$(I): I: Iç
Ì : I;ORDER$(I): I sCZ_Ê ,: "Please enter your choice and press [ENTER]";:Ê ,.: "_ "; Cd_Ê ,.:A$ç"":B$ç"": ¶Cf_A$çÞ: A$ç"" Í f_ :¡ A$çÿ() Í ÌCh_ A$çÿ(
) Í n_ Dj_B$çB$éA$: ÿ(B$)æ Í B$ç"":Ä -,:Ê ,.: "_ ";:Ê ,.: f_ #Dl_ A$;: f_ £Dn_A%çÿ(B$): A%èæZ Í Ä -,:COUNTçCOUNTé: COUNTç Í x_ :¡ þ(È,2),SCRN%:þ(È,2),SCRN%:Ê ,.: "_ ";:Ê ,.: d_ âDx_þ(È,2),SCRN%:° (æ, )ê( Â,(),,B:Ê , : Z;ORDER$(Z) %E_Ê ,: "Press any key to continue "; 3E_±é Þç"":² =E´_ Ê] EE0u:Ù ]E:uÈ ,:À: (:FLAGç mEDuÊ ,:¿ , EFu "ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿":Ê , ÑEHu "³ BIRDS OF NORTH AMERICA VOL. I ³":Ê , FJu "³ FIELD IDENTIFICATION ³":Ê , =FLu "ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ":Ê
,:¿ , oFNu "ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿":Ê , ¡FPu "³ ³":Ê , ÓFRu "³ 1. The Parts of a Bird ³":Ê , GTu "³ ³":Ê , 7GVu "³ 2. Bird Orders ³":Ê , iGXu "³ ³":Ê , GZu "³ 3. Quit ³":Ê , ÍG\u "³ ³":Ê , ÿG^u "ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ":Ê , /HluÊ ,
,:¿ ,: "Please make a selection" FHvuA$çÞ: A$ç"" Í vu aHu A$ç"1" Í y: :u |Hu A$ç"2" Í }: :u H¨u A$ç"3" Í FLAGç: PÃ ¢H¼u vu ªHy:Ù ÇH"y:ÙSCREEN 0:CLS:WIDTH 40 ×H,yÊ ,:¿ , I.y "ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿":Ê , ;I0y "³ Identifying the Bird ³":Ê , mI2y "³ Head, Body, and the Wing ³":Ê , §I4y "ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ":Ê
,:¿ , ÙI6y "ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿":Ê , J8y "³ ³":Ê , =J:y "³ 1. View Parts of a Bird ³":Ê , oJ
,:¿ ,: "Please make a selection" ÃK^yA$çÞ: A$ç"" Í ^y :¡ A$çÿ() Í åKhy A$ç"1" Í è: 8: :u L|y A$ç"2" Í è: : :u Ly A$ç"3" Í "L¤y vu *L }:Ù GL
}:ÙSCREEN 0:CLS:WIDTH 40 WL}Ê ,:¿ , L} "ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿":Ê , »L} "³ Learning the Bird Orders ³":Ê , íL} "³ Silhouettes ³":Ê , 'M } "ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ":Ê
,:¿ , YM } "ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿":Ê , M } "³ ³":Ê , ½M"} "³ 1. View Bird Orders ³":Ê , ïM$} "³ ³":Ê , !N&} "³ 2. Practice ³":Ê , SN(} "³ ³":Ê , N*} "³ 3. Main menu ³":Ê , ·N,} "³ ³":Ê , éN.} "ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ":Ê , O<}Ê ,
,:¿ ,: "Please make a selection" COF}A$çÞ: A$ç"" Í F} :¡ A$çÿ() Í ^OP} A$ç"1" Í êV: :u yOd} A$ç"2" Í À]: :u Ox} A$ç"3" Í O} vu Oè:Ù ¹Oò:ÙSCREEN 0:CLS:WIDTH 40 ÉOüÊ ,:¿ , ûOþ "ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿":Ê , -P "³ THE 3 PARTS OF A BIRD ³":Ê , _P "³ ³":Ê , P "ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ":Ê
,:¿ , ËP "ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿":Ê , ýP "³ ³":Ê , /Q
"³ 1. The Head ³":Ê , aQ "³ ³":Ê , Q "³ 2. The Body ³":Ê , ÅQ "³ ³":Ê , ÷Q "³ 3. The Wing ³":Ê , )R "³ ³":Ê , [R "³ 4. Return to Main Menu ³":Ê , R "ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ":Ê , ½R$Ê ,
,:¿ ,: "Please make a selection" ÔR.A$çÞ: A$ç"" Í . ÚR3 ñR8 A$ç"1" Í : S= A$çÿ() Í FLAGç: #SL A$ç"2" Í ¦: :S` A$ç"3" Í °: KSj A$ç"4" Í eSt FLAGç Í :¡ vu S~ A$çÿ() Í FLAGç: S A$ç"1" Í ØY: ´S4 A$ç"2" Í ¸: Z: ÒSH A$ç"3" Í à : c[: ãSR A$ç"4" Í ýS\ FLAGç Í :¡ vu T¸PIC$ç"Body.pic": Ü: 5TàPIC$ç"wing.pic": Ü: =Tþ:Ù ¼T " 2. Primary coverts": " 3. Alula": " 4. Wrist": " 5. Lesser wing": " coverts": " 6. Median wing": " coverts DU@ MALAR STREAK,THROAT,CHIN,LOWER MANDIBLE,UPPER MANDIBLE,LORES,FOREHEAD,MEDIAN CROWN STRIPE,CROWN,EYEBROW,EYE-RING,NAPE,EAR COVERTS ËUJ BREAST,LESSER WING COVERTS/SHOULDER,MEDIAN WING COVERTS,GREATER WING COVERTS,BELLY,FLANKS,BACK,SCAPULARS,WING BARS,TERTIALS,RUMP *VT SECONDARIES,UPPERTAIL COVERTS,OUTER TAIL FEATHERS,UNDERTAIL COVERTS,PRIMARIES,LEG/TARSUS ±V^ PRIMARIES,PRIMARY COVERTS,ALULA,WRIST,LESSER WING COVERTS,MEDIAN WING COVERTS,SCAPULARS,GREATER WING COVERTS,TERTIAL,SECONDARIES IWh GAVIIFORMES,PODICIPEDIFORMES,PROCELLARIIFORMES,PELECANIFORMES,CICONIIFORMES,PHOENICOPTERIFORMES,ANSERIFORMES,FALCONIFORMES,GALLIFORMES,GRUIFORMES èWj CHARADRIIFORMES,COLUMBIFORMES,PSITTACIFORMES,CUCULIFORMES,STRIGIFORMES,CAPRIMULGIFORMES,APODIFORMES,TROGONIFORMES,CORACIIFORMES,PICIFORMES,PASSERIFORMES ~Xr SILL21.PIC,SILL21A.PIC',SILL21B.PIC,SILL21C.PIC,SILL21D.PIC,SILL21E.PIC,SILL21F.PIC,SILL21G.PIC,SILL21H.PIC,SILL21I.PIC,SILL21J.PIC,SILL21K.PIC ¨Xw SILL21L.PIC,SILL21M.PIC,SILL21N.PIC °Xx:Ù ÆXy:Ù data for head ]Y| 116,200,120,228,15,25,124,192,128,212,16,24,108,176,108,195,14,22,100,152,91,170,13,19,76,160,82,175,10,20,60,168,84,188,8,21,52,184,66,190,7,23 ÙY~ 44,196,58,202,6,25,40,219,56,219,5,28,48,240,74,216,6,30,56,248,82,212,7,32,92,286,92,274,12,37,108,302,100,234,14,38 áY:Ù ÷Y:Ù data for body oZ 106,78,106,94,14,10, 116,86,100,110,15,11, 124,94,108,106,16,12, 132,102,116,110,17,13, 148,86,130,108,20,11 [ 156,94,138,116,21,12, 76,168,86,140,10,22, 92,180,96,150,12,24, 108,196,108,146,14,26, 124,212,124,156,16,28, 140,220,136,198,18,29 [ 148,228,128,156,19,30, 156,236,136,156,20,31, 172,204,156,206,22,26, 164,188,148,188,23,24, 172,156,156,160,23,20, 172,96,158,112,23,11 [:Ù ±[:Ù data for wing :\ 182,90,176,90,24,12, 64,91,90,108,8,12, 48,132,72,132,6,17, 48,164,62,164,6,21, 48,180,88,184,6,23, 56,204,105,204,7,26 \ 100,256,100,234,13,33, 146,252,120,196,19,33, 164,240,148,204,21,31, 184,158,174,158,24,20 #] GA-VI-I-FOR-MES,PO-DI-CI-PED-I-FOR-MES,PRO-CEL-LAR-I-I-FOR-MES,PEL-E-CAN-I-FOR-MES,CI-CO-NI-IFOR-MES,PHOE-NI-COP-TER-I-FOR-MES ´] AN-SER-I-FOR-MES,FAL-CO-NI-FOR-MES,GAL-LI-FOR-MES,GRU-I-FOR-MES,CHA-RAD-RI-I-FOR-MES,CO-LUM-BI-FOR-MES,PSIT-TA-CI-FOR-MES,CU-CU-LI-FOR-MES 4^ STRIG-I-FOR-MES,CAP-RI-MUL-GI-FOR-MES,APOD-I-FOR-MES,TRO-GON-I-FOR-MES,CO-RA-CI-I-FOR-MES,PIC-I-FOR-MES,PAS-SER-I-FOR-MES d^PÃÀ:Xç<:Yç:PIC$ç"TITLE.PIC": è: Mç Ì r^Zà Iç Ì ^dÃÄ .éI,:Ä ø,: Jç Ì ´:Aç: ¡^nà I ²^xà M :Ä À, Ç^à M1ç Ì 2: M1 Ö^à Iç Ì ò^ÃÄ , : Jç Ì Z: J ú^ à I _´Ã Iç Ì Â:Aç: I %_·Ã FLAGç Í Ä >_¹Ã¥ SCRN%: SCRN%( ) V_¾Ã FLAGç Í Ä :¡ e_Ä SEG::þ
Very nice! Thank you for this wonderful archive. I wonder why I found it only now. Long live the BBS file archives!
This is so awesome! 😀 I’d be cool if you could download an entire archive of this at once, though.
But one thing that puzzles me is the “mtswslnkmcjklsdlsbdmMICROSOFT” string. There is an article about it here. It is definitely worth a read: http://www.os2museum.com/wp/mtswslnk/